返回列表 上一主題 發帖

[發問] 如何關閉程式碼視窗

[發問] 如何關閉程式碼視窗

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

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

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

  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
複製代碼

TOP

回復 2# Emily

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

TOP

        靜思自在 : 要批評別人時,先想想自己是否完美無缺。
返回列表 上一主題