1、首先我们打开一个工作样表作为例子。
2、我们可以看到excel2013中标题栏位置修改为中央位置,默认的名字为文件名+excel字符串。这是默认设置,而我们使用vba可以定制我们的信息栏。
3、使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码:Option ExplicitSub setcap()Application.Caption = "信息管理系统"ActiveWindow.Caption = vbNullStringEnd Sub
4、运行这段代码,我们可以看到实际的效果,原有的标题栏发生了改变,文件名被替换成了信息管理系统,而后缀尾巴excel则替换为空字符串vbnullstring。
5、所以我们知道了application是指的文件,而activewindow指的是窗口,但是修改application并不会改变实际存放在硬盘上的文件名。重新打开文件也会恢复原有的名称。
6、所以我们应该将3步骤中的代码修改为动作,每次打开文件时执行一次,那么就可以达到我们修改文件标题栏的目标了。
7、先写到这里了,谢谢大家的观看。祝大家生活愉快。小编还有许多其他的经验可以观看,如果无法解决问题可以联系小编进行咨询。看不清楚图片的可以点击放大再看哦。