在多个excel文件上执行格式化

Question

我正在尝试编写一种方法来对多个.csv文件执行以下操作：

1. 突出显示一组列
2. 选择主页/条件格式/色标/ {第二选项}
3. 将结果另存为.xls文件（以保持颜色缩放）

有关如何编写此文件并在多个文件上执行的任何提示？我从来没有真正尝试过excel来做任何事情。

Answer 1

这是我使用的技术的链接，您应该能够根据自己的需要进行调整，有一个示例文件供您试用。它甚至包括一个可以为你创建文件夹的UDF。

CSVs to Workbooks

在代码中，您将看到以下两行：

ActiveSheet.Name = NwName       'rename the sheet
ActiveWorkbook.SaveAs fPath & NwName & ".xls", FileFormat:=xlNormal

将格式代码放在那里，将其更改为：

With ActiveSheet
    .Name = NwName       'rename the sheet
    .Range("A:G").NumberFormat = "General"
    .Range("A:G").HorizontalAlignment = xlCenter
    With .Range("F2:F10000").SpecialCells(xlConstants)
        .FormatConditions.Delete
        .FormatConditions.Add Type:=xlExpression, Formula1:="=F9>50"
        .FormatConditions(1).Interior.ColorIndex = 36
    End With
End With
ActiveWorkbook.SaveAs fPath & NwName & ".xls", FileFormat:=xlNormal

这应该让你开始。