Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Копирование значения ячейки в первую пустую ячейку столбца
 
#1
24.08.2016 14:03:07
Данный код копирует значение из ячейки G2 и вставляет в ячейку A2 на другом листе.
Как сделать так чтобы значения вставлялись не в ячейку A2 листа2, а чтобы вставлялись в столбец А в первую пустую ячейку листа2?
Код
Sub COPY1()
 Sheets("Лист4").Range("G2").Select
    Selection.Copy
    Worksheets("Лист2").Range("A2").PasteSpecial Paste:=xlPasteValues
End Sub
 
 
 
#2
24.08.2016 14:13:19
На форуме миллион примеров, как определить последнюю заполненную ячейку. Пользуйтесь поиском.
Я сам - дурнее всякого примера! ...
 
 
 
#3
24.08.2016 14:13:55
Код
Sub COPY1()
    Sheets("Лист4").Range("G2").Copy
    Worksheets("Лист2").Cells(Rows.Count, 1).End(xlUp).Offset(1).PasteSpecial Paste:=xlPasteValues
End Sub
Есть нюанс, даже если первая строка пустая, будет начинать со второй.
 
 
 
#4
24.08.2016 14:20:16
Можно и без копирования: приравнять диапазоны (ячейки).
 
 
 
#5
24.08.2016 14:27:40
Всем спасибо  :)
 
 
 
Страницы: 1
Наверх