麻辣家族討論版版 » Excelㄧ般區 » 跨檔案抓取欄位的值

返回列表下一主題上一主題發帖

跨檔案抓取欄位的值

小學生 Rank: 1

帖子: 2
主題: 1
精華: 0
積分: 8
點名: 0
作業系統: ad
軟體版本: ds
閱讀權限: 10
性別: 男
註冊時間: 2012-9-12
最後登錄: 2012-9-22

1^# 跳轉到 » 正序看帖

字體大小: tT

發表於 2012-9-13 23:07 | 只看該作者

跨檔案抓取欄位的值

請教高手,我是程式新手,所以問的問題很白痴請見諒{:3_61:} ,
我想要從不同的檔案之間,抓取某個值放到Ａ檔案,我在A檔寫VBA請問應該如何寫呢?
在不打開來源檔的情況下...{:3_55:}

Sub TEST()
Range("A1").Value = "='d:\downloads\[a.xls]Sheet1'!B1"
Range("A2").Value = "='d:\downloads\[b.xls]Sheet1'!B1"
Range("A3").Value = "='d:\downloads\[c.xls]Sheet1'!B1"
End Sub

收藏

小學生 Rank: 1

帖子: 2
主題: 1
精華: 0
積分: 8
點名: 0
作業系統: ad
軟體版本: ds
閱讀權限: 10
性別: 男
註冊時間: 2012-9-12
最後登錄: 2012-9-22

3^#

發表於 2012-9-13 23:51 | 只看該作者

回復 2# white945

這樣寫並沒有留下公式耶,可以執行,可是每次執行都會跑出三次視窗,詢問A/B/C.XLS檔的位置

小學生 Rank: 1

帖子: 23
主題: 0
精華: 0
積分: 31
點名: 0
作業系統: Win7
軟體版本: 20xx
閱讀權限: 10
性別: 男
註冊時間: 2012-8-11
最後登錄: 2012-8-28

2^#

發表於 2012-9-13 23:29 | 只看該作者

回復 1# kolin2009

這樣不是就寫入公式了嗎?
如果不想留下公式
多一行
[A1:A3]=[A1:A3].Value
這樣就只剩下值，不含公式

靜思自在 : 小事不做、大事難成。

返回列表下一主題上一主題