Excel使用宏操作另一个Excel文件

#使用宏在一个Excel文件中操作另一个Excel文件。
办公软件中使用宏处理一些信息,尤其是大量的重复信息,可以提高效率。

操作过程结构如下:

Dim strFilePath As String
Dim strFileName As String
Dim strFile As String
Dim excel As Object
Dim sheet As Object
Dim Workbook As Object

‘The target file
strFileName = "test_out.xls"
strFilePath = Me.Parent.Path
strFile = strFilePath & "\" & strFileName

‘STEP 0: proof the existence of excel file
If Dir(strFile) = "" Then
MsgBox "The target file:" & vbCrLf & _
strFile & vbCrLf & _
"is NOT exsit!"
Exit Sub
End If

‘STEP 1: open the excel file
Set excel = CreateObject("excel.application")
Set Workbook = excel.Workbooks.Open(strFile)

‘STEP 2: find the needed sheet
Set sheet = Workbook.ActiveSheet

‘STEP 3: process
MsgBox sheet.Range("a1").Value

sheet.Range("a2").Value = "sunyt"

‘STEP 4: close file
‘ : to save file firstly
Workbook.Save
Workbook.Close
excel.Quit
Set sheet = Nothing
Set Workbook = Nothing
Set excel = Nothing

office办公软件入门基础教程 » Excel使用宏操作另一个Excel文件

本文链接:【Excel使用宏操作另一个Excel文件】https://www.officeapi.cn/24824.html

OFFICE,天天学一点,进步多一点

联系我们