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

Diagramm als JPG ???

Forumthread: Diagramm als JPG ?

Diagramm als JPG ?
14.04.2008 10:04:00
Frank
Hallo zusammen,
ich habe mehrere Diagramme in einer Exceltabelle. Diese sollen im DIN A1 Format gedruckt werden. Jedoch möchte ich noch einige Änderungen daran vornehmen. Dafür möchte ich die Diagramme als hochauflösendes JPG abspeichern (das man dann nachträglich noch bearbeiten kann .... kleinere Grafik einfügen usw.).
Besteht eine Möglichkeit Diagramme in Excel als JPG abzuspeichern? Falls ja, wäre ich für kurze Anwendungshinweise dankbar!
VG
Frank

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Diagramm als JPG ?
14.04.2008 10:07:42
Beverly
Hi Frank,
1. Möglichkeit mit diesem Code

Sub diagramm_exportieren()
Dim chDiagramm As Chart     ' Variable für Diagramm als Objekt
'   Diagramm1 der aktiven Tabelle auf Variable schreiben
Set chDiagramm = ActiveSheet.ChartObjects(1).Chart
'   Diagramm als JPG-Datei exportieren
chDiagramm.Export Filename:="D:\Test\neu.jpg", FilterName:="JPG"
End Sub


2. Möglichkeit: speichere das Tabellenblatt als Webseite. Da wird auch ein Ordner erstellt, in welchem du das Diagramm als Bilddatei findest.


Anzeige
AW: Diagramm als JPG ?
14.04.2008 16:42:18
Frank
SUPER !!!
Vielen Dank!
;

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
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 von Tabelle1 als Grafik in Tabelle2 einfüg
Tabelle1

Hallo Leute,
ich komm irgendwie nicht weiter und benötige Hilfe.
es soll z.B. von Sheets("Tabelle1") Range("a1:b5")
als Grafik
in Sheets("Tabelle2")
Gruss
Atikar
19.11.2008 17:09:19
Thread-ID: 1026118
3 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
Anzeige
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
Alle Dateien als Excel97 speichern
WolfgangN

Hallo,
ich habe Excel2003 und möchte alle Excel-Tabellen aus einem Ordner (Excel-Tabellen) in einem anderen Ordner (PCShop) als Excel 97 Version speichern, um sie zu brennen und zu einem PC zu nehmen, wo nur Excel 97 installiert ist.
An den Dateien wird nichts geändert, soll nur als Exc...
12.02.2009 19:17:00
Thread-ID: 1050222
3 Beiträge
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
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
alle Diagramme i allen Tabellenblättern als Grafik
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 File...
22.04.2009 09:17:53
Thread-ID: 1070226
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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