在excel指定单元格写数值

a1是变量格 要求是 如果a1为1 则在b1格写1 如果a1为7 则在b7格写7
1 2 3 5楼的都可以答案都可以实现对A1单元格变量的功能 但我希望对A整列都是变量 也能有这样的功能 如图所示 A2变成7时则在B7写入7
注：A列数值的变化范围是0到9

在B1输入公式

=IF(ROW()=A$1,A$1,"")

回车确定，鼠标对准单元格右下角,当出现一个黑色小十字时,同时按住鼠标左键往下拖动填充

补充回答

在B1输入公式

=IF(OR(ROW()=$A$1:$A$10000),MAX(IF(ROW()=$A$1:$A$10000,($A$1:$A$10000))),"")

数组公式，按CTRL+SHIFT+回车三键确定,鼠标移到单元格右下角,当出现一个黑色小十字时，同时按住鼠标左键往下拖动填充

楼主: 我已看过在我这一楼已上的所有回答者的回复，都存在不同程度的缺陷（包括楼上使用的VBA代码）。但我不知道答了会不会白答...

不管那么多了，救人一命胜造七级浮涂, 操作如下:

1. 打开您的Excel文件，然后按Alt + F11键
2. 在左则窗口中的 "MicroSoft Excel 对象"下面找到您正在编辑的工作表, 双击它 (例如您编辑的是sheet1，就双击sheet1)
3. 在右侧空白代码区域中将下面代码复制粘贴进来, 关闭当前窗口反回Excel
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
On Error GoTo er
If Target.Column = 1 And Target.Value <> 0 And WorksheetFunction.IsNumber(Target.Value) Then
Cells(Target.Value, 2) = Target.Value
End If
er:
Application.EnableEvents = True
End Sub

4. 现在您就可以试了...^^，不过试之前最好保存一下

只能用VBA设置了