- サマリ: 縮小拡大のページ設定について
- 環境: Calc
- 状態: 解決
- 投稿者: sato?
- 投稿日: 2005-10-24 (月) 14:53:34
質問 
いつもお世話になっています。OOobbs/34で紹介されています縮小拡大印刷のマクロですが、記載されているとおりに入力しても動きません。マクロを実行すると、calcのページ設定ダイアログの倍率が変更になって表示されるのでしょうか？教えてください。いつも初歩的なことですみません。
sub ps_ps
dim osf as object, opss as object
dim ops as object
dim odoc as object
dim ssn as string
ssn = "Default"
odoc = thiscomponent
osf = odoc.getStyleFamilies()
opss = osf.getbyname("PageStyles")
if opss.hasbyname(ssn) then
ops = opss.getbyname(ssn)
ops.PageScale = 75
end if
end sub
回答
ページスタイルの "標準" スタイルの表タブにある拡大縮小倍率が 75% に変更されることを確認しました。
指定するページスタイル名が間違っていませんか？ "Default" の代わりに "標準" としてみてください。
- いつもありがとうございます。動きました、私の場合エクセルファイルを読み込んでいますが、その場合ページ書式がシートごとに設定になっていたことから、標準ではなくっていました。そこを直したところうまくいくようになりました。 -- sato?
