Excel “；无法设置范围类”；的宽度属性；

我正致力于自动化成本估算表的构建，掌握假设、规则、政策等

一切进展顺利，直到我想自动设置列宽。这里是一个简短的蒸馏

Dim NumCE As Integer
Dim TotalWidth As Integer

NumCE = 1
Sheets("Cost Estimate").Range("A:A").ColumnWidth = 17  'THIS WORKS

TotalWidth = 17
Sheets("Cost Estimate").Range("B:B").Width = TotalWidth / NumCE 'THIS PROVOKES THE ERROR MESSAGE
Sheets("Cost Estimate").Range("B:B").Width = TotalWidth 'THIS PROVOKES THE ERROR MESSAGE - AS DOES THIS!

我在Windows 10操作系统中使用Excel 2016，使用的是整个O365捆绑包

---

有什么想法吗？

使用

ColumnWidth

：

Sub fjsh()
    TotalWidth = 17
    Sheets("Cost Estimate").Range("B:B").ColumnWidth = TotalWidth
End Sub

---

对于那些偶然发现这篇文章的有类似问题的人，请注意，即使语法正确，如果赋值太大，也可能会出现错误

ColumnWidth

的单位不是以像素或厘米为单位，而是：

。您是否尝试过范围（“B:B”）。列宽？？？在第二部分中，您只需使用只读的

Width

。