Re: [算表] 從另外一個檔案抓值的問題(VBA)
以下是 ex.xls 中 vba 的範例,可以將同一目錄的 data.xls
A1 copy 到 ex.xls 的 A1 中
其他動作自己在加工囉 ....
Dim obApp As New Excel.Application
Filename = ThisWorkbook.Path & Application.PathSeparator & "data.xls"
obApp.Workbooks.Open Filename:=Filename, ReadOnly:=True
With obApp.Workbooks(1).Worksheets(1)
Cells(1, 1) = .Cells(1, 1)
End With
obApp.Workbooks.Close
Set obApp = Nothing
※ 引述《in731016 (丸)》之銘言:
: 軟體:
: excel
: 版本:
: 2003
: 目前想要做的是
: 有一個數據的檔案
: 有一個程式的檔案
: 都是用EXCEL紀錄的
: 數據檔案就是 data.xls
: 程式的譬如叫做 ex.xls
: 目的是想要在 ex.xls 這裡寫巨集
: 按下去之後將 data.xls的值抓到 ex.xls之中
: 請問怎麼寫?
: 是不是要確定 data.xls的檔案位置
: 將來 檔案位置不對就無法讀檔了?
: 想要讓它跟 ex.xls目錄一樣 就能完成讀數據動作 可行嗎?
: 感恩
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.229.90.198
推
03/21 21:30, , 1F
03/21 21:30, 1F
推
03/22 12:14, , 2F
03/22 12:14, 2F
→
03/22 13:05, , 3F
03/22 13:05, 3F
Office 近期熱門文章
PTT數位生活區 即時熱門文章