Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


8705 / 13644 ツリー ←次へ | 前へ→

【31671】表示サイズの縮小について mahsia 05/11/28(月) 8:51 質問[未読]
【31679】Re:表示サイズの縮小について ちくたく 05/11/28(月) 11:12 発言[未読]
【31682】Re:表示サイズの縮小について mahsia 05/11/28(月) 13:47 お礼[未読]
【31683】Re:表示サイズの縮小について Kein 05/11/28(月) 13:51 発言[未読]
【31686】Re:表示サイズの縮小について mahsia 05/11/28(月) 14:48 お礼[未読]

【31671】表示サイズの縮小について
質問  mahsia  - 05/11/28(月) 8:51 -

引用なし
パスワード
   おはようございます
標記についてなのですが、
単にウインドウサイズの縮小ではなくて
内容も全体を表示したまま縮小できないでしょうか
PowerPointならできるのですが。
イメージがわかりづらいかも知れませんので
PowerPointのVBAを記述します、これでイメージがわかると
思います
Sub Macro1()
  With ActivePresentation.SlideShowSettings
   .AdvanceMode = ppSlideShowUseSlideTimings
   .Run
  End With
  With ActivePresentation.SlideShowWindow
   .Width = .Width * 0.25
   .Height = .Height * 0.25
  End With
End Sub

【31679】Re:表示サイズの縮小について
発言  ちくたく WEB  - 05/11/28(月) 11:12 -

引用なし
パスワード
   mahsia さん
おはようございます。

イメージ的にはカメラ機能でできないでしょうか?
どこにあるのかよくわからないのですが、
「表示」/「ツールバー」/「ユーザー設定」の中の、
「コマンド」タブの/「ツール」の中の「カメラ」です。

で、表示したい範囲を選択して、
カメラボタンをおしてみてください。
はずしていたらごめんなさい。

>Sub Macro1()
>  With ActivePresentation.SlideShowSettings
>   .AdvanceMode = ppSlideShowUseSlideTimings
>   .Run
>  End With
>  With ActivePresentation.SlideShowWindow
>   .Width = .Width * 0.25
>   .Height = .Height * 0.25
>  End With
>End Sub

【31682】Re:表示サイズの縮小について
お礼  mahsia  - 05/11/28(月) 13:47 -

引用なし
パスワード
   ▼ちくたく さん:ありがとうございます
少しイメージが違いますが、カメラ機能
使えそうです
今後ともよろしくお願いします

【31683】Re:表示サイズの縮小について
発言  Kein  - 05/11/28(月) 13:51 -

引用なし
パスワード
   >単にウインドウサイズの縮小ではなくて内容も全体を表示したまま縮小
ActiveWindow.Zoom = 75
なんていう事がしたいのでしょーか ?

【31686】Re:表示サイズの縮小について
お礼  mahsia  - 05/11/28(月) 14:48 -

引用なし
パスワード
   ▼Kein さん:ありがとうございます

ほぼぴったりのイメージです
ツールバーとかが縮小されないですが
ウインドウのサイズと組み合わせて、
使うことにしました
助かりました(^^v

8705 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free