powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как выбрать ячейку...
6 сообщений из 6, страница 1 из 1
Как выбрать ячейку...
    #33032303
fonda
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Помогите, плиз! Как выбрать ячейку из TextBox'a, например в TextBox'e написал A9, он и выделил в Excell ячейку A9?! Буду ОЧЕНЬ благодарна за помощь!
...
Рейтинг: 0 / 0
Как выбрать ячейку...
    #33032413
Фотография SmeL_md
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Открываешь Excel, нажимаешь на тул баре кнопку Record Macro, после выделяешь ячейку A9, жмешь на буттон Stop Recording. Даллее на буттон Visual Basic Editor и выбери модуль который ты создал, там бедут описаны все твои записанные действия, вот это можно брать и использовать, как текст программы.
Вот те сэмпл
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Sub Form_Load()
  Set objExcel = New Excel.Application
  objExcel.Visible = True
  objExcel.SheetsInNewWorkbook =  1 
  objExcel.Workbooks.Add
  
With objExcel.ActiveWorkbook.ActiveSheet
    .Range("A9").Select
End With
End Sub
Только не забудь в References добавить объект Microsoft Excel
...
Рейтинг: 0 / 0
Как выбрать ячейку...
    #33033729
fonda
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Мне не надо именно A9 выделять, а надо чтобы в TextBox я вбивала ЛЮБУЮ ячейку и она бы выделялась в Excel!
...
Рейтинг: 0 / 0
Как выбрать ячейку...
    #33033739
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
SmeL_md четко все описал, но если не понятно...

objExcel.ActiveWorkbook.ActiveSheet.Range(txtRange.Text).Select
...
Рейтинг: 0 / 0
Как выбрать ячейку...
    #33034887
sergeyvg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Может такой код подойдет?
Private Sub TextBox2_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
On Error Resume Next
If KeyCode = 13 Then Range(TextBox2.Value).Select
End Sub
...
Рейтинг: 0 / 0
Как выбрать ячейку...
    #33034895
sergeyvg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Может такой код подойдет?
Private Sub TextBox2_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
On Error Resume Next
If KeyCode = 13 Then Range(TextBox2.Value).Select
End Sub
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как выбрать ячейку...
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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