標題: [發問] 如何關閉程式碼視窗 [打印本頁]

---

作者: av8d    時間: 2023-1-5 20:40     標題: 如何關閉程式碼視窗

按下Alt+F11會開啟程式碼視窗

執行程式碼時也會自動開啟程式碼視窗

請問該如何執行程式碼後，關閉程式碼視窗，謝謝！

---

作者: Emily    時間: 2023-1-7 11:02

1. Sub CloseAllVBEWindows()
   
2. ' Written by HansV , https://eileenslounge.com/viewtopic.php?t=19961
   
3.     Dim i As Long
   
4.     With Application.VBE.Windows
   
5.         For i = .Count To 1 Step -1
   
6.             With .Item(i)
   
7.                 If .Type <= 1 Then ' 0 = vbext_wt_CodeWindow, 1 = vbext_wt_Designer
   
8.                     .Close
   
9.                 End If
   
10.             End With
    
11.         Next i
    
12.     End With
    
13. End Sub

複製代碼

---

作者: av8d    時間: 2023-1-9 02:11

回復 2# Emily

原來真的有這功能，謝謝前輩。

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)