Заполнение свободных верхних строк листа.

[Вадим12091965]

Всем привет. Такой вопрос. На форме в строку расположены лейблы, комбобоксы и текстбоксы. Их значения так же в строку (каждое значение в соответствующую ячейку) должны приходить в верхнюю свободную строку листа.
Заранее спасибо.

[motorway]

Пример:

[a1] = Label1.Name
[b1] = ComboBox1.Value
[c1] = TextBox1.Text

[Вадим12091965]

Спасибо, что откликнулись, но это не то. В вашем варианте данные приходят в конкретные ячейки, а мне нужно в свободные верхние. Они могут быть а1, b1, c1 или а87, b87, c87 (предыдущие заняты аналогичным заполнением).

[kuklp]

[a65536].end(xlup).offset(1) = Label1.Name
или
[b1].end(xldown).offset(1) = ComboBox1.Value
и т.д.

[Вадим12091965]

Спасибо. Код
[a65536].end(xlup).offset(1) помог, но столкнулся с проблемой. Если из ComboBox выбрал неправильную цифру, то следующий (правильный) выбор цифры уходит в лист на клетку ниже и общий текст строки на листе неправильный. Решается ли такая проблема?

[kuklp]

Добавьте кнопку, по к-рой будут вводиться сразу все данные.

[Вадим12091965]

Как вариант - согласен, но не хотелось бы загромождать форму. Да и моральный аспект: чаще книгой будут пользоваться коллеги, при неправильном заполнении спецификации ими и выполнения заказа по ней, все косяки свалят на меня как на разработчика. Так что хотелось бы что бы при исправлении ошибки в ComboBox строка в листе была в окончательном варианте. Если решения кроме кнопки нет, то, конечно, я её поставлю. Спасибо.