グラフ – Microsoft ExcelでグラフをPNGまたはGIFファイルに保存するにはどうすればいいですか？

Microsoft ExcelでグラフをPNGやGIFファイルに保存する方法を教えてください

HTMLファイルとして保存して、そこで作成した画像を利用できるのは知っているのですが、他にいらないファイルのごちゃごちゃしたものを作らない方法があるのではないかと疑っています。それがお勧めならアドインをインストールしてもいいかなと思っています

私はExcel2003と2007を使っています

　 27　 fmark　 2011-05-12

ベストアンサー

Excelにはこの機能のためのユーザアクセス可能なサポートがありませんが、これを簡単に回避するか、この機能が提供されているVBAを利用することができます

“One-shot” export

グラフを選択します（グラフ全体を選択します
それをコピーします（ctrl-c、右クリックでコピー、お好きなように）
MSペイントを開きます
貼り付け (最初に画像サイズを最小化したい場合があります。それはフィットするように拡大されますが、縮小されません)
必要に応じて保存します

Bulk export

VBAマクロでActiveChart.Exportを使用することを見てみたいと思うでしょう

以下は私が作成したプロトタイプです。これを実行すると、アクティブなワークブック内のすべてのチャートがそのファイルと同じフォルダにPNG形式でエクスポートされ、ファイル名に_chart##が付加されます（##は増加数です）

安全チェックは一切行わず（だからファイルを上書きします！）、エラーチェックも含まれていません。ワークブックをまだ保存していない場合、保存先が読み取り専用である場合、またはファイルの保存先への書き込みができない場合は動作しません。私はこれをExcel 2003でしかテストしていません(今のところ手元にあるのはそれだけなので)

言い換えればこれは基本的な使用例としてのみ意図されているので、自己責任で使用してください

'small nicety to ensure two-digits for better file sorting'
Function NiceFileNumber(num As Integer) As String
If num < 10 Then
NiceFileNumber = "0" & num
Else
NiceFileNumber = num
End If
End Function

'the real function'
Sub ExportAllCharts()
Dim i As Integer, exportCount As Integer
Dim fileNum As String, fileBase As String
Dim sheetObj As Worksheet
Dim chartObj As Chart

'current file location and name, with extension stripped'
fileBase = Left(ThisWorkbook.FullName, InStrRev(ThisWorkbook.FullName, ".") - 1)
exportCount = 0

'First, export all charts that are in their own sheets'
For Each chartObj In ActiveWorkbook.Charts
fileNum = NiceFileNumber(exportCount)
exportCount = exportCount + 1

'Do the export'
chartObj.Export fileBase & "_chart" & fileNum & ".png"
Next

'Then, export all charts that are embedded inside normal sheets'
For Each sheetObj In ActiveWorkbook.Worksheets
For i = 1 To sheetObj.ChartObjects.count
fileNum = NiceFileNumber(exportCount)
exportCount = exportCount + 1

'Do the export'
sheetObj.ChartObjects(i).Activate
ActiveChart.Export fileBase & "_chart" & fileNum & ".png"
Next i
Next
End Sub

^{注: 両端のコメントを 's で囲みましたが、これは必要ありませんが、正しく色付けされていることを確認するのに役立ちます}

34　 DMA57361　 2011-05-12

一番良い方法は、エクセルファイルをHTMLで保存することです

そして、画像が保存されていたフォルダに移動すると、目的のPNG画像が表示されます

4　 João Pimentel　 2013-10-20

安全にPNGに変換するには、Excelから図をコピーして、パワーポイントのスライドに貼り付けて、次のようにします

名前を付けて保存 → その他の形式を選択し、希望の形式を選択します。それはあなたが現在のスライドのみ、またはすべてのスライドにこれを適用したいかどうかを尋ねられます。すべてのスライドを選択した場合、指定したディレクトリにフォルダを作成し、各スライドを選択した形式で独自のファイルに保存します

あまりエレガントではありませんが、ファイルが必要なだけの時にはすぐに使えますし、すでに同じグラフを使ってプレゼンをしている場合には特に重宝します

3　 sgildea　 2012-06-22

古いスレッドですが、念のために誰もがGoogleからここに着陸します。Mac用のExcel 2011は、まさにこれを行うための右クリックメニューの “画像として保存 “オプションを持っています

2　 Dave Mulligan　 2013-12-12

エクセル2010では、以下のようにすることができます

チャートをクリックして選択します
CTRL+Cを使ってコピーするか、右クリックしてコピーを選択します
グラフィック編集ソフト（Paint.netを使っています）に切り替えます
Paste.

その後、画像を好きな形式で保存することができます

0　 Will Martin　 2014-05-08

Greenshot（画面キャプチャソフト）を使用している場合は、Excel（Ctrl+C）でグラフをコピーしてから、Greenshotのアイコンを右クリックして、クリップボードから画像を開くを選択して保存します。グラフィックエディタを使う必要はありません

0　 gronostaj　 2015-10-25