UserVar XY = "100,100|200,200|300,300" "坐标设置 格式:X,Y|X,Y"XY = Split(XY,"|")For i = 0 To UBound(XY) arr = Split(XY(i),",") MoveTo arr(0), arr(1) LeftClick 1 Delay 500 //这里调用子程序Next