① 如何word中用VBA打開Excel表格,讀取其中的內容寫入到Word
在word vba工具-引用中復選中Ms Excel就可以正制常打開EXCEL進行操作了
Dim xlapp As Excel.Application 『代表excel程序
Dim wkBook As Excel.Workbook '代表excelworkbook(也就是excel工作簿文件 .xls .xlsx)
Dim wkSheet As Excel.Worksheet '代表excel的工作頁
xlapp.Application.EnableEvents = False '禁止宏等提示的運行
Set wkBook = xlapp.Workbooks.Open(ExcelFileName)
② EXCEL如何使用VBA打開相對路徑下的文件或文件夾
打開文件如下:
Workbooks.Open ("C:對賬單對帳單.xlsx")
這里你可以把「C:對賬單」換成你的絕對路徑,
你可以用:a = ThisWorkbook.Path
a = ThisWorkbook.Path
Workbooks.Open ("" & a & "&" "&對帳單.xlsx")
來獲取你當前表的絕對路徑,然後再打開,因為不知道你的具體情況,如果有問題可以hai我
如果當前文件夾下還有A文件夾可以用代碼:
Workbooks.Open ("" & a & "&" A"&b.xlsx")
③ excel的VBA關於如何後台打開工作簿並讀取裡面的數據問題(高手進)
1、定義新的Excel.Application對象(Dim EA as new Excel.Application)
2、新的Excel.Application隱藏(EA.Visible=False)
3、SET WB=EA.Workbook.open(」G:\1.xls」)'(WB事先定義成Wordbook對象:Dim WB as new workbook)
4、Var1=WB.Sheets(1).cells(2,2)
5、WB.Close False
6、SET EA=nothing
④ vba打開excel文件(帶密碼)
打開帶密碼的文抄件,你需將密碼作為參數來打開文件。
Open( _FileName_ , _UpdateLinks_ , _ReadOnly_ , _Format_ , _Password_ , _WriteResPassword_ , _IgnoreReadOnlyRecommended_ , _Origin_ , _Delimiter_ , _Editable_ , _Notify_ , _Converter_ , _AddToMru_ , _Local_ , _CorruptLoad_ )
其中:
_password_ 包含打開受保護工作簿所需密碼的字元串。 如果省略此參數並且工作簿需要密碼,則會提示用戶輸入密碼。
_writerespassword_ 包含寫入防寫的工作簿所需密碼的字元串。 如果省略此參數並且工作簿需要密碼,則將提示用戶輸入密碼。
用逗號分隔參數時需要注意參數的位置
也可用password:="XXXX"指明參數名稱