作者:乔山办公网日期:
返回目录:excel表格制作
工具:来Office2013
方法如下:
在Excel中按下Alt+F11,双击左侧的“Thisworkbook”,选择“Workbook”“Open”事件:
2.在自动生成的代码中自间,输入要开机运行的程序代码:
3.将Excel文件保存为xls或者xlsm等支持VBA的文件类百型,设置“启用宏”;再次打开这个文件,就会自动运行第2步中的代码,如下度图所示:
=INDIRECT("["&B1&".xlsx]记录!A1")
公式成立的前提是:
1、B1单元格不是日期格式,抄而应该是文本格式,因为正常情况下你输入:2018年4月,系统自动会转化为日期格式啦!
2、那个文件当前必须是打开的zd,而且与你正编辑的表格在同一个文件夹里面。
3、那个文件必须要有一个名称为:"记录"的工作表
在Tishworkbook代码zd区,输入:
Private Sub Workbook_Open()
Call 计算色
End Sub
写完代码又奇怪了,你怎么在子程序代专码下,直接加了属个自定义函数代码,我迷茫了。
用户的程序一般都在“模块”里
要想打开excel工作薄后自动执行,
把你的“主控程序”写在
ThisWorkbook对象里(左边,模块的上面,sheet1,sheet2的下面)