Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 След.
Есть ли ограничения данных по которым может искать функция Find?
 
Спасибо!.
Уже посмотрел способ с Массивом.

Но вопрос в том, не будет ли это убивать память, так как мы должны загнать в массив все данные листа.
Помогите отключить автозаливку
 
Скорее всего ваша таблица сформирована как таблица )
Это на ленте ГЛАВНАЯ
в Блоке Стили
Формировать как Таблицу

Если таблица сформирована как таблица любые данные которые вы будете писать в нижней строке или в середине будут принимать формат всей таблицы.
Чтоб этого избежать либо пишите через строку чтобы между вашей таблицей и данными была пустая строка.
Либо убирайте Снимайте формирование как таблицу.
Да Скрины у меня не открылись.
Есть ли ограничения данных по которым может искать функция Find?
 
Добрый день коллеги!
Возник вопрос с функции .find
Есть ли ограничения данных по которым может искать функция ?
Просто была ситуация у коллеги.
Он использовал данные и сказал что после того как его база превысила 20 000 записей стала выдавать не корректные данные
      То есть говорит что значения не найдено в базе, а оно там есть.
Может кто сталкивался с таким или знает, а то пишу сейчас большую программу с большой базой и вот думаю стоит ли делать через .find.

Заранее спасибо!
Выделенный фрагмент в excel
 
Так Написал. Пробуйте )
поиск в массиве
 
Просто не совсем понятен смысл.. всех этих действий.. получается у вас есть таблица, состоящая из 25 столбцов
при вводе ключевого слова (что является названием одного из столбцов) нужно вставить в соседний лист
1 столбец и тот чье название совпадает с ключевым)

Просто зачем писать макрос на то, что проще выделить и вставить.
поиск в массиве
 
Значит вы хотите так.
в ячейку "Х" вы вводите критерий и  нажав заветную кнопку
вам ниже в столбик вывело все возможные продукты с их цифрами ?
Журнал входящих звонков
 
Возможно сделать то что вы хотите.
Но вопрос такой

Если вы хотите это так для быстрого заполнения простых данных
то можно даже формулами все сделать (список из подстановки)
и дату просто или макрорекордером записать вставить ячейку текущую дату и время и при нажатии воторй кнопки сделать тоже самое но в другой ячейки.

А если нужно с проверкой и защитой от хитрых то тут другой разговор
(просто сам в этом сегменте работаю) у нас тут правда проф программы написанные не на экселе.
Но я делал что-то подобное для Исходящих звонков.
Но из-за отсутствия времени проект в далеком зародыше...

Так что все зависит от того для чего это просто собрать статистику это просто ) (если хитрецов нет)
поиск в массиве
 
christine, ну смотрите тогда получается
что есть столбец со статичными цифрами.
100
200
300
400
и т.д.
который не меняются
и есть критерий (1) значит 2 ключа для поиска НО!

раз возможны совпадения то нужно понимать что делать если такое совпадение обнаружено?
как в моем примере.
допустим у вас ящик груш и ящик яблок имеет одинаковую цифру 300
что делать в таком формате какое значение присвоить 300 ?
Выделенный фрагмент в excel
 
Evgeniya90

Хм-м-м ну вообще из вашего файла легко заполнить общую стоимость. через суммеслимн,
а вот чтобы он смету всех счетов написал.... тут я думаю даже впр не поможет ) он же будет первое совпадение вставлять а если искомое значение ООО Гелла то их там 3  и он вставит вам первую строчку.

Я бы делал через макрос. Самый простой и действенный вариант.
Если вам не критично как это будет макросом или формулами
то могу сделать на макросе.
поиск в массиве
 
Лучше вариант сделать.
А если нет возможности то хотя бы ТЗ правильно описывайте.
1) Критерии отбора меняются ? они статично в одной ячейке ?
может быть несколько критериев
2) данные в одном столбце ? в разных кроме цифр в ячейке может быть что-то еще? могут ли разные продукты иметь схожую цифру ? ( например Яблоки коробка 300 и Груши коробка 300)
Эти данные в столбцах 1 и 2 заполняются руками или автоматически.
3) массив состоит из 3 столбцов ?
Выделенный фрагмент в excel
 
