2、选择查看代码
3、点击倒三角,选择Worksheet
4、点击右边倒三角,选择触发方式,如BeforeDoubleClick表示在双击鼠标左键时触发
5、点击候出现如下代码框架
6、输入以下语句:Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)意为将A1、B1单元格求和并放在C1单元格
7、点击保存,然后关闭VBA窗口
8、由于A1,B1没有数据,所以C1为0
9、输入数据后,会发现即使按了回车,C1也不变,因为设置的是双击鼠标左键触发。
10、就可以用EXCELVBA保存文件了。
1、桌面上第一章中的每个工作簿名称放置到工作表中。
2、新建一个工作簿,将其命名为“第一章目录”,按alt+f11组合键,打开宏界面。
3、在VBA中,单击插入按钮,点击插入菜单下的模块,即可新建模块,系统默认为模块。
4、使用do~~loop循环语句,在VBA中输入。
5、返回名为“第一章目录”的工作簿中,按alt+f8组合键,d出宏对话框。
6、点击宏对话框中的执行按钮,宏对话框自动关闭,代码自动执行,即第一章中的每个文件夹名称全部显示在工作表sheet1中。最后根据自己的需要调整格式即可。
1、首先,找到要进行 *** 作的Excel表格,右键单击Excel图标,然后在d出的右键菜单中选择打开命令。
2、从打开的工作簿左下角的工作表标签可知,该工作簿默认生成工作表为一个。
3、按下组合键Alt+F11,即可快速调出VBA窗口。
4、在VBA界面中单击菜单栏中的插入,选择模块命令,此时会d出一个另存为的模块窗口。
5、在另存为的模块窗口中复制粘贴以下代码:
SubNew_worksheet()
Sheets(1).Select
Worksheets.Add
EndSub
则会另存为sheet2工作表了。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)