是想快速输入公式吗?
先选择要输入公式的行,比如选中第2行,如果是多行,可按住Ctrl键再选择其它行,然后输入等号,鼠标再单击刚才输入等号的上方单元格,再按Ctrl+Enter
或者直接选第2行,输入 =A1 ,再按Ctrl+Enter ,再将第2行整行粘贴到需要输入公式的其它行
补充:
你连整行都不想选,哪你还是使用VBA来处理吧,按Alt+F11,左侧插入“窗体”,在右侧粘贴如下代码,然后,菜单栏工具--宏--宏--建立公式--执行:
Sub 建立公式() '下方的10000是你需要列公式的最后行号
Dim n: Range("A2").Select: ActiveCell.FormulaR1C1 = "=R[-1]C": Range("A2").Select
Selection.AutoFill Destination:=Rows("2:2"), Type:=xlFillDefault: Rows("2:2").Select: Selection.Copy
For n = 4 To 10000 Step 2: Rows(n & ":" & n).Select: ActiveSheet.Paste: Next n: Range("A2").Select
End Sub
追问蓝色单元格序号填入与白色单元格序号相同的数!
追答只是一列就没必要用VBA了,选定需要输入序号的区域--菜单栏编辑--定位--定位条件--点击空值--确定,然后输入等号,鼠标点击输入等号的上面一个单元格,再按Ctrl+Enter即可