怎么使用宏把A列的数据复制到B列，然后再数值化A列(A列有公式)。以此类推B列复制到C列，再数值化B列？

Question

如题所述

Answer 1

Sub 宏1()
Range("A2:A8").Select
Selection.Copy
Range("A2:D8").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
两个区域请自行修改。