Excel VBA - 找到第一个空列

Question

我知道如何找到包含数据的最后一列：

 finalcolumn = .Cells(1, .Columns.Count).End(xlToLeft).Column

但我想找到第一个空列，也就是说，在我的情况下，在最后一列数据之前的某个地方。

 firstemptycolumn = ?

Answer 1

像这样尝试第 1 行的第一个空列：

finalcolumn  =  1 + .Cells(1, 1).End(xlToRight).Column

它与您的代码的逻辑完全相同，但是您从左侧开始，然后向右移动。