PowerPoint2000/VBA PPTを画像ファイルに変換する

VisualBasic6用
PowerPoint2000/VBA PPTを画像ファイルに変換する

' PowerPoint2000/VBA PPTを画像ファイルに変換する
'  (以下では png 形式に変換しています)
' strSaveFolder  : 変換後のファイルを保存するフォルダー
'   				(ファイル名は、自動で付加される)
' lngWidthPixel  : エクスポートするスライドの横の長さ(ピクセル単位)
' lngHeightPixel : エクスポートするスライドの縦の長さ(ピクセル単位)
'
Sub SaveGraphicsPromPPT(ByVal strSaveFolder As String, _
					   ByVal lngWidthPixel, ByVal lngHeightPixel)
    ActivePresentation.Export strSaveFolder, "png", lngWidthPixel, lngHeightPixel
End Sub