1. 首頁
  2. 問答
  3. Excel-VBA：從多個關閉的工作簿中拉取數據，文件名以「xxx」開頭

Excel-VBA：從多個關閉的工作簿中拉取數據，文件名以「xxx」開頭

2017-08-28 29 views
1

我想製作一個宏，將多個關閉工作簿中的數據拉入此（ThisWorkbook）工作簿。Excel-VBA：從多個關閉的工作簿中拉取數據，文件名以「xxx」開頭

所有關閉的工作簿都在同一個文件夾 - 但也有它不應該從中拉取數據的文件。

所以只有文件名中以「0101」開頭的文件。

我想從A1：D18複製FIRST工作簿第一張表中的數據，並將它放到活動工作表上的ThisWorkbook A1單元格中。其餘的我只想複製C3並將其放入一個變量中。如果有多個文件，那麼它應該將所有的C3值組合到同一個變量中。

這可能嗎？

非常感謝你提前！

來源

2017-08-28 ga7t

+1

你到目前爲止嘗試過什麼？ –

+0

我沒有真正嘗試過。我不知道這樣做的方法。我知道如何複製和粘貼等。但循環/數組並不是我所知道的。然而， – ga7t

+2

我們不會爲您編寫代碼，但是當您被困在代碼中的某個點時，我們將幫助您。搜索關於這個主題的一些教程，並嘗試在那裏找到的示例代碼。如果遇到困難，請使用相關代碼，當前行爲（錯誤等）更新您的問題，期望的行爲以及您迄今嘗試解決的問題。 –

回答

1

這將打開所有的Excel文件開頭的0101：

Sub StringLoopOpen() 

Dim folder As String 
Dim file As String 

folder = "C:\foo\bar" 
file = Dir(folder & "\0101*.xlsx") 

Do While file <> "" 
Workbooks.Open Filename:=folder & "\" & file 
file = Dir 
Loop 

End Sub

如果需要執行其他任務（如移動數據，關閉文件等）做在之間「做，而」和「循環」。

來源

2017-08-31 01:16:30

相關問題

 相關問題