Bilder aus Excel als jpg speichern

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox


Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: Bilder aus Excel als jpg speichern
von: Thorsten
Geschrieben am: 06.06.2002 - 15:20:06

Hi,

moechte Bilder die ich in einer Excel Tabelle habe mitteils eines VB Codes als jpg oder bmp auf Festplatte speichern, wie wuerdest Du das machen?

Bitte um einen Tip!

danke, gruss,
thorsten


nach oben   nach unten

Re: Bilder aus Excel als jpg speichern
von: Uwe Wassmann
Geschrieben am: 06.06.2002 - 15:27:34

Hi,
hier ein Makro, das ich mal irgendwo kopiert habe, es speichert das Diagramm als Bild.
Sub procDiagrammExportieren()
Dim strGrafikName As String
strGrafikName = Application.GetSaveAsFilename("diagramm", FileFilter:="GIF-Format (*.gif)," & _
" *.gif,JPG-Format (*.jpg), *.jpg")
On Error GoTo ErrorHandler
ActiveChart.Export Filename:=strGrafikName, _
FilterName:=Right(strGrafikName, 3)
Exit Sub
ErrorHandler:
If Err.Number = 91 Then
MsgBox "Export nicht moeglich. " & _
"Sie haben kein Diagramm ausgewaehlt.", _
vbCritical + vbOKOnly, _
"Diagramm als Grafik exportieren"
Else
MsgBox "Der folgende Fehler ist aufgetreten: " & _
Err.Number & " - " & Err.Description, vbCritical + _
vbOKOnly, "Diagramm als Grafik exportieren"
End If
End Sub


guß Uwe

nach oben   nach unten

Re: Bilder aus Excel als jpg speichern
von: Thorsten
Geschrieben am: 06.06.2002 - 16:19:58

Hi Uwe,

leider erscheint die Fehler Meldung: Sie haben kein Diagramm ausgewaehlt
Es ist ja auch eigentlich kein Diagramm sondern ein Bild!

Gibt es einen anderen Weg?
Bitte um Hilfe bei diesem Problem!

gruss,
thorsten

nach oben   nach unten

Re: Bilder aus Excel als jpg speichern
von: Uwe Wassmann
Geschrieben am: 06.06.2002 - 16:27:21

Hi,

versuch doch mal mit trick,

die Grafik in die Zwischenablage kopieren und dann in ein Grafikprogramm einfügen.

Klappt bestimmt.

gruß

uwe


nach oben   nach unten

Re: Bilder aus Excel als jpg speichern
von: Thorsten
Geschrieben am: 06.06.2002 - 19:08:20

klar Uwe!

das geht aber ich moechte das automatisieren, da ich zu viele Bilder in Excel habe.

vielleicht einen anderen Tip!

Danke,
Thorsten


nach oben   nach unten

Tut mir leid
von: Uwe Wassmann
Geschrieben am: 06.06.2002 - 19:20:32

Ne,
tut mir leid.

gruß Uwe


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Bilder aus Excel als jpg speichern"