こんにちは manabu です。(^^)

＞なんとなく答えは出ているのですが（苦笑）、すごく面倒なスクリプトになりそうなので...
＞何かいい方法ご存知ありませんか？　(^^;

うちの社内でこんな方法を取っている人がいたので聞いてみました。

＜方法＞
１．データウィンドウをプレビューモードにする。
　　※印刷させたい用紙設定にしておいてください。
　　※プレビューモードへの切り替えをユーザーに見せたくなければ、
　　　・データストアと共有しそっちで印刷。
　　　・SetRedraw()で描画を禁止。
　　　など、工夫してください。

２．Describe()関数でEvaluate()を使用して、PageCount()関数の評価を行う。

　　例)
　　    dw_print.Describe(\"evaluate(\'PageCount()\', 0)\")

３．データウィンドウのプレビューモードを解除する。

です。
＃ ２の例は試してないので構文に誤りがある可能性があります。(^^;

ものすごく簡単だったりしますので、ぜひ、お試しを。