Re: [算表] 從另外一個檔案抓值的問題(VBA)

看板Office作者 (windknife18)時間17年前 (2009/03/21 20:12), 編輯推噓2(201)
留言3則, 2人參與, 最新討論串1/1
以下是 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
thanks, i will try
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
文章代碼(AID): #19nDdBjB (Office)
文章代碼(AID): #19nDdBjB (Office)