excel - VB中更改字体的if语句

Question

我正在研究一个宏，如果最初设置的字体小于 10，我希望它的一部分在按下按钮后将字体更改为 10。我已经完成了大部分工作，但是 If 语句似乎没有被占用，即使它在逻辑上是有意义的并且它没有抛出任何错误。该功能的所有其他部分都正常工作，所以我相信下面的行是问题所在，但我对 VB 不够熟悉，无法弄清楚是什么。我希望得到一些帮助，谢谢！

这是有问题的代码： If .Cells.Font.Size < 10 Then .Cells.Font.Size = 10

标签： excelvba

Answer 1

我对您的问题的猜测，因为我不知道您的With陈述所引用的内容或您的布局是什么：

如果Font.Size跨多个单元格范围不一致，则Font.Size返回Null。

如果需要，您可能会遍历单元格，或者可能只是检查一个单元格的大小，具体取决于您的布局。

为简化起见，您可以首先检查If IsNull(.Cells.Font.Size)以验证是否确实需要循环或某些替代逻辑。