2015-08-28 71 views
0

我有類似下面的代碼,我想打開一個文件,而不是關閉它,直到程序結束。在程序結束時關閉文件VBA

Workbooks.Open filename:=file1 
' copy something 

Windows(file2 & ".xlsm").Activate 
'paste something 

在這裏,我想有化妝文件1仍然打開,這裏只激活,順便說一句的Windows(文件1 &「.XLSM」)。激活此行並沒有給預期的結果。 在此先感謝

+0

是否有任何更多的代碼,你可以提供?你得到的錯誤究竟是什麼? – MiguelH

+0

什麼是file1和file2? – Davesexcel

回答

0

試試這個:

dim wb as workbook 
set wb = Workbooks.Open (file1) 
wb.visible = true 
' copy something 

Windows(file2 & ".xlsm").Activate 
'paste something