您好希望一切都很好:) 遇到问题搞清楚如何循环并选择下一个单元格 所以当范围H3细胞:Z3是空的,将停止:)循环,并选择下一个单元格Excel宏
和它正在做的是从h3中选择值粘贴在b3中运行另一个宏,它给出了e3中的订单号,然后复制并粘贴到h4中,然后它将转到I3中的下一个单元格中粘贴b3复制结果E3和粘贴I4,做同样的
感谢
For Each cell In Range("H3:Z3")
If IsEmpty(cell.Value) Then Exit For
'select ammount and place in lookup
Range("H3").Select
Selection.Copy
Range("B3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
' fill in order numbers
bulkON_Click
'select order and past under postcode
Range("E3").Select
Application.CutCopyMode = False
Application.CutCopyMode = False
Selection.Copy
Range("H4").Select
ActiveSheet.Paste
Loop
你的问题是什么? – Joe 2013-02-22 02:33:28