Excel VBA---之with语句用法

用with关键字来实现对Excel表格的简易操作。

with:当需要执行重复操作时，可以使用with来简化操作。

工具/原料

 

• Excel软件

方法/步骤

 

1. 1

   功能实现：

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

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

2. 2

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

   1、原始表格数据为空；

   
3. 3

   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

   
4. 4

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

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

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

   

   

   
5. 5

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

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

   表格名称已经被修改；

   
   END

方法/步骤2

 

1. 1

   二、使用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. 2

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

   3、执行结果如下所示：

   
3. 3

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