Range.EntireColumn (Excel)

Retorna um objeto Range que representa a coluna inteira ou colunas que contém o intervalo especificado. Somente leitura.

Dim rngEntireColumn As Range
Set rngEntireColumn = ActiveCell.EntireColumn