excel - Workbook.Worksheets.Columns() 使用数字而不是字符串？

Question

目前我可以做两件事之一。

我可以使用一个字符串来显示我想要更改其宽度的列，也可以一次使用一个列号，如下所示:

这作为字符串工作得很好。

re_wb.Worksheets(1).Columns("K:J").ColumnWidth = 23

问题是我必须动态查找最后一列，然后向工作表中添加另外两列。这是通过找到最后一列，然后在最后一列编号上使用 +1 和 +2 将值添加到标题的第一个单元格来完成的。

last_col = re_wb.Worksheets(1).Cells(1, re_wb.Worksheets(1).Columns.Count).End(xlToLeft).Column
re_wb.Worksheets(1).Cells(1, last_col + 1).Value = "Correct Per CL"
re_wb.Worksheets(1).Cells(1, last_col + 2).Value = "Is reassignment needed?"

对于两列，分别编写最后列号 +1 和 +2 的两行来编辑它们的宽度并不是什么大问题，但考虑到一系列列可以使用字符串，是否可以使用两组数字？ (或更多数字，具体取决于我可能需要一次编辑的列数。)

re_wb.Worksheets(1).Columns(last_col + 1).ColumnWidth = 23
re_wb.Worksheets(1).Columns(last_col + 2).ColumnWidth = 23

我尝试过这样的事情:

re_wb.Worksheets(1).Columns(last_col + 1, last_col + 2).ColumnWidth = 23

没有运气。看到我无法预测该列将是什么字母，是否可以使用数字定义一系列列，或者我只需要像上面那样一次执行一个列？

Answer 1

Excel 对象模型中不存在“Column”这样的东西 - Worksheet.Columns(foo) 返回一个 Range。只需构建适当的 Range 并使用它来设置列宽:

With re_wb.Worksheets(1)
    .Range(.Cells(1, last_col + 1), .Cells(1, last_col + 2)).ColumnWidth = 23
End With