HSPTV!掲示板

HSP3でエクセルシートを作成してデータを入れた後
１ページに印刷ってやりたいのですが、PageSetup.Zoomに0(False)入れられません。
エクセルの作成等は省略しますが

;xlPrintset シートを１ページに収まるように設定する
#deffunc xlPrintset
xlSheets = xlSheet("PageSetup")
xlSheets("Zoom") = 0 ;１ページに収める
xlSheets("FitToPagesTall") = 1 ;横１ページ
xlSheets("FitToPagesWide") = 1 ;縦１ページ
xlSheets("Orientation") = 2 ;横印刷
return

数字の10〜400ならエラーにならないのですが、１ページに収める
Falseの設定方法教えて下さい。

これでエラーは出ないと思いますが、いかがでしょうか。

dimtype v,vartype("variant"),1;vをvariant型で宣言
v("value") = 0;値はFALSE
v("vartype") = $b;型をVT_BOOLに設定
xlSheets("Zoom") = v ;１ページに収める