Здравствуйте! На этом форуме нашел макрос поиска данных через форму (Спасибо автору!) Немного переделал, но не получается следующее. По вводу буквы из формы Макрос выбирает из списка данные. Потом выбрав нужные в форме (имя) выделяет ячейку напротив выбора. Как "убрать активность" что-ли формы, для редактирования выделенной ячейки не кликая еще раз по ней мышем? Можно закрывать форму - тогда работает, но хотелось бы чтобы она оставалась. Спасибо!
Здравствуйте! На этом форуме нашел макрос поиска данных через форму (Спасибо автору!) Немного переделал, но не получается следующее. По вводу буквы из формы Макрос выбирает из списка данные. Потом выбрав нужные в форме (имя) выделяет ячейку напротив выбора. Как "убрать активность" что-ли формы, для редактирования выделенной ячейки не кликая еще раз по ней мышем? Можно закрывать форму - тогда работает, но хотелось бы чтобы она оставалась. Спасибо!pechkin
тогда не понятно зачем вам держать форму открытой? В Вашем примере она и так не интерактивно открыта - можно редактировать ячейку. Попробуйте вместо [vba]
Код
Unload Me
[/vba] написать[vba]
Код
Me.Hide
[/vba] тогда введенные данные формы и настройки сохраняются.
тогда не понятно зачем вам держать форму открытой? В Вашем примере она и так не интерактивно открыта - можно редактировать ячейку. Попробуйте вместо [vba]
Код
Unload Me
[/vba] написать[vba]
Код
Me.Hide
[/vba] тогда введенные данные формы и настройки сохраняются.SLAVICK
Вы правы, данные в форме сохраняются - но сама форма пропадает и ее нужно опять вызывать по нажатию кнопки. Я думал , что возможно просто есть команда, заменяющая клик мыши по листу вверху или по выделенной уже ячейке, тогда форма как бы меняет цвет (неактивна что-ли) и ячейка свободно редактируется. Потом опять выбор из уже открытой формы и т.д.
Вы правы, данные в форме сохраняются - но сама форма пропадает и ее нужно опять вызывать по нажатию кнопки. Я думал , что возможно просто есть команда, заменяющая клик мыши по листу вверху или по выделенной уже ячейке, тогда форма как бы меняет цвет (неактивна что-ли) и ячейка свободно редактируется. Потом опять выбор из уже открытой формы и т.д.pechkin
pechkin, привет открыл файл из 1-го сообщения, все работает, при открытой форме можно перейти на лист второй цикл, кажется, не нужен. Вот этот: [vba]
Код
For i = 2 To Cells(Rows.Count, 2).End(xlUp).Row If InStr(1, UCase(Cells(i, 2)), UCase(TextBox1.Value)) > 0 Then ListBox1.AddItem i ListBox1.List(j, 1) = Cells(i, 2) j = j + 1 End If Next i
[/vba]
pechkin, привет открыл файл из 1-го сообщения, все работает, при открытой форме можно перейти на лист второй цикл, кажется, не нужен. Вот этот: [vba]
Код
For i = 2 To Cells(Rows.Count, 2).End(xlUp).Row If InStr(1, UCase(Cells(i, 2)), UCase(TextBox1.Value)) > 0 Then ListBox1.AddItem i ListBox1.List(j, 1) = Cells(i, 2) j = j + 1 End If Next i
Еще раз всем спасибо! Ответ от Pelena - То что нужно! Nilem , спасибо за ответ, но в первом сообщении файл не работает как я бы хотел, там смысл не кликать мышем по УЖЕ выделенной ячейке после работы макроса , а сразу с калавиатуры редактировать.
Еще раз всем спасибо! Ответ от Pelena - То что нужно! Nilem , спасибо за ответ, но в первом сообщении файл не работает как я бы хотел, там смысл не кликать мышем по УЖЕ выделенной ячейке после работы макроса , а сразу с калавиатуры редактировать.pechkin
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
