不要选择命名范围vba中的最后一列

Question

我有这段代码：

With Range("OriginSize")
.RowHeight = 12.75
.ColumnWidth = 3
End With

但我不希望触及此范围的最后一栏。有人知道吗？感谢

Answer 1

你应该使用

With Range("OriginSize").Resize(Range("OriginSize").Rows.Count,Range("OriginSize").Columns.Count-1)
.RowHeight = 12.75
.ColumnWidth = 3
End With

调整大小（https://msdn.microsoft.com/en-us/library/office/ff193274.aspx）可让您更改范围的大小。