如何解决获取最后一个停用的工作表
Private Sub Worksheet_Deactivate()
MsgBox(worksheet.Name)
End Sub
按下感兴趣的工作表以外的任何工作表后,如何获得最后一个停用的工作表。
解决方法
- 您首先在
L
代码模块(在声明区域)之上创建一个Public
变量:
ThisWorkbook
- 将下一个代码放入
Public lastSheetName As String
事件(也在Workbook_SheetDeactivate
代码模块中):
ThisWorkbook
- 然后,您可以使用简单的
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object) lastSheetName = Sh.name End Sub
或在另一个事件代码中返回最后一个停用工作表的名称。尝试将下一个代码粘贴到标准模块中并运行它。当然,在您停用至少一张纸后...
Sub
3.a 或者把同样的代码放到 Sub LastDeactivatedSheet()
MsgBox ThisWorkbook.lastSheetName
End Sub
事件中,这样:
Workbook_SheetActivate
每次激活另一个工作表时,它都会通知您来自哪个工作表...
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。