如何使用公式格式化Excel表格？

Question

我正在使用ColdFusion从我的数据库中的信息动态创建Excel电子表格。

我发现我可以将Excel公式插入到单元格中，它们会自动执行。我想知道是否可以通过公式或宏来使用Excel的“Format as table”功能，还是有其他方法可以做到这一点？

Answer 1

您可以通过以下宏

执行此操作

Private Sub Workbook_Open()

ActiveSheet.ListObjects.Add(xlSrcRange, Range("$A$1:$D$10"), , xlNo).Name = _
        "Table1"
    Range("Table1[#All]").Select
    ActiveSheet.ListObjects("Table1").TableStyle = "TableStyleLight9"

End Sub

这将使用TableStyleLight9样式格式化单元格A1到D10作为表格，默认情况下为蓝色。