请帮我翻译下 VBA中这个程序是什么意思

ActiveWindow.SmallScroll Down:=-12
Range("K3:K7").Select
Range(Selection, Selection.End(xlDown)).Select
ActiveWindow.SmallScroll Down:=9
Selection.Copy
Range("J3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Range("I3").Select

ActiveWindow.SmallScroll Down:=-12 '活动窗口向上滚动12行
Range("K3:K7").Select '选择K3:K7单元格
Range(Selection, Selection.End(xlDown)).Select '如果K3:K7都有数据,继续选择K7下面有数据的单元格到空为止
ActiveWindow.SmallScroll Down:=9 '活动窗口向下滚动9行
Selection.Copy '复制选择的单元格
Range("J3").Select '选择J3
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False '将复制的单元格选择性粘贴值到J3
Application.CutCopyMode = False '取消复制状态
Range("I3").Select '选择I3单元格
温馨提示:答案为网友推荐,仅供参考
第1个回答  2014-10-04
选择单元格

复制性粘贴——值
相似回答