Макросом легко..
Я бы через UserForm Бы сделал
добавил бы в коллекцию уникальные названия компаний.
потом из выпадающего меню выбрал необходимую компанию и при нажатии рассчитать
Он бы уже перебором бежал бы и находя соответствие вносил бы запись и считал бы.

А если вам Формулами нужно... тут тоже можно через Суммеслимн и ВПР
Цикл для поиска значения в ячейке
 
хм-м-м Тогда так! )

Код
dim i%

for i = 1 to cells(rows.count,1).end(xlup).row
   if not cells(i,1) = "" then
      if cells(i,1) = cells(1,3) then cells(i,2) = cells (i,1)
   else 
      exit sub
   end if
nexit i


как то так.
перебирает он максимум по количеству заполненных ячеек.
Если на пути перебора натыкается на пустую.. Заканчивает действие )

А так согласен пример нужен..
или хотя бы подробное описание как выглядит что еще есть и для чего нужно (хотя бы смысл)
Потому что в соседнюю ячейку он скопирует а потом окажется что это нужно куда-нибудь перенести или посчитать или еще чего.. ) и может быть это все можно сразу в макрос засунуть и не париться )
Изменено: Niarah - 11.10.2013 14:57:23
Цикл для поиска значения в ячейке
 
Код
dim i%

for i = 1 to cells(rows.count,1).end(xlup).row
   if cells(i,1) = cells(1,3) then cells(i,2) = cells (i,1)
nexit i



Проверяет сколько записей в 1 столбце и делает цикл на количество записей.
каждую ячейку первого столбца проверяет с ячейкой (С3) (Туда вписываете искомое значение)
и при нахождении совпадения пишет ее с права.

Вроде так... если я все правильно понял )
Изменено: Niarah - 11.10.2013 14:23:59
как создать калькулятор с переменными значениями из выпадающего списка
 
Добрый вечер

Вариант на VBA

не самый наверное простой.. но вроде работает )
список можно пополнять главное не переименовывать лист и заполнять список строго в нужных столбиках.
VBA Excel в большой таблице найти все указанные значения, Как если найти далее или найти все
 
Ну почему я не хотел "for i"
просто потому что я знаю как с помощью него реализовать это ) и хотелось найти более просто или интересный вариант.

Как например с .find тоже самое, но проще команда и быстрее работает )

Просто сейчас мой руководитель это все ведет в самопальной эксель таблице.
Где формулы постоянно съезжают все портиться и т.д.
И я подрядился сделать это все на ВБА с Юзерформами и т.д. И мне учеба и поощрения и босс доволен )

сейчас как раз строю как все данные будут вноситься в таблицу. чтобы потом можно было выгрузить отчетность по группам и сделать поиск. Чтобы можно было найти человека в каких группах обучался какой результат набрал и т.д. )

Поэтому собираю информацию

Спасибо всем большое! )
VBA Excel в большой таблице найти все указанные значения, Как если найти далее или найти все
 
Спасибо!
Попробую изучить данный вариант )
VBA Excel в большой таблице найти все указанные значения, Как если найти далее или найти все
 
Добрый день коллеги!

Есть большая база по обучению в EXCEL
в ней содержится ФИО человека, номер группы, название курса, город, дата.
Каждый учащийся может обучать вначале одному курсу потом пойти на другой и т.д. То есть один и тот же человек может пройти от 1 до нескольких курсов.

Задача найти все эти значения. Например я ввожу его ФИО и он мне в listbox Добавляет все варианты а я уже из них выбираю конкретные данные.

Как найденные добавить в листбох и потом вывести данные я знаю. Вопрос именно в самом поиске всех этих данных. Перебирать каждое значение через for i не хотелось бы. Может быть есть другой способ ???

Думали сделать через .find и после нахождения изменять диапазон поиска и продолжать искать. Но вдруг есть человеческий вариант :)


