On May 31, 2017, at 9:06 AM, alfidpan wrote:
Dear Michael
我試了一下,沒有問題,是可以執行的,只是很慢很慢,所以我只在程式的前面加了以下這些,
With Application
.ScreenUpdating = False
.StatusBar = False
.Calculation = xlManual
End With
程式的最後也加上這些,速度就比較快。
With Application
.CutCopyMode = False
.ScreenUpdating = True
.StatusBar = True
.Calculation = xlAutomatic
End With
還有一點要建議一下,就是巨集的名稱,可以跟Module內容的名稱統一一下,會比較好找。
就中股來說,收藏按下指定巨集,它顯示"盈再表.xlsm!Macro15",就去找了一下Module15,
沒想到"盈再表.xlsm!Macro15"是寫在Module17裡,因為您的程式真的愈寫愈大,要我們幫忙看,
名稱要好閱讀,可以加速雙方的溝通速度。
|