VBA怎么编程序：[6]给EXCEL表格添加状态栏

1、新建一个表格，现要在工作表名下侧添加状态栏来显示今天是几月几号，当前位置在哪个表，及其它备注信息。

2、打开VBA编辑器，插入一个模块。

3、输入以下代码：Option ExplicitSub 状态栏()Appli罕铞泱殳cation.StatusBar = "今天是:" & Year(Now()) & "年" & Month(Now()) & "月" & Day(Now()) & "日" & _" 当前位置:" & ActiveSheet.Name & " 【备注】 """End Sub

4、这样，在表格上就显示状态栏了。