Автор Евгения Кухтина задал вопрос в разделе Другие языки и технологии
VBA, как занести в текстбокс данные из ячейки? и получил лучший ответ
Ответ от Imobilazer[гуру]
TextBox1.Text = Range("A1")
Значит дело не в занесении текста.
Private Sub ComboBox1_Change()
If ComboBox1.Value = "Война и мир" Then
TextBox2.Text = Range("J3")
End If
End Sub
Ответ от Vitaly[гуру]
Судя по вашему алгоритму, при изменении текстбокса2 будет выполнятся программа - если комбобокс1 = война и мир, то текстбокс2 = J3. Странно, как эксель вообще не зависает. По идее циклическая ошибка, т. к. при изменении в текстбоксе2 значения на J3 алгоритм должен повторяться. Я так думаю, что первую строку нужно изменить на Sub ComboBox1_change.
Судя по вашему алгоритму, при изменении текстбокса2 будет выполнятся программа - если комбобокс1 = война и мир, то текстбокс2 = J3. Странно, как эксель вообще не зависает. По идее циклическая ошибка, т. к. при изменении в текстбоксе2 значения на J3 алгоритм должен повторяться. Я так думаю, что первую строку нужно изменить на Sub ComboBox1_change.
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: VBA, как занести в текстбокс данные из ячейки?
Импорт в эксель из текстовых документов
А почему просто не импортировать из текстовика в Excel? А потом удалить лишние строки. Какой формат
подробнее...