当前位置: 主页 > Office办公 > Excel专区 > Excel函数 > 如何修改Excel状态栏的显示信息

如何修改Excel状态栏的显示信息

  • 2023-02-12
  • 来源/作者: Wps Office教程网/ 菜鸟图库
  • 149 次浏览

在Excel VBA中,如果需要修改Excel状态栏的显示信息以方便用户的操作体验,可通过VBA修改Excel状态栏的显示信息。Excel2003可通过VBA宏修改Excel状态栏的显示信息。

修改Excel状态栏的显示信息的方法:

首先按“Alt+F11”组合键,Excel2003打开代码编辑器,单击“插入”菜单-“模块”,双击插入的模块,在右侧的代码窗口中输入:
Sub Excel_Partner()
Dim cel As Range, myRange As Range, myAddress As String
Cells.Clear
Set myRange = Sheet1.Range("A1:M500")
For Each cel In myRange
myAddress = cel.Address(RowAbsolute:=False, ColumnAbsolute:=False)
Application.StatusBar = "正在计算单元格 " & myAddress & " 的数据…"
cel.Value = cel.Value + 1
Next
Application.StatusBar = False
End Sub

按F5运行键运行程序,即可修改Excel状态栏的显示信息。