Vba获取表格某一列的值

Vba获取表格某一列的值，判断单元格是否为空，是则开始计数并返回

某一列直接循环就可以了
for i = 1 to n
msgbox ActiveSheet.Range("列名" & i)
next