Заранее спасибо!!!
UserForm ListBox (Убрать из списка не нужное), Убрать из списка не нужное
 
ОК спасибо!
UserForm ListBox (Убрать из списка не нужное), Убрать из списка не нужное
 
Спасибо!
Но теперь возникла проблема:
listbox could not get the selected property

я так понимаю если у меня список из 3 позиций например
1 2 и 3 и я пытаюсь удалить 2 позицию
Listcount-1 считает как 2
И как только счетчик доходит до 1 он удаляет позицию 2 и счетчик считает дальше хотя количество объектов в ListBox сократилась до 1 (от 0 до 1) понятное дело на i=2 оно выдает такую ошибку.
Что делать )
UserForm ListBox (Убрать из списка не нужное), Убрать из списка не нужное
 
Добрый день!
Есть listbox На UserForm
в нем есть некий список названий.
И я пытаюсь сделать кнопку которая бы удаляла определенные названия из этого списка.
LIstStyle стоит option и Multiselect
сам ListBox работает корректно.. не пашет сама кнопка....
GroupTre это и есть мой listbox
вот код
Код
Dim i%
If Not GroupTre.ListIndex = -1 Then
    For i = 0 To GroupTre.ListCount - 1
       If GroupTre.Selected(i) Then
          GroupTre(i).RemoveItem
       End If
    Next i
End If

Проверьте что я не так делаю )
Спасибо!
Изменено: Niarah - 04.10.2013 19:33:24
Постановка значений из столбца, в ряд
 
Здесь шагов всего несколько встаем в таблицу.
на ленте выбираем Вставка
и далее сводная таблица.

После уже раскидываем заголовки вашей таблицы в нужные участки сводной таблицы.

Все.
VBA Вопрос Userform увеличение количество строк ввода
 
Добрый день коллеги!

Пытаюсь запрограммировать на эксель базу под тренинги (прошедшие текущие и предстоящие)

в итоге делаю форму для назначения нового тренинга.
НО изначально мы не знаем сколько может быть кандидатов на обучения
от 1 до 30 макс (как утверждает босс)
в итоге назрел вопрос..

Сделать форму с мултитабом и сразу впихнуть туда 30 строчек под ФИО Статус и набранный бал

Либо зародилась идея..
создать одну строчку для ввода ФИО и указания статуса и т.д. а далее сделать кнопку "Добавить"
которая бы расширяла юзер форму и добавляла новую строчку для заполнения. присваивая ей уникальное имя
Ну и если число строк превышает разумное создавал новую закладку и начинал добавлять туда.

В общем вопрос...
возможно такое.. или лучше не париться и с делать по первому варианту )
я просто так никогда не делал... не знаю на сколько это сложно.
Вопрос ошибки VBA ComboBOX
 
Спасибо большое! )
Вопрос ошибки VBA ComboBOX
 
Цитата
Юрий М пишет:
А зачем вообще ReDim Preserve? Забирайте в массив и сразу этот массив в ComboBox. Ну или циклом AddItem.

М-м-м в первом варианте я задаю rngY как массив ? array ? или new collection
я еще слаб в массивах )

