怎样使用VBA返回工作表目录
1、首先在开发工具中打开VBA编辑器
2、在单元格区域当中输入一些内容作为例子
3、在VBA编辑器中插入模块
4、在模块当中输入如下代码,然后运行Private Sub Workbook_SheetActivate(ByVal Sh As Object像粜杵泳) ActiveSheet.Hyperlinks.add Anchor:=ActiveSheet.Cells(1, 1), Address:="", _ SubAddress:=Worksheets("目录").Name & "!A1", ScreenTip:="返回目录", _ TextToDisplay:=VBA.IIf(Cells(1, 1) <> "", Cells(1, 1).Text, "返回目录")End Sub
5、切换工作表进入任意工作表,A1单元格均已建立好链接,单击可返回到“目录”工作表。如果A1有数据,则仍然显示该数据;若A1为空,则添加“返回目录”字符,如图
声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
阅读量:76
阅读量:40
阅读量:78
阅读量:41
阅读量:75