功能实现：

一、不用with语句，实现填充表格数据；

二、使用with语句，填充表格数据；

一、不用with语句，实现填充表格数据；

1、原始表格数据为空；

2、打开VBE，编写代码：

Sub firstSub()

Range(a1).Value = Who am I?

Range(a1).Parent.Name = go on

Range(a1).Font.Size = 20

Range(a1).Font.Bold = True

End Sub

3、回到Excel界面中，插入--形状，选择一个椭圆；

4、在Excel界面中绘制椭圆；

5、右键选择椭圆，点击 指定宏--选择刚刚定义的宏，并点击确定；

6、执行宏，运行结果如下；

在a1列中填充了Who am I，字体变为20，字体加粗；

表格名称已经被修改；

二、使用with语句，填充表格数据；

1、在VBE中编写代码为：

Sub withSub()

With Range(a1)

.Value = With with withWho am I?

.Parent.Name = With with withgo on

With .Font

.Size = 30

.Bold = True

End With

End With

End Sub

2、在Excel中参照以上方法插入宏，执行宏withSub；

3、执行结果如下所示：

综上所述，本文通过对比 使用with关键字、不适用with关键字两种方法表示了填充表格的方式。

表格属性的表达方式

with关键字的使用方法