パワーポイント365-大量エクスポート.png形式

応答8# ->にスキップ

7 #

PhilipD 2022-03-08 10:36

こんにちはスティーブとジョン

まったく新しいパワーポイントで試してみましたが、まだ運がありません.

注目すべきことに、私が発見したのは、何らかの理由でデスクトップの解像度に関連付けられているように見えるということです.私はネイティブに2560x1440モニターを持っています.1920x1080で実行するように強制すると、1080で正常にエクスポートされます.

ありがとう

応答7# ->にスキップ

3 #

SteveRi 2022-03-09 13:36

確かに、このように動作する必要があるのは非常に奇妙です.

テストとして、PPToolsImageExporterアドインのデモを試すことができます

https://pptools.com/imageexport/

デモは無料で、エクスポートするすべてのスライドに「デモ」スタンプが付けられますが、VBAマクロがその役目を果たすことができるかどうかについてはかなり良いアイデアが得られます.アドインの機能が魅力的な場合は、もちろん購入できますが、この特定の目的のためにエクスポートのみが必要な場合は、基本的な仕事を行うVBAを少し考え出すことができます..

応答7# ->にスキップ

6 #

StaceyF 2022-03-08 15:23

こんにちはPhilipDowdeswel

返信が遅くなってすみません.

あなたの説明によると、デスクトップの解像度が2560x1440に設定されていると、プレゼンテーションを正常にエクスポートできないようです.ただし、解像度を1920x1080に設定すると、ファイルは正常にエクスポートされ、問題は発生しません.私の理解が正しいかどうかわかりますか?

もしそうなら、ここでそれを共有してくれてありがとう.同じような質問をしている他のユーザーやメンバーにいくつかのアイデアや参考資料を与えることができます.

共有していただきありがとうございます.他にご不明な点がございましたら、お気軽に投稿してください.

よろしく、

ステイシー

応答6# ->にスキップ

5 #

PhilipD 2022-03-09 04:20

こんにちはステイシー

そうです、そうです.ただし、可能であれば、システムの解像度を変更する必要がないことを強く望んでいます.これは、開いている他のすべてのレイアウトのすべてのレイアウトを台無しにするためです.

私が試すことができるかもしれない他の回避策があるかどうか知っていますか?

ありがとう

応答5# ->にスキップ

2 #

StaceyF 2022-03-09 16:03

こんにちはPhilipDowdeswell

スティーブが述べたように、別の回避策は、VBAコードを使用してスライドをpngまたはjpeg形式でエクスポートすることです.

1.スライドをjpegとしてエクスポートする場合は、次のVBAコードを使用できます.

Application.ActivePresentation.Slides(3)を使用

.Export "c:\mydocuments\Graphic Format \"&_

「年間売上高のスライド3」、「JPG」

終了

[間違ったコードを削除するために編集]

3.その間、私たちはいくつかの同様の記事を検索しました、それがあなたを助けることができることを願っています: VBAを使用してパワーポイントのスライドを画像にエクスポートする(free-power-point-templates.com)

免責事項:マイクロソフトは、黙示またはその他を問わず、いかなる保証も提供せず、サードパーティのリンク先サイトから受け取る情報またはテクノロジに関連するサポートについて責任を負いません.

VBAについては、以下を参照してください. OfficeでVBAを使い始める| Microsoft Docs

これが少しお役に立てば幸いです.

さらにサポートが必要な場合は、お気軽に投稿してください.

よろしく、

ステイシー

応答2# ->にスキップ

4 #

PhilipD 2022-03-09 17:13

こんにちはステイシー

コードをありがとうございますが、エクスポートを強制的に720で出力するように制限されているようです.

1080に強制するために、どのコード行を入力する必要があるか知っていますか?

ありがとう

応答4# ->にスキップ

1 #

SteveRi 2022-03-10 01:461

PNGをエクスポートするStaceyのコードが正しくなかったので、編集しました.

これはあなたが求めていることを行います.VBAエディタの新しいモジュールにコピーして貼り付けます.

必要なものに一致するように定数値を編集します.

sPath= ""の場合、保存された画像はPPTファイルと同じフォルダに配置されます.

それ以外の場合は、必要なパスをプラグインします.

Option Explicit

Const sBaseName As String= "Slide_"

Const lWidth As Long= 2048

Const lHeight As Long= 1366
'これは\で終わる必要があります

Const sPath As String= "c:\temp \"

Sub ExportSlidesAsImages()

Dim oSl As Slide

Dim sTemp As String

'ユーザーが上記のパスを指定した場合は、それを使用します

'それ以外の場合は、現在のプレゼンテーションのパスを使用します

If Len(sPath)>0 Then

sTemp= sPath

その他

sTemp= ActivePresentation.Path&"\"

End If

ActivePresentation.Slidesの各oSlについて

'PNGとしてエクスポート; 他の形式が必要な場合は、を変更してください

'以下のPNGの両方のインスタンス.JPG

oSl.Export sTemp&sBaseName&Format(oSl.SlideIndex、 "000")&".PNG"、_

"PNG"、lWidth、lHeight

次へ 'スライド

End Sub

√