Excel VBA---之with语句用法

 时间:2026-02-14 12:25:31

1、功能实现:

一、不用with语句,实现填充表格数据;

二、使用with语句,填充表格数据;

2、一、不用with语句,实现填充表格数据;

1、原始表格数据为空;

Excel VBA---之with语句用法

3、打开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

Excel VBA---之with语句用法

4、回到Excel界面中,插入--形状,选择一个椭圆;

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

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

Excel VBA---之with语句用法

Excel VBA---之with语句用法

Excel VBA---之with语句用法

5、执行宏,运行结果如下;

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

表格名称已经被修改;

Excel VBA---之with语句用法

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

Excel VBA---之with语句用法

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

3、执行结果如下所示:

Excel VBA---之with语句用法

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

  • 如何用VBA新建工作表
  • 如何用VBA删除工作表
  • 怎样使用VBA设置单元格的背景颜色?
  • VBA代码0007:VBA实现单元格公式输入和向下填充
  • Excel表中如何用VBA读取单元格数据
  • 热门搜索
    格陵兰旅游 通辽旅游 凤阳旅游 驴妈妈旅游网官网 中山旅游景点 广西防城港旅游 云南旅游路线图 张家界凤凰旅游 甘南旅游景点 黄山旅游攻略二日游