Помощь - Поиск - Пользователи - Календарь
Полная версия: Visual Basic + Exell
Форум «Всё о Паскале» > Современный Паскаль и другие языки > Ада и другие языки
@^WARlock^@
Такая вот дилема, может комут-то покажется это смешным но всетаки.
Допустим я создаю форму, она состоит из одного текстового окошка (окошко куда вводится текст), кнопки1 и кнопки2.

Как сделать, чтобы при нажатии кнопки1, текст введенный в окошко копировался в ячейку (1,1), а при нажатии кнопки2 текст удалялся из окошка и ячейки.
FreeMan
если ты оформляешь прям в екселе, то чтото типа
Код
Cells(1, 1).Value = TextBox1.Text

в событии кнопка1.онклик
Код
Cells(1, 1).Value = ""

в событии кнопка2.онклик
@^WARlock^@
Благодарю.
А в ComboBox1(раскрывающийся список), как сделать чтобы внем отображались слова, ну допустим название машин или животных и т.д. и т.п. И при выборе необходимого слова оно сохранялось в ячейку (Сохр. происходит также, как и в предыдущем случае?).
FreeMan
combobox1_onchange:
Код
Cells(1, 1).Value = ComboBox1.Value

Form_onload:
Код
ComboBox1.AddItem("car1")
ComboBox1.AddItem("car2")
ComboBox1.AddItem("car3")
...
@^WARlock^@
Круто-та.
И еще наверное последние в данный момент нюансы которые меня интерисуют.

Можно-ли сделать, чтобы при нажатии кнопки, заполненые поля, раскрывающиеся списки в самой форме отчищались (т.е. становились, как перед заполнением).

Как при нажатии кнопки отчистить все ячейки разом, начиная ну допустим с 5-й строки и ниже или выше.

При нажатии "кнопки сохранить" на форме, надо чтобы сохранялся только лист3, а не вся книга.

Добавлено через 9 мин.
А вот чуть не забыл.

Почему когда я вкнопке прописываю код, для открывания поискогого окна оно не появляется(может код не тот).
Application. OnKey "^F"
FreeMan
Код
Range("A1:A9").Select
Selection.Clear

очистит ячейки с а1 по а9
Код
ComboBox1.Clear

почистит список
@^WARlock^@
Так как сделать, чтобы при нажатии "кнопки", сохранялся допустим только лист3, а не вся книга.

И по поводу кода для окрытия поискового окна (т.e. CTRL+F), правильный он или нет?
@^WARlock^@
Сделал поисковое окно.
При введении данных не имеющихся на листе вылетает ошибка. Как сделать, чтобы она не вылетала, или чтобы появлялось сообщение, что данные удовлетворяющие поиску не найдены.
Нажмите для просмотра прикрепленного файла
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.