On Error GoTo ma fso.movefile xpath1 & myfile, xpath2. On Error GoTo 0. End If myfile = Dir Loop '……你程序的其他部分. Exit Sub ma: Err.Clear
確定! 回上一頁