Копировать столбцы до границы

Question

Пытаюсь сказать VBA скопировать все ячейки из столбца "Data_FirstCoumn" до столбца "Data_Boundary".

Однако VBA продолжает выдавать ошибку, в которой говорится, что "метод автозаполнения класса Range не выполнен".

Вот мой код для обеспечения контекста:

Sub Macro5()
Range("Data_FirstColumn").Select
Selection.AutoFill Destination:=Range("Data_Boundary"), Type:=xlFillDefault
Columns("Data_First:Data_Boundary").Select
End Sub

Спасибо

Answer 1

Рассматривать:

Sub macro5()
    Range("A:A").Name = "Data_FirstColumn"
    Range("Z:Z").Name = "Data_Boundary"
    Range("Data_FirstColumn").Copy Range(Range("Data_FirstColumn"), Range("Data_Boundary"))
End Sub

Answer 2

По вашей ошибке - вам нужно место назначения, чтобы включить источник. Пытаться:

Range("Data_FirstColumn").AutoFill Destination:=Range("Data_FirstColumn:Data_Boundary"), Type:=xlFillDefault