【PPTのVBA 全てのテキストボックスの行間を最小に】
今晩は、質問させていただきます。どうぞよろしくお願いいたします。
PPT2007でございます。
手元に大量にあるPPTファイル群のテキストボックスの行間が全て広いため、
全て一括で小さくしてしまいたい次第でございます。
もしこれを手作業でやりますと、テキストボックスをアクティブにする→右クリック
→「段落」→「段落前」を0に。
となり時間がかかりますため、VBAでどうにかしたい次第でございます。
しかしネットで検索しても出てこず、
また上記操作を自動記録しようといたしましても記入されません。
(PPT2007には自動記録が無いため、excel、wordでトライいたしましたが、無理でございました。。。)
一個のテキストボックスの操作方法さえ分かれば後は、
For each スライド
For each テキストボックス
:
:
Next
Next
みたいな感じで出来ると思うのでございますが。。
もしお詳しい方がいらっしゃいましたら,お教えいただけないでしょうか。
どうぞよろしくお願いいたします。
No.1ベストアンサー
- 回答日時:
MKT_さん
こんにちは。
下記のコードでできると思います。
※PPT2003での対応ですが…
Sub 行間変更()
Dim I As Long
Dim J As Long
For I = 1 To ActivePresentation.Slides.Count
With ActivePresentation.Slides(I)
For J = 1 To .Shapes.Count
If .Shapes(J).HasTextFrame = msoTrue Then
.Shapes(J).TextFrame.TextRange.ParagraphFormat.SpaceBefore = 0
End If
Next J
End With
Next I
End Sub
jcctaira様
どうもありがとうございます!!m(_ _)m
2007でも問題なく動作いたしました^^動作も早く、あっという間でございます。
非常に助かりました。今日から作業がスイスイになります。
この度はご親切にどうもありがとうございました!!!
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) WordのVBAについて 5 2023/01/11 14:38
- その他(Microsoft Office) パワーポイントやワード、エクセルでのスライドショーやテキストの微調整について 1 2023/01/12 05:50
- Visual Basic(VBA) Excel VBA ユーザーフォーム内のラベルにテキストボックスの小計を出す方法 5 2022/08/17 14:27
- Visual Basic(VBA) Excel VBA 複数選択したリストボックスからテキストボックスに転記したいです。 3 2023/03/19 18:31
- Access(アクセス) アクセス 意図せずサブプロシージャを移動してしまうのを止めたい 1 2022/09/02 09:19
- Word(ワード) 分かる方教えてください。 wordに図を差込して資料を作成してますが その図上の説明したい箇所に①と 3 2022/10/20 20:05
- その他(プログラミング・Web制作) Windowsのマクロプログラムで、こんなことできますか? 3 2022/06/28 14:30
- その他(パソコン・スマホ・電化製品) ワードでテキストボックス内の文字を連動させない方法 2 2023/02/09 16:56
- Visual Basic(VBA) Excel VBA でデータ転記について 1 2023/03/07 19:11
- Excel(エクセル) Excel グラフの軸に「表示単位の変更」の要領でテキストを追加したい 1 2022/06/08 16:27
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・プリン+醤油=ウニみたいな組み合わせメニューを教えて!
- ・タイムマシーンがあったら、過去と未来どちらに行く?
- ・遅刻の「言い訳」選手権
- ・【大喜利】【投稿~11/12】 急に朝起こしてきた母親に言われた一言とは?
- ・好きな和訳タイトルを教えてください
- ・うちのカレーにはこれが入ってる!って食材ありますか?
- ・好きな「お肉」は?
- ・あなたは何にトキメキますか?
- ・おすすめのモーニング・朝食メニューを教えて!
- ・「覚え間違い」を教えてください!
- ・とっておきの手土産を教えて
- ・「平成」を感じるもの
- ・秘密基地、どこに作った?
- ・【お題】NEW演歌
- ・カンパ〜イ!←最初の1杯目、なに頼む?
- ・一回も披露したことのない豆知識
- ・これ何て呼びますか
- ・初めて自分の家と他人の家が違う、と意識した時
- ・「これはヤバかったな」という遅刻エピソード
- ・これ何て呼びますか Part2
- ・許せない心理テスト
- ・この人頭いいなと思ったエピソード
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・ハマっている「お菓子」を教えて!
- ・【大喜利】【投稿~11/1】 存在しそうで存在しないモノマネ芸人の名前を教えてください
- ・好きなおでんの具材ドラフト会議しましょう
- ・餃子を食べるとき、何をつけますか?
- ・あなたの「必」の書き順を教えてください
- ・ギリギリ行けるお一人様のライン
- ・10代と話して驚いたこと
- ・つい集めてしまうものはなんですか?
- ・自分のセンスや笑いの好みに影響を受けた作品を教えて
- ・【お題】引っかけ問題(締め切り10月27日(日)23時)
- ・大人になっても苦手な食べ物、ありますか?
- ・14歳の自分に衝撃の事実を告げてください
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・あなたの習慣について教えてください!!
- ・都道府県穴埋めゲーム
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Wordで文字のサイズを大きくす...
-
ワードで英文を作成すると、行...
-
ワードの表の中に入力された文...
-
word 数式が一部表示されない
-
WordからWordにコピペすると行...
-
図形に挿入したテキストの行間...
-
一太郎で行数の設定が反映され...
-
gmailの行間が勝手に詰まります
-
pdfをワードで開くと二枚に...
-
ワード 図表目次の挿入
-
一太郎の文書をワードに変換し...
-
メールの行間があいてしまう
-
Wordのページ数が欠ける件
-
wordの改行の間隔が広い!!
-
行間隔を調整する方法がわかり...
-
ワード:罫線素片をつなげる方...
-
ホームページビルダーで行間を...
-
メールの行間
-
至急です。画像を貼り付けたい...
-
数式エディタでの行間の間隔の操作
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Wordで文字のサイズを大きくす...
-
word 数式が一部表示されない
-
ワードの表の中に入力された文...
-
ワードで英文を作成すると、行...
-
WordからWordにコピペすると行...
-
複数行選択する際、行間を選択...
-
一太郎で行数の設定が反映され...
-
図形に挿入したテキストの行間...
-
pdfをワードで開くと二枚に...
-
数式エディタでの行間の間隔の操作
-
Chatgptの文章をワードにコピペ...
-
ヤフーメールで、行間が空きすぎる
-
Wordのページ数が欠ける件
-
ワードの行間を統一したい
-
Word「レイアウト」から「ペー...
-
gmailの行間が勝手に詰まります
-
wordの改行の間隔が広い!!
-
アクセスのフォーム上のテキス...
-
ワード、縦書きで「あ゛」を一...
-
【Word2013】游明朝で割注を使...
おすすめ情報