PrivateSubWorksheet_Change(ByValmyAsRange)OnErrorResumeNextWith***.worksheetfunctionif***.column=1ThenForEachrngInRange([a2],[a65536].End(xlUp))Ifrng<>""Thenrng(1,... Private Sub Worksheet_Change(ByVal my As Range)On Error Resume NextWith ***.worksheetfunctionif ***.column = 1 ThenFor Each rng In Range([a2], [a65536].End(xlUp))If rng <> "" Then rng(1, 2) = .VLookup(rng, Sheets("S1").Range("A:C"), 2, 0)If rng <> "" Then rng(1, 3) = .VLookup(rng, Sheets("S1").Range("A:C"), 3, 0)NextEnd IfEnd WithEnd Sub
上面的一段Excel VBA 代码中rng(1, 2)与 rng(1, 3)分别代表什么意思,谢谢。