Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Переместить столбец с первой до последней заполненной строки
 
#1
16.09.2020 17:24:20
Здравствуйте, подскажите, пожалуйста, как мне переместить столбец с первой до последней заполненной строки в другое место?
Когда я использую [A:A].value = [B:B].value копируются весь столбец до последней возможной строки, что жутко тормозит работу.
 
 
 
#2
16.09.2020 17:27:21
Код
Sub test5()
Dim LastRow As Long
    LastRow = Cells(Rows.Count, "A").End(xlUp).Row
    Range("A1:A" & LastRow).Copy Range("B1") 'копируем формулы и форматы
End Sub

Только значения
Код
Sub test6()
Dim LastRow As Long
    LastRow = Cells(Rows.Count, "A").End(xlUp).Row
    Range("A1:A" & LastRow).Copy
    Range("B1").PasteSpecial xlValues 'только значения
End Sub
Изменено: New - 16.09.2020 17:30:56
 
 
 
#3
17.09.2020 08:04:58
New, спасибо огромное за помощь.
 
 
 
Страницы: 1
Наверх