Добавление текста из TextBox в ячейку EXCEL

[Настя Белова]

Имеется файл с несколькими листами. Так же есть TextBox. Как сделать что бы программа определяла в какой лист добавлять данные из TextBox-ов.
5.zip

[Настя Белова]

Книга1.zip воот файл

[RAN.]

Примерно так.

Sheets("Командировка").Range("A" & Rows.Count).End(xlUp).Offset(1).Value = TextBox1.Value

[kalbasiatka]

см. пример

[Настя Белова]

Название листов разное. данные в Первые 3 столбца уже заполненные,поэтому я поместила на форму ComboBox с этими данными.
т.е. пользователь выбирает из списка ComboBox, заполняет TextBox и нажимает на кнопку,тем самым ComboBox позволяет найти лист с этими данными,а данные из TextBox заполняют ячейку которые им присвоены

[RAN.]

Разные они, или одинаковые, значения не имеет.
VBA все равно не поймет, куда вы его посылаете.
У вас адрес прописан для формулы.
Как писать адрес для VBA я показал выше.

[Настя Белова]

Private Sub ComboBox1_Change()

Dim i As Integer
Dim R As Range

For i = 2 To 100 Step 1
Set R = Лист1.Cells(ComboBox1.ListIndex + 1, i)
If R.Value = Empty Then
R.Value = TextBox1.Text
Exit For
End If
Next i

End Sub

Почему когда пишу вместо Лист1 ---> Январь то у меня ошибка

[IgorGO]

потому что Лист1 - это один из обьектов книги ексель, а Январь - это название листа
возможно Worksheets("Январь") - это тоже самое, что Лист1. не вижу вашего файла - поэтому все сказанное это только предположения

[Настя Белова]

Книга1.zip
я намудрила от души наверное

[IgorGO]

не вникая в суть задачи, я почти угадал... везде в тексте макросов - Лист9 и Worksheets("Январь") - это обращение к одному и тому же обьекту книги.