Question

在excel中，如何用宏代码实现sheet2里的数据随着sheet1里的数据的改变而改变

张三 45分
李四 26分
赵五 86分

列如sheet1中A1"张三" B1输入"45分"
但是sheet2中张三的位置发生变化
“45分”能否自动同步显示在相对应的单元格内
sheet1中有几百个姓名
但是sheet2与sheet1姓名一样 但是名次位置是混乱的
求教各位高手 谢谢了

Answer 1

用VLOOKUP函数就行了，名次位置是混乱没有关系的。在sheet2的
B2=VLOOKUP(A2,sheet1!A:B,2,0)
下拉就行了。这能按照A列的关键字，将sheet1的B列数据引用了。

Answer 2

Vlookup可以帮到你。
但你题目要用宏，那就草写个宏吧。
WorkSheet事件宏。

Private Sub Worksheet_Change(ByVal Target As Range)
Dim s
Set s = Sheets(2).Range("A:A").Find(Cells(ActiveCell.Row - 1, ActiveCell.Column - 1), LookIn:=xlValues)
If s Is Nothing Then
Else
Sheets(2).Cells(s.Row, 2) = Cells(ActiveCell.Row - 1, ActiveCell.Column)
End If
End Sub