Excelワークシートのセルの名前に基づいて特定のフォルダと名前ファイルにExcelのタブからチャートを抽出するためのVBA

Question

グラフをイメージとして特定のフォルダにエクスポートするマクロがありますが、固定名が付けられています。 "Data"という名前のシートのセルY3の後にファイルに名前を付けるようにマクロを変更するにはどうすればよいですか？

私はこの試みた：ファイル名= "C：\レポート\" &シート（ "データ"）範囲（ "Y3"）& ".JPG"、FILTERNAME：= "JPG" を、それが動作しませんでした。

Sub ExportGraphImage() 

Worksheets("CIS Graph").ChartObjects(1) _ 
.Chart.Export _ 
Filename:="C:\Report\CISgraph.jpg",FilterName:="JPG" 

End Sub 

Answer 1

私はそれがValueプロパティでセル定義を修飾するのに役立つと予想しましたか？以下は私のために働いた（元のコマンドと同じように）。もちろん、Sheets()の代わりにWorksheets()も使用しますが、私は面白いです。

Filename = "C:\Report\" & Sheets("Data").Range("Y3").Value & ".jpg", FilterName:="JPG" 

しかし、それは結局のところ、それは.Valueせずに私のために働いた、ので、多分セルに何があるかとの問題、あるいは（それは本当に「データ」だ場合のように）シートの名前があります。

ところで、PNGは一般にExcelチャートのようなグラフィックスに使用するのに適したフォーマットです。