Range("C2").Select
ActiveCell.FormulaR1C1 = "=RC[-1]+100"
Range("C2").Select
Selection.AutoFill Destination:=Range("C2:C17")
Range("C2:C17").Select
Selection.Copy
Range("B2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Columns("C:C").Select
Application.CutCopyMode = False
Selection.ClearContents
这是我操作的界面:
如果是要一个个输入,那么也简单。比如你要输入3+5,那么,你可以直接在本单元格中输入
=3+5,然后回车即可。
不知道是否是你需要的。
如果希望在其他单元格显示结果,可以追问,这里就不说了。
这个功能必须用宏才能实现
不能,只能通过做宏来做,你为什么非要在本单元格显示?在旁边显示不可以么?做宏也是为了在旁边输入好,加上数字后再放到这一格来。。