Question

VBA 操作Excel 报错：不能设置类 Range 的 HorizontalAlignment 属性

新建一个Excel，然后将指定的单元格中的内容居中，可是一直报错
代码如下：

如果使用下面代码：
1 Range("A1:H1").Select
2 With Selection
3 .HorizontalAlignment = xlCenter
4 End With
则提示第3行缺少对象。
郁闷中.....求各位大牛帮忙。问题解决追加给分。

Answer 1

你以上发的图片的代码没有错啊?你说有错,错误指在哪一行呢?
你有没有,引用EXCEL对象模型?
在VB的菜单,[工程] -- [引用]，在引用对话框里，找到“Microsoft Excel XX.X Object Library”
勾选上，[确定]。

其中： XX.X 取决于你安装的OFFICE 版本。
这样才可以用VB操作excel。

追问

谢谢回答。问题已解决。

Answer 2

xlSheetNew.Range("A1:H1").Select
With Selection
.HorizontalAlignment = xlCenter
End With

追问

谢谢回答。不行的，试过了。

Answer 3

lllll

追问

不要来凑热闹。。