Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1068to1072
1068to1072
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

alle Diagramme i allen Tabellenblättern als Grafik

Forumthread: alle Diagramme i allen Tabellenblättern als Grafik

alle Diagramme i allen Tabellenblättern als Grafik
22.04.2009 09:17:53
Till
Hallo Leute,
wie kann ich alle Diagramme in einer Exceldatei (aus allen Dateiblättern) in fortlaufend nummerierte Grafiken speichern.
Als Ausgangsposition hab ich dieses hier:

Sub Create_GIF()
Dim mychart As Chart
Set mychart = ActiveSheet.ChartObjects(1).Chart
mychart.Export FileName:="c:\Eigene Dateien\Dia.gif",
FilterName:="GIF"
End Sub


Vielen Dank schon mal für die (wie immer schnelle) Hilfe.
Gruß Till

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: alle Diagramme i allen Tabellenblättern als Grafik
22.04.2009 10:30:42
Beverly
Hi Till,
eine Möglichkeit

Sub Create_GIF()
Dim wsTabelle As Worksheet
Dim chDiagramm As ChartObject
Dim mychart As Chart
Dim inCounter As Integer
inCounter = 1
For Each wsTabelle In Worksheets
If wsTabelle.ChartObjects.Count > 0 Then
For Each chDiagramm In wsTabelle.ChartObjects
Set mychart = chDiagramm.Chart
mychart.Export Filename:="c:\Eigene Dateien\Dia" & inCounter & ".gif",  _
FilterName:="GIF"
inCounter = inCounter + 1
Next chDiagramm
End If
Next wsTabelle
Set mychart = Nothing
End Sub



Anzeige
AW: alle Diagramme i allen Tabellenblättern als Grafik
22.04.2009 20:20:12
Till
Hi Karin,
ja das hat geklappt.
Super vielen Dank!
Gruß aus Kölle!
Till

Forumthreads zu verwandten Themen

Tabelle als PDF speichern
PeTeR

Hallo VBA-Freaks,
ich suche seit Stunden - finde aber nicht den exakt passenden Code, obwohl es zig Einträge zu dem Thema gibt.
Ich will eine Tabelle per VBA in PDF umwandeln u. drucken. Mein Code:
Application.ActivePrinter = "Adobe PDF auf Ne01:"
ActiveWindow.SelectedSheets.Pri...
25.10.2008 23:06:00
Thread-ID: 1019291
5 Beiträge
Anzeige
Export von Excel Diagrammen als JPG
Excel

Hi zusammen!
Ich habe ein Prblem mit einem (bzw. mehreren) Excel-Diagrammen:
Ich habe eine Datebank mit einer Vielzahl von Datensätzen. Ich wähle in einem anderen Tabellenblatt per Dropdown-Feld je einen Datensatz aus und aus den per sverweis hierher gezogenen Werten aus der Datenbank w...
12.11.2008 11:27:00
Thread-ID: 1023758
6 Beiträge
Bereich als Bild in bestimmter Größeexportieren
dirkraeder

Hallo Excelgemeinde!!
Ich habe ein Problem und benötige eure Hilfe!
Ich habe mir eine Excel Datei gebastelt. In dieser Datei habe ich ein Formular, dass sich durch Auswahl in einem Kombinationsfeld verändert.
Nun muss ich die Ansicht dieses Formulars als GIF-Bilddatei immer wieder m...
26.11.2008 11:08:00
Thread-ID: 1027962
3 Beiträge
screenshot als JPG speichern
heike

Hallo experten,
ich suche eine VBA - Lösung um einen Screenshot zu erzeugen und diesen als JPG abzuspeichern.
Eine Lösung, um eine BMPdatei zu speicher habe ich bereits (sieh unten).
Danke Nepumuk.
Am besten währe genau dieser Ansatz, weil ich das Bild beschneiden kann.
Nur...
16.12.2008 20:47:09
Thread-ID: 1033426
2 Beiträge
Tabellenblätter einzeln als Datei speichern
murat

