Страницы: 1
RSS
Заполнение из формы в ячейки
 
Доброго дня Вам господа. Есть такой код
Код
Private Sub CommandButton1_Click()
'Application.Worksheets("A").Activate
            NextRow = Application.WorksheetFunction.CountA(Range("A!A:A")) + 2
            
            Cells(NextRow, 1) = TextBox1.Text
End Sub
С этим кодом все окей он работает, т.е. заполняет все яйчейки начинайя с А2 и до Аn-ое. Но вот в чем проблема, если случайно пользователь очистит скажем яйчейку А10, а потом через форму начнет заполнять А10, А11 и ... Аn, то код все время пепрезаполняет айчейку А11 а А12...Аnникак не заполняются как быть?
Спасибо1
Изменено: SerArtur - 26.08.2015 13:40:27
 
Как-то не очень понятно.
Цитата
Есть такой код...С этим кодом все окей....а потом через форму...
Где форма и проч.? Что Вы хотите?
Определяйте последнюю заполненную ячейку не функцией листа, а средствами VBA. Вот тема на этой-же странице
Согласие есть продукт при полном непротивлении сторон
Страницы: 1
Наверх