有时,在excel自定义名称之后,单击名称管理器查看,就是找不到excel自定义名称。
如果遇到无法查看excel自定义名称,可以借用下面代码试试。
方法是,按ALT+F11,打开VBE编辑器,插入——模块,复制下面代码,然后按F5键运行。
如果工作薄中有自定义名称就会在名称管理器显示出来,再次运行可以隐藏所有自定义名称。如果没有会提示本工作簿没有定义名称。
Sub excel自定义名称显示和隐藏()
On Error GoTo ERR1
Dim nm As Name
Dim bVisible As BooLEAN
With ThisWorkbook
If .Names.Count > 0 Then
If .Names(1).Visible = False Then bVisible = True
For Each nm In .Names
nm.Visible = bVisible
Next nm
If bVisible Then
MsgBox ("所有名称可见!")
Else
MsgBox ("所有名称隐藏!")
End If
Else
MsgBox ("本工作簿没有定义名称!")
End If
End With
Exit Sub
ERR1:
MsgBox (Err.Description)
End Sub
核心关注:拓步ERP系统平台是覆盖了众多的业务领域、行业应用,蕴涵了丰富的ERP管理思想,集成了ERP软件业务管理理念,功能涉及供应链、成本、制造、CRM、HR等众多业务领域的管理,全面涵盖了企业关注ERP管理系统的核心领域,是众多中小企业信息化建设首选的ERP管理软件信赖品牌。
转载请注明出处:拓步ERP资讯网http://www.toberp.com/
本文标题:excel自定义名称隐藏和显示方法