Hallo,
ich habe einen tollen VBA Code hier im Forum gefunden!
Ich möchte die einzeln Tabellenblätter als Datei Speichern. ich habe 20 Tabellenblätter in einer Datei aus der sollen 20 Dateien werden. Dateiname steht immer in Zelle C2 des jeweiligen tabellenblattes.
Der Code unten i...
13.01.2009 11:46:16
Thread-ID: 1039178
3 Beiträge
Diagramm als .PNG abspeichern
Grabner

Hallo!
Es geht um folgendes Thema, dass ich vor einiger Zeit mal gestellt hatte:
https://www.herber.de/forum/archiv/1040to1044/t1040069.htm
Das Problem ist, dass es immer nur das erste Diagramm des aktiven Excel-Registers exportiert. Jetzt habe ich mal testweise ActiveSheet.ChartObj...
30.01.2009 12:33:19
Thread-ID: 1045360
4 Beiträge
Bild aus Exceldatei speichern
Dave

Hallo,
habe ein Bild das sich in einer Exceldatei befindet und welches ich gerne
unter "Eigene Bilder" speichern möchte.
Habe aber keine Ahnung wie ich das Bild aus dieser Datei heraus bekomme.
Bitte um Hilfe
Gruß
Dave
13.02.2009 21:52:00
Thread-ID: 1050642
2 Beiträge
Anzeige
Bereich als Bild oder ähnlich in Zwischenspeicher
Theo

Hallo,
irgendwo hab ich mal diese Funktion gesehen, weiß aber leider nicht mehr wo.
Zellen markieren
Tastenkombi und Menü-Einfügen öffnen
Es erscheint ein weiteres Untermenü
(ich glaube irgend etwas mit als Bild in Zwischenspeicher oder ähnlich)
Kennt einer von euch das...
06.03.2009 20:31:40
Thread-ID: 1057450
6 Beiträge
Bilder aus Word als GIF exportieren
Dirk

Hallo Excelgemeinde,
ich habe folgendes Problem, bei dem ich einfach nicht weiter komme und bitte um Hilfe!
Ich habe Worddateien, in diesen Worddocumenten befinden sich Bilder. Ich möchte diese Bilder als GIF-Bilddateien speichern.
Im Archiv habe ich leider nichts Passendes gefunden...
06.04.2009 19:49:39
Thread-ID: 1067174
9 Beiträge
Anzeige
Tabelle als Text speichern, Dateiname aus Zelle
Jürgen

Hallo Excel-Profis,
ich möchte über ein Makro folgendes ausführen:
- das aktuelle Tabellenblatt soll im Textformat gespeichert werden
- das Dialogfeld "Speichern unter" soll am Bildschirm erscheinen
- der Dateiname soll aus der Zelle I1 in das Dialogfeld übernommen werden
Im...
08.04.2009 13:05:46
Thread-ID: 1067706
2 Beiträge
Diagramm als Bild
Ulf

Hallo zusammen,
mir will es einfach nicht gelingen ein Diagramm als Bild in eine andere Datei zu kopieren. Vielleicht habt Ihr eine Idee. Bisher habe ich es geschafft das Diagramm zu kopieren, dass sieht dann so aus:
Sheets("Grafiken").Select
Application.Workbooks("Masterdatei_Aktie...
16.04.2009 15:51:00
Thread-ID: 1069109
2 Beiträge
@ Sepp -- Bilder aus Word speichern
Dirk

Hallo Excelgemeinde!
(Sepp oder auch andere, die mir helfen möchten)
Ich habe von Sepp den unten aufgeführten Code. Der Funzt soweit auch gut.
Ich habe in den Code:
.documents(1).InlineShapes.Reset
eingebaut.
Damit schaffe ich es, dass das erste Bild im Document vor de...
04.05.2009 11:32:15
Thread-ID: 1072689
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige