我想在我的作業簿上的每個作業表上添加一個按鈕，該按鈕隱藏活動作業表并回傳到上一個作業表。我已經嘗試了以下代碼，但它只能回傳到上一張表。我對VBA不熟悉。
我應該如何修改代碼，以便在回傳之前隱藏活動作業表？
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
Set LstSht = Sh
End Sub
Public LstSht As Worksheet
Sub GoToLast()
LstSht.Activate
End Sub
uj5u.com熱心網友回復：
控制元件的.Visible屬性WorkSheet是否隱藏。這是有關如何使用它的 Microsoft 檔案：https ://docs.microsoft.com/en-us/office/vba/api/excel.worksheet.visible
uj5u.com熱心網友回復：
對于那些關注這個問題的人；我解決了我的問題，對我的代碼進行了一些修改，如下所示：1-轉到上一張表，2-隱藏上一張表（第二步是之前隱藏活動表，現在是上一張表）。
你可以試試這個：
在本作業簿中；
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
Set LstSht = Sh
End Sub
在模塊中；
Public LstSht As Worksheet
Private Sub GoToLast()
LstSht.Activate
End Sub
Private Sub HidePrvSht()
ActiveWorkbook.Worksheets(LstSht.Name).Visible = False
End Sub
Sub HideNGo()
Call GoToLast
Call HidePrvSht
End Sub
特別感謝TehDrunkSailor :)
轉載請註明出處，本文鏈接：https://www.uj5u.com/qukuanlian/410932.html
標籤：
下一篇：如何計算一個點是否在一個圓內