如何从工作簿中的不同工作表创buildmacros数据。 Excel VBA

我遇到了一个用于将信息从一个工作表拖到另一个工作表的问题。 我无法弄清楚如何让macros查看“CurrentSchedule”工作簿中的一个不同的工作表。 当我通过第一行（A行）工作表macros时，一切运行顺利，但是当我尝试通过第二行（B行）运行时超时。 它特意被卡在线上

“Order = Range（”W1“）。Offset（Count，0）.Value”

SAPorder = InputBox("Enter SAP Order Number:") ProdLine = InputBox("Enter the sheet# of CurrentSchedule that has this SAP order number. Example: A line = 1; B = 2") End Select Count = 0 'Count is the row in the designated column Flag = True Do While Flag Workbooks("CurrentSchedule.xlsx").Worksheets(ProdLine).Activate Order = Range("W1").Offset(Count, 0).Value If Order = SAPorder Then nme = Range("B1").Offset(Count, 0).Value 

Answer 1

扔掉那个愚蠢的.activate方法学习如何使用这个

 Sheets("sheetName").range("rangeName/rangeRange")[optional].cells("cellRow","cellColumn") 

它会使你的工作更容易，然后你可以使用sheet / range / cell作为对象。

此外，当您使用范围/单元格没有点和父分配，您使用活动工作表，这可能是非常不可预知的。 所以，如果你使用上面提到的完整陈述，你不能犯错误。