格式化第一行数据并在数据结束时停止

Question

所以我试着编写这个简单的VBA代码来获取第一行数据（这将是一堆字段头，数量将根据我正在使用的数据表而有所不同）并格式化应用过滤器和标题样式。

我的目标是在数据结束时停止应用标题（它可以在H列或AZ结束，只取决于我正在使用的表格）。过滤器似乎工作正常，但标题喜欢继续应用于整行。

Answer 1

尝试在cells(1,myCol).select之后和Selection.AutoFilter

之前添加Selection.Style = "Heading 2"

Answer 2

如果要引用单个单元格而不是行，则还需要指定列号。

尝试类似：

    Dim myCol As Long
    myCol = 1
    While Cells(1, myCol).Value <> ""
        ActiveSheet.Cells(1, myCol).Select
        Selection.AutoFilter
        Selection.Style = "Heading 2"
        myCol = myCol + 1
    Wend

更多信息

• Referring to Ranges in Excel VBA