а циклом вот так ?
Код
for i = 1 to introw ' introw = число строк в списке
   dolgnosList.additem worksheets("Должность".cells(i,1)
next i
А потом то что они выберут мне нужно внести в лист
.cells(1,1)=dolgnosList.selected
вот так ?
Форма для ввода, поиска и редактирования данных в таблице excel 2010
 
Добрый день!

я бы добавил кнопку мол найти код
Пользователь вводит код и нажимает найти
и тогда он заполняет.

Private Sub btnFind_Click()
Dim i%
Dim intRow As Integer

With Worksheets("Data Table")
intRow = .Cells(Rows.Count, 1).End(xlUp).Row - 5 'Считаем сколько строк в списке где будем искать

For i = 5 To intRow ' заупускаем счётчик начиная со значения 5 и до конечной строки
If formField1 = .Cells(i, 1) Then
formField2 = .Cells(i, 2)
formField3 = .Cells(i, 3)
End If
Next i
End With
End Sub
Изменено: Niarah - 01.08.2013 12:32:41
Вопрос ошибки VBA ComboBOX
 
Добрый день коллеги!
Ситуация делаю UserForm где есть выпадающий список с названиями
использую combobox
в него мне нужно добавить список из листа

Написал вот такой код.....
Выдает ошибку Compile error: Expected array
и выделяет Redim preserve rngY(1
если rngY меняю на Вариант
то выделяет ее же и пишет Type mismatch
В общем не могу понять что не так делаю
Код
Private Sub DolgnosList_DropButtonClick()
Dim colDolgnost As New Collection
Dim i%, k%
Dim rngY As String
Dim intROW As Integer

intROW = Worksheets("Должность".Cells(Rows.Count, 1).End(xlUp).Row
Do
i = i + 1
ReDim Preserve rngY(1 To intROW - 1)
rngY(i) = Worksheets("Должность".Cells(i + 1, 1)
Loop Until rngY(i) = intROW - 1

For k = 1 To i - 1
DolgnosList.AddItem rngY(k)
Next k
End Sub
Кадровый резерв и Развитие персонала, Создание единой базы по сотрудникам и их обучению
 
Ну не то что пример...
я делаю это с 0 все.
Просто времени нет поэтому я только начну меня отвлекают на неделю )))

ну в общем пока все что есть...
Кадровый резерв и Развитие персонала, Создание единой базы по сотрудникам и их обучению
 
Нуу в аксессе я не так силен. А если что мне это править и дорабатывать.
Руководство полюбому же скажет а давайте туда еще и вот это добавим )

И если вдруг что слетит или у кого-то что-то не заработает или потребует переделки )
я же и сяду. ) сидеть сейчас вспоминать что я там и как делал в универе ) это затребует много времени. плюс всем привычнее видеть интерфейс экселя.
Кадровый резерв и Развитие персонала, Создание единой базы по сотрудникам и их обучению
 
И так суть.
МЫ в нашей организации открывает центр обучения. и развития персонала.
Нам нужен эксель файл в котором будет лист сотрудников лист руководителей лист должностей лист тренингов
и далее они с друг другом будут взаимодействовать.

Все должно работать через ЮзерФорму.

Например Лист Сотрудники
Иванов Иван Иванович 01.01.1980 работает с 01.01.2012 прошел тренинги 1 и 2 и 3 и 4 и 5 хочет занять позицию руководителя
и т.д.




1) Нужна база в которой будет содержаться список сотрудников
ФИО
Дата Рождение
Дата Устройства на работу
Руководитель
Тренер
2) Список этих самых Тренеров с их возможностями (какие тренинги они могут преподавать)
3) Список этих самых тренингов (их названия количество часов которые требуется обучению)
4) список Руководителей (люди которые отвечают за сотрудников)

5) Еще список должностей (или позиции которые могут достичь сотрудники) там Специалист Руководитель и т.д. (и к ним прикреплен список тренингов который необходимо пройти для получения возможности занять данную позицию.

6) и наконец мастер выгрузки.
Где можно будет выгрузить по операторам по тренингам или должностям.

Чтобы мы могли посмотреть кто на кого обучился кто готов занять данные позиции и т.д.

У меня идея все сделать через уникальные коды (как в Акссессе) но времени не хватает...
Я один и это не основная моя деятельность... а этот проект уже просят закрыть...

Поэтому и хочу узнать если ли люди готовые взять за такую работу...
и сколько такой проект будет стоить...

Платить как говориться буду из своего кармана )
Объясняю может не совсем внятно... готов еще подробнее обсудить и ответить на вопросы...
очень интересует цена. Может быть ее не потяну просто ) и тогда смирюсь и буду делать сам )
VBA: Найти выбранный элемент на листе и удалить всю строку
 
Да заработало! Спасибо!!!
Страницы: 1 2 След.
Наверх