Vba 复制变量列的Excel宏模块
我试图创建一个宏,将变量列从一个工作表复制到另一个工作表。例如,我想将A列第3页复制到A列第6页,B列第3页复制到C列第6页,等等 我希望创建一个可以多次调用的过程Vba 复制变量列的Excel宏模块,vba,excel,Vba,Excel,我试图创建一个宏,将变量列从一个工作表复制到另一个工作表。例如,我想将A列第3页复制到A列第6页,B列第3页复制到C列第6页,等等 我希望创建一个可以多次调用的过程 Sub Copy_Column(a, b) Sheets(3).Select Range("a11:a1000").Select Selection.Copy Sheets(6).Select Range("b15").Select ActiveSheet.Paste End Sub
Sub Copy_Column(a, b)
Sheets(3).Select
Range("a11:a1000").Select
Selection.Copy
Sheets(6).Select
Range("b15").Select
ActiveSheet.Paste
End Sub
Sub Master()
Call Copy_Column(a, a)
End Sub
它将第3页的A列复制到第6页的B列,而不是A列
提前谢谢 那么,您在例程中从不使用
a
和b
参数。你是说它们代表列字母吗?如果是,那么
Sub Copy_Column(byval a as string, byval b as string)
Sheets(3).Range(a & "11:" & a & "1000").Copy Sheets(6).Range(b & "15")
End Sub
Sub Master()
Call Copy_Column("a", "a")
End Sub