vba 对象变量或with块未设置是设置错误造成的，解决方法为：

1、首先打开excle软件，在菜单中选择“开发工具”-》“Visual Basic”,进入VBA的编程界面。

2、选择一个对象，这里选择sheet1，新建一个子过程setobgjs。

3、首先是声明对象变量，通过Dim来声明，和普通变量的声明很类似，只不过是数据类型变为了Object,如：Dim obj1 As Object。

4、设置该对象变量的值，可以通过set方法来设置，如Set obj1 = Range("A1")。

5、对这个对象所表示的边框设置底色，为黄色。

6、最后选择“运行”按钮运行。