返回列表 上一主題 發帖

[發問] 如何切換工作表時，中斷程式？

av8d

帖子
703 
主題
276 
精華
0 
積分
1005 
點名
1  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2024-5-29 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2023-3-7 17:12 | 只看該作者

[發問] 如何切換工作表時，中斷程式？

我嘗試撰寫

If Sheets(2).Activate = True Then Exit Sub

但是他會直接幫我選取Sheets(2)這個工作表
收藏 分享

av8d

帖子
703 
主題
276 
精華
0 
積分
1005 
點名
1  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2024-5-29 
3#
發表於 2023-3-8 15:23 | 只看該作者
回復 2# Andy2483

對，網路上找了許久，原來是我沒找對關鍵詞，謝謝前輩的耐心幫忙。

TOP

Andy2483
　暱稱: 厚臉皮的學生

大學生Rank: 4

帖子
1446 
主題
40 
精華
0 
積分
1470 
點名
0  
作業系統
Windows 7 
軟體版本
Excel 2010 & 2016 
閱讀權限
50 
性別
男 
來自
台灣 
註冊時間
2020-7-15 
最後登錄
2024-10-21 
2#
發表於 2023-3-8 07:22 | 只看該作者
回復 1# av8d


    謝謝前輩發表此主題
後學藉此帖學習到了.Index,謝謝前輩
後學認為前輩可能是某個程式碼在Sheets(2)不想要讓繼續執行,建議以下方案:

Sub Test()
If ActiveSheet.Index = 2 Then Exit Sub
'↑如果現在啟用的工作表索引編號是 2? 就結束程式執行
'https://learn.microsoft.com/zh-tw/office/vba/api/excel.worksheet.index
End Sub
用行動裝置瀏覽論壇學習很方便,謝謝論壇經營團隊
請大家一起上論壇來交流

TOP

        靜思自在 : 盡多少本份，就得多少本事。
返回列表 上一主題