printout 方法只需要8個參數
◆打印當前工作表：oExcel.ActiveSheet.PrintOut() &&***八個參數
*參數1-數值：起始頁號，省略則默認為開始位置
*參數2-數值：終止頁號，省略則默認為最後壹頁
*參數3-數值：打印份數，省略則默認為1份
*參數4-邏輯值：是否預覽，省略則默認為直接打印(.F.)
*參數5-字符值：設置活動打印機名稱，省略則為默認打印機
*參數6-邏輯值：是否輸出到文件，省略則默認為否(.F.)，若選.T.且參數8為空，則Excel提示輸入要輸出的文件名
*參數7-邏輯值：輸出類型，省略則默認為(.T.)逐份打印，否則逐頁打印
*參數8-字符值：當參數6為.T.時，設置要打印到的文件名
2.Next提交問題
應該是 Next i 吧