Excel VBA之Sub中的方法操作

2025-05-21 19:53:52

1、代码展示:'代码换行:(下划线+空格+回车)Sub hello(拘七呷憎)Debug.Print Sheet1.Name '输出表名Debug.Print Sheet1.伊怕锱鳏Range("a1").Value '输出第一列的值Sheet1.Name = "基础信息表" '设置表名Sheet1.Range("c1").Value = "年龄" '设置c1列的值End Sub以上代码功能:输出了表名、列名,设置了表名和列名。其中,属性说明:Sheet1.Name :表名Sheet1.Range("a1").Value :列名Sheet1.Range("a1:a10").Value :a1:a10列;

2、调用Sub中的方法,包括如下:选择:select复制:copy删除:delete

3、一、调用Select()方法:1、在Excel界面中,没有任何行被选中;

Excel VBA之Sub中的方法操作

4、编老揉孟阼写代码:调用Select()方法:在VBE中输入代码:Sub selectSub()Range("a1:a10").SelectEnd Sub

Excel VBA之Sub中的方法操作

5、调用刚刚定义的宏;如下图所示,则对应的a1:a10行被选中。

Excel VBA之Sub中的方法操作

6、二、调用copy()方法:4、查看表1中的数据:

Excel VBA之Sub中的方法操作

7、在VBE中输入代码:Sub copySub()Sheet1.Range("a1:a10") = 90Sheet1.Range("a1:a10").Copy Sheet2.Range("a1")End Sub

8、调用该宏copySub;执行后,两个表格的变换如下:

Excel VBA之Sub中的方法操作
Excel VBA之Sub中的方法操作
Excel VBA之Sub中的方法操作

9、三、调用删除方法:delete()7、查看工作簿中的表格数;

Excel VBA之Sub中的方法操作

10、在VBE中输入代码:Sub deleteSub()Sheets(3).DeleteEnd Sub

11、调用该宏deleteSub;执行后,则第三个表格被删除;

Excel VBA之Sub中的方法操作

12、综上所述,通过在VBE中编写代码,可以调用方法,直接对工作簿中的对象,如工作表、列、数据进行操作。

声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
猜你喜欢