Excel 如何实现点击sheet1!任一单元格,该单元格所在行的第一个单元格内容自动转到sheet2!B10单元格,同时

2024-11-30 11:52:37
推荐回答(3个)
回答(1):

看起来得用宏了,比较麻烦。但是,提问者好像是在分拣数据,不妨直接用排序和一些相关的函数吧?

回答(2):

alt+f11 以下代码放在sheet1内
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim r
r = Target.Row
If Sheet2.Range("b10") = "" Then
Sheet2.Range("b10") = Cells(r, 1)
Else
Sheet2.Cells(Sheet2.Range("b65536").End(3).Row + 1, 2) = Cells(r, 1)
End If
End Sub

回答(3):

这样只有用EXCEL VBA编程了 ,如果要筛选数据建议用函数公式VLOOKUP