我将如何使用 \"with\" 语句压缩以下代码

【问题标题】：How would I condense the following code using "with" statement我将如何使用 \"with\" 语句压缩以下代码
【发布时间】：2022-10-24 02:36:25
【问题描述】：

我无法使用“With”语句压缩此代码。以下是我的以下代码。有人可以帮我解决这种情况吗？

【问题讨论】：

为什么要设置 4 种不同的数字格式？ With Range("H1:H2") 似乎是一个好的开始。

标签： excel vba

【解决方案1】：

with Range("H1:H2")
    .NumberFormat = ...
    .
    . Here you put everything except Font part 
    .
    with .Font
        .Size = ...
        ...
    end with
end with

【讨论】：