excel - 提取 Excel 单元格格式

Question

我正在寻找自动化报告的格式化过程。

我坚持如何在excel中提取单元格的格式。例如表格布局、字体、颜色等。

我正在考虑在excel中提取单元格的格式。然后复制代码并将其应用于需要格式化的其他 Excel。如果有更好的解决方案请告诉我。

Answer 1

只需将一个单元格的所有格式复制到另一个单元格即可，如下所示：

Range("A1").Select
Selection.Copy

Range("B1").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone

---

获取字体大小的示例：

Dim fontsize As Integer
fontsize = Worksheets("Sheet1").Cells(1, 1).Font.Size

---

获取字体名称的示例：

Dim fontname As String
fontname = Worksheets("Sheet1").Cells(1, 1).Font.Name

---

同样，您也可以通过这种方式获取字体颜色。

要获取单元格填充颜色：

Range("A1").FormatConditions(1).interior.color

---

只是谷歌这样的东西，“Excel vba 获取单元格字体名称”，你会看到很多例子。

Answer 2

如果您有某些经常使用的格式组合，我建议您考虑使用样式。定义后，样式真正简化了为您的单元格创建和维护统一格式。