Коллеги, прошу извинить за возможный повтор.
В данный момент макрос учитывает пустоты и стопориться на них(копирует данные до пустот), что логично)).
Что нужно вписать, чтобы диапазон копировался до конца вместе с пустотами?
Или не замарачиваться и вписать?
В данный момент макрос учитывает пустоты и стопориться на них(копирует данные до пустот), что логично)).
Что нужно вписать, чтобы диапазон копировался до конца вместе с пустотами?
Код |
---|
For i = 1 To 50 If Cells(1, i).Value = "Dest. Storage Type" Then Range(Cells(1, i), Cells(1, i).End(xlDown)).Copy Worksheets("LT23").Range("V1") Exit For End If Next i |
Код |
---|
Range(Cells(1, i), Cells(100000, i)).Copy |