VBA Для выписки с текстовым полем пользовательской формы - PullRequest
0 голосов
/ 09 мая 2018

Я использую пользовательскую форму для ввода данных и использовал следующие коды для передачи данных в Excel:

    Cells(1,1).Value = Textbox1.Value
    Cells(1,2).Value = Textbox2.Value
    Cells(1,3).Value = Textbox3.Value
......
    Cells(1,57).Value = Textbox57.Value
    Cells(1,58).Value = Textbox58.Value
    Cells(1,59).Value = Textbox59.Value

Я собираюсь упростить со следующими

Dim i As integer

For i = 1 to 59
Cells(1,i).Value = "Textbox" & i.Value
Next

Но в текстовом поле возникает ошибка и часть i.Value

Пожалуйста, предложите, спасибо

1 Ответ

0 голосов
/ 09 мая 2018

Это должно работать,

Dim i As Long

For i = 1 to 59
Cells(1,i).Value = Me.Controls("TextBox" & i).Value
Next
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...