2017-10-05 60 views
-3

我有2個工作簿,我需要將列從一個工作簿複製到另一個基於另一列的匹配值在這兩個工作簿類似。我無法應用查找或任何其他解決方案,請幫助我與上述問題的VBA代碼。我有2個工作簿,我需要根據匹配值將列從一個工作簿複製到另一個工作簿

+0

發佈您迄今爲止編寫的代碼,以便我們提供幫助。 – AntiDrondert

+0

我試圖寫,但它不能很好地幫助我的邏輯和代碼。 –

+0

你能否至少添加一個你擁有什麼樣的東西以及你想要的東西(如果它是私人的,則使用虛擬數據)?至少可以說這個問題還不清楚。 – AntiDrondert

回答

0

從我可以告訴你的問題你想從一個工作簿重複值到另一個。我會建議的是下面的代碼附加到一個按鈕。在本例中,下面的代碼將匹配從A到I的每列。它對資源的重要性要低得多,但如果你想要的日期不是美國的順序,你需要額外的代碼。

Sub NewButton() 
Dim wb As Workbook 
Dim wb2 As Workbook 
Dim ws As Worksheet 
Dim ws2 As Worksheet 

Set wb = ThisWorkbook 
Set ws = wb.Worksheets("Sheet 1") 
Set wb2 = Workbooks.Open("File Directory of second workbook") 
Set ws2 = wb2.Worksheets("Sheet 1") 

    ws.Range("A:I") = ws2.Range("A:I").Value 

End Sub 
+0

我需要複製基於其他單元格值匹配的值,所以請修改 –

+1

,而不是9行代碼ws.Range(「A:I」)= ws2.Range(「A:I」 ).Value' – jsotola

+0

你需要提供更多的信息,然後我提供的是從你提到的很少的一個猜測。提供你的代碼的細節,我們可以看看。 – Kyoujin

相關問題