開啟一個空白頁將資料丟到word中(無表格)，然而我的需求一次不只一頁 但問題來了，因為word要本頁行數滿了之後才會到下頁去。 我如何在本頁資料丟完後就到下頁去、或是可以抓到目前的行數， 還是各位有什麼樣高見，拜託囉~~~~

Selection.InsertBreak Type:=wdPageBreak 這是從word錄下的巨集程式碼 透過com的方式去操控word就是把這個巨集轉換到delphi中用pascal去寫出來, word不一定要填滿整頁才能跳頁, 上述的做法就是插入分隔設定,分隔設定類型為分頁... 唉...MS雖然大家罵歸罵 不過他能把vba整合到office中,這只能說 高.....啊.... 一鞠躬 再鞠躬 三鞠躬

版主請問一下妳的office是xp嗎??因錄出來的巨集不太一樣(但這不是重點) Selection.InsertBreak Type:=wdPageBreak ~~~~~ 在delphi中該如何改....

這個可能要很大篇幅喔    你可以試著搜尋ktop上文章,    我的office是2000的    看了你的發問原本以為你已經會在delphi中遙控word了...    開啟一個空白頁將資料丟到word中(無表格)

關於我會問到office的版本是因為我的也是2000但巨集錄出來程式碼如下： Selection.InsertBreak Type:=wdSectionBreakNextPage 但都是沒問題的...... 剛的問題我也已經解決了，我po上來大家研究研究 var type_:OleVariant; type_:=wdPageBreak;//wdSectionBreakNextPage也行 Selection.InsertBreak(type_); 爾後巨集中如有出現Type:=#### 此方法應該都能解決

銘謝賜分 不過要感謝的還是MS的整合功力... 雖然一直以來都是整合他們家的東西最勤快... 這好像是廢話