Excel VBA系列之打開工作簿

1. 如圖,我們在D盤下的test文件夾新建了一個test.xlsx文件,并在文件中的工作表中A1單元格輸入一些信息。

2. 保存并關(guān)閉上面新建的文件,在另外一個Excel文件中打開Visual Basic,添加模塊和過程,稱之為“打開文件”。

Sub 打開文件()

End Sub

3. 在過程中輸入打開工作簿的代碼:

Workbooks.Open:在Workbooks表示工作簿,Open是打開的動作。

如果僅執(zhí)行以上代碼,會報錯。

Sub 打開文件()

Workbooks.Open

End Sub

4. 因此,打開工作簿的動作后面需要加上必要的參數(shù):

Filename:="D:\test\test.xlsx":找到D盤test文件夾下的文件。

Sub 打開文件()

Workbooks.Open Filename:="D:\test\test.xlsx"

End Sub

5. 執(zhí)行以上代碼后,就可以打開文件test.xlsx。

6. 打開工作簿后,我們對其做一些數(shù)據(jù)操作,如在A2單元格輸入“Hi World!”

代碼ActiveWorkbook.Sheets(1).Range("A2") = "Hi World!"表示:在當前活躍的文件下的第一張工作表下的A2單元格輸入信息。

Sub 打開文件()

Workbooks.Open Filename:="D:\test\test.xlsx"

ActiveWorkbook.Sheets(1).Range("A2") = "Hi World!"

End Sub

7. 再次執(zhí)行以上代碼后,可以看到文件內(nèi)容已更新。

8. 對更新的文件進行保存:

ActiveWorkbook.Save:在當前活躍工作簿中執(zhí)行Save保存的動作。

Sub 打開文件()

Workbooks.Open Filename:="D:\test\test.xlsx"

ActiveWorkbook.Sheets(1).Range("A2") = "Hi World!"

ActiveWorkbook.Save

End Sub

9. 關(guān)閉文件:

ActiveWorkbook.Close:在當前活躍工作簿中執(zhí)行Close關(guān)閉的動作。

Sub 打開文件()

Workbooks.Open Filename:="D:\test\test.xlsx"

ActiveWorkbook.Sheets(1).Range("A2") = "Hi World!"

ActiveWorkbook.Save

ActiveWorkbook.Close

End Sub

10. 為避免在執(zhí)行代碼的過程可能出現(xiàn)的彈窗警告顯示,在核心代碼的開始和最后添加取消警告和恢復警告。

Sub 打開文件()

Application.DisplayAlerts = False

Workbooks.Open Filename:="D:\test\test.xlsx"

ActiveWorkbook.Sheets(1).Range("A2") = "Hi World!"

ActiveWorkbook.Save

ActiveWorkbook.Close

Application.DisplayAlerts = True

End Sub

?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
【社區(qū)內(nèi)容提示】社區(qū)部分內(nèi)容疑似由AI輔助生成,瀏覽時請結(jié)合常識與多方信息審慎甄別。
平臺聲明:文章內(nèi)容(如有圖片或視頻亦包括在內(nèi))由作者上傳并發(fā)布,文章內(nèi)容僅代表作者本人觀點,簡書系信息發(fā)布平臺,僅提供信息存儲服務(wù)。

相關(guān)閱讀更多精彩內(nèi)容

友情鏈接更多精彩內(nèi)容