Excel VBA – select包含文本而不是公式的列中的所有单元格

我想问你这个问题:我在Excel工作表的B列中有这些单元格

  • B1:Ciao / 文本
  • B2:stackoverflow / 文本
  • B3:= A1 + A3 / 公式(举例)
  • B4:法比奥/ 文本

我只想selectB1,B2,B4; 换句话说,我只想select包含文本而不是公式的列B的单元格

是否有可能在代码中做到这一点:

rng = 'I DON'T KNOW' For Each cella In rng .. 

谢谢您的考虑。

您可以使用.HasFormula命令写入或多或less的行:

If Not cella.HasFormula Then

在这种情况下,您需要复制/select(或其他)单元格,否则不需要。 把它放在你的for循环中,你就完成了!

Excel有这个function内置到SpecialCells ,所以你可以这样做:

 Set rng = Sheets(2).Range("B1:B4").SpecialCells(xlCellTypeConstants) 

在Excel中循环显示工作表范围非常缓慢并且最好避免