[發問] 幫忙註解一下，謝謝!

olisun

幫忙註解一下，謝謝!
Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address <> "$E$2" Then Exit Sub
Dim i&, Myr&, col%, Arr, Arr1(1 To 6, 1 To 12), Arrth
Application.ScreenUpdating = False
Myr = Sheets("成交客戶").[a65536].End(xlUp).Row
Arr = Sheets("成交客戶").Range("a3:r" & Myr)
Arrth = Sheets("退戶客戶").[a1].CurrentRegion-------這一句是甚麼意思
For col = 1 To UBound(Arr, 2) Step 6-------這一句是甚麼意思
    For i = 1 To UBound(Arr)-------這一句是甚麼意思
        If Arr(i, col) = "" Then Exit For
        If Arr(i, col) < Target.Value Then

olisun

謝謝二位大哥的解說