子abc
維度j%，x%
對於j=1到範圍(" H60000 ")。結束(3)。排
對於x=1到範圍(" AT60000 ")。結束(3)。排
if範圍(" H " & ampj)= range(" AT " & amp；x)然後
範圍(" N " & ampj)= range(" AU " & amp；x)
為...退出
如果…就會結束
下壹個x
下壹個j
Alt +F8選擇abc來運行宏。