Excel VBA 的小技巧 - 03

有幾個指令在程式自動化中,可以善加運用,好增進程式的運作效能及美觀。

Application.ScreenUpdating = False  ' turn off the screen updating

Application.ScreenUpdating = True   ' turn on the screen updating

 

ActiveWindow.FreezePanes = True

ActiveWindow.FreezePanes = False

 

Application.DisplayAlerts = False

Application.DisplayAlerts = True

 

之前【Excel VBA 的小技巧 - 02】文章提到,要在不同的活頁簿中切換,可用 Activate 來處理,好切換到指定名稱的活頁簿。
例如:
    從現在使用中的活頁簿,切換到 Excel3 的 Sheet2
         Workbooks("Excel3").Sheets("Sheet2").Activate

    從現在使用中的活頁簿,切換到 Excel1 的 Sheet1
         Workbooks("Excel1").Sheets("Sheet1").Activate

    若是,切換不同活頁簿的過程中,沒有特別要切換到不同的工作表,那麽可以用 Windows().Activate 來簡化。
         Windows(strExcelSource).Activate

沒有留言: