Question

我有一本工作簿，其中的数字列如图所示。
1st Workbook

我需要能够复制C2中的单元格并打开第二个工作簿，并在E列中找到该数字，如图所示。
2nd Workbook

找到数字后，我需要它向右偏移三个单元格并在H列中选择相应的“按需订购”数量。然后，选择该单元格并返回到原始工作簿，并将其粘贴到它右侧的相应列中。我需要它来遍历所有数字，即使有空白单元格也要继续遍历。一旦连续遇到超过5个空单元格，则结束循环。

这是我尝试过的：

    Windows("Framer 2 and Underbody.xlsx").Activate
Range("C2").Select 
ActiveCell. Copy
Windows("DataFile_1.csv").Activate
Columns("E:E").Select
Selection.Find(What:="ActiveCell", After:=ActiveCell, LookIn:=xlFormulas, _
    LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
    MatchCase:=False, SearchFormat:=False).Activate
ActiveCell.Offset(0, 3).Select
ActiveCell.Copy
Windows("Framer 2 and Underbody.xlsx").Activate
ActiveCell.PasteSpecial

带循环的Range.Find方法

0 个答案: