查找列的范围，给定列号 VBA

Question

在给定列号的情况下，如何查找和存储整个列的范围对象？谢谢！

Answer 1

使用 Columns 属性

Dim rng as Range
Set rng = ThisWorkbook.Worksheets(1).Columns(12) ' for column 12

Answer 2

怎么样：

Sub PickAColumn()
   Dim i As Long
   Dim MyColumn As Range
   i = Application.InputBox(Prompt:="Enter Column NUMBER ", Type:=1)
   Set MyColumn = Cells(1, i).EntireColumn

   MyColumn.Select
End Sub

查找列的范围，给定列号 VBA

Find range of column, given column number VBA

excel

vba

excel-2010