vba 如何获取sheet 中某一列的列数

Question

如题所述

Answer 1

Sub aa()
'定义一个数组,首先将工作表2中的数据赋给表1,然后将数组赋给表1的单元格.
Dim arr
x = Sheet1.[a65536].End(xlUp).Row
arr = Range("a1:b" & Sheet2.[a65536].End(xlUp).Row)
Sheet1.Range("a" & x + 1).Resize(UBound(arr, 1), 2) = arr
Sheet1.Activate
x = Sheet1.[a65536].End(xlUp).Row
Range("a1:b" & x).Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending
End Sub

Answer 2

某一列的列数
columns(”xx“).column