程序中的Cells(Target.Row, "B") = wb.Sheets(1).Cells(3, "B")会再次触发Worksheet_Change事件，导致反复运行 可以把If Target <> "" Then改为If Target <> "" and target.column<>2 Then
