Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите решить проблемму с listbox на форме / 2 сообщений из 2, страница 1 из 1
17.06.2005, 15:26:14
    #33122149
vova64
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите решить проблемму с listbox на форме
Проблема выглядит так открываеться файл Excel вызываеться макрос открываеться форма
с listbox у которго свойство MatchEntry = fmMatchEntryComplete (свойство благодаря которому
позиционируеться положение текущей строки в listbox по набираемым с клавиатуры символам)
и оно то работает то нет?
...
Рейтинг: 0 / 0
21.06.2005, 08:24:15
    #33125771
vova64
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите решить проблемму с listbox на форме
Модулль1

Sub Userform1Open()
ThisWorkbook.Sheets().Item(1).Unprotect
KonStr = ThisWorkbook.Sheets().Item(1).Cells(1, 1).SpecialCells(11).Row
ThisWorkbook.Sheets().Item(1).Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
UserForm1.ListPrice.RowSource = "a2:g" + Trim(str(KonStr + 1))
UserForm1.Show
End Sub
при этом свойства лист бокса
UserForm1.ListPrice.MatchEntry = fmMatchEntryComplete
UserForm1.ListPrice.TextColumn = 1
в ячейках колонка А текстовая информация

особенность такая работает сойство MatchEntry и если я переключаюсь на другую задачу например

проводник потом возвращаюсь к Ехсел и сойство MatchEntry пепестает нормально работать

(особеность когда перестает работать заметил по цифорному набору работает а по буквам нет) т.е.

набираю "папа" переходит на первую строку которая на начинаеться на "папа" набираю "5"

переходит на строку которая начинаеться на "5"?
еще такая особенность расположил кнопку которая переключает фокусы
UserForm1.ListZakaz.SetFocus
UserForm1.ListPrice.SetFocus
и очень часто воссанавливает работу сойства MatchEntry
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите решить проблемму с listbox на форме / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]