Заполнение ячеек из формы со смещением вправо

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Заполнение ячеек из формы со смещением вправо - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Заполнение ячеек из формы со смещением вправо (Макросы/Sub)

Заполнение ячеек из формы со смещением вправо

kpk17

Дата: Вторник, 10.02.2015, 18:00 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 20

Репутация: 0 ±

Замечаний: 40% ±

Excel 2007

Делаю заполнение ячеек из формы со смещением вправо.
Должно идти заполнение из формы. Заполнил ячйки формы, нажал ок, и так нужное количество раз.
сначала заполняются первые ячейки, затем вторые и так далее. все 4 поля на форме будут заполнены и пропусков не будет.

но почему-то у меня идет заполнение сразу всего диапазона.

скажите пожалуйста куда копать.
Спасибо.

К сообщению приложен файл: 2255540.xlsm (21.6 Kb)

Ответить

Leanna

Дата: Вторник, 10.02.2015, 18:06 | Сообщение № 2

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 189

Репутация: 78 ±

Замечаний: 0% ±

excel 2010

Попробуйте без цикла
[vba]

Код

Private Sub CommandButton1_Click()
Dim lLastCol As Long

lLastCol = Cells(34, Columns.Count).End(xlToLeft).Column + 1
lLastCol = Application.Max(lLastCol, 4)

Cells(34, lLastCol) = Me.TextBox1.Value
Cells(35, lLastCol) = Me.TextBox2.Value
Cells(36, lLastCol) = Me.TextBox3.Value
Cells(37, lLastCol) = Me.TextBox4.Value
End Sub

[/vba]

Лучше день потерять, потом за пять минут долететь!

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Заполнение ячеек из формы со смещением вправо (Макросы/Sub)

Страница 1 из 1
1