要实现这样的效果，要怎么搞啊

行走的 · 发表于 2022-12-27 17:44

陆离Lowry · 发表于 2022-12-27 18:00

B3:B5区域数组公式

=OFFSET(信息表!A1,COUNTA(信息表!A:A)-3,,3)

复制代码

gwjkkkkk · 发表于 2022-12-27 23:19

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Rng As Range
If Target.Column = 1 Then
Set Rng = Range(Cells(Rows.Count, "A").End(xlUp), Cells(Rows.Count, "A").End(xlUp).Offset(-2))
Rng.Copy Sheets(2).[B3]
End If
End Sub

gwjkkkkk · 发表于 2022-12-27 23:20

利用Worksheet_Change事件，请楼主参考附件

行走的 · 发表于 2022-12-28 16:39

一个函数，一个代码，都是大神啊，谢谢楼上的两位

		自动登录	找回密码
密码			免费注册

[讨论] 要实现这样的效果，要怎么搞啊

评分