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

VBA Diagramm mit Formatierung kopieren

Forumthread: VBA Diagramm mit Formatierung kopieren

VBA Diagramm mit Formatierung kopieren
19.07.2022 17:38:46
cribo
Hallo!
Ich möchte in Excel ein Balkendiagramm von einem Tabellenblatt in ein anders per VBA Makro kopieren.
Dabei soll die "ursprüngliche Formatierung beibehalten" werden. Die Links zu den Daten sollen dabei bestehen bleiben.
Die Option findet man in Excel mit der linken Maustaste unter "Einfügeoptionen" -> "Ursprüngliche Formatierung beibehalten".
Leider finde ich keinen Hinweis wie ich dies per VBA erledige....
Vielen Dank für eure Hilfe.
Userbild
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Eventuell hilft der Makrorekorder?... - o.T.
19.07.2022 18:24:20
Beverly
Bis später
Karin
AW: Eventuell hilft der Makrorekorder?... - o.T.
20.07.2022 11:26:23
cribo
Leider nein, der Makrorekorder zeichnet das leider nicht auf.....
Eine Möglichkeit
20.07.2022 13:08:40
Beverly 

Sub DiaKopieren()
ActiveSheet.ChartObjects(1).Chart.ChartArea.Copy
Worksheets("Tabelle2").Paste
End Sub
Bis später
Karin
Anzeige
AW: Eine Möglichkeit
20.07.2022 13:29:51
cribo
Hallo Karin!
Danke für den Code.
Damit wird zwar das Diagramm kopiert, in der Zieltabelle ändern sich aber automatisch die Farben der Balken.... wieso auch immer....
AW: Eine Möglichkeit
20.07.2022 13:44:35
Beverly
Dann versuche es so:

Sub DiaKopieren()
With ActiveSheet.ChartObjects(1).Chart
.ChartArea.Select
.ChartArea.Copy
End With
Worksheets("Tabelle2").PasteSpecial Format:=2
End Sub
Bis später
Karin
Link zur Homepage: [URL="http://www.excel-inn.de/"]Beverly's Excel-Inn[/URL]
Anzeige
AW: Eine Möglichkeit
20.07.2022 14:04:30
cribo
Ok, so funktioniert es. Vielen Dank!

Forumthreads zu verwandten Themen

aktive Zellen aus bedingter Format. kopieren
Stephan

Hallo,
ich suche einen Code in VBA, um einen variablen Bereich zu kopieren. Am einfachsten wäre es, wenn der Code aktive bedingte Formatierungen in einem Tabellenblatt findet und kopiert. In meinem Tool soll über eine Listenwahl ein Monat ausgewählt werden, zB. August. In einem anderen Tab...
19.09.2017 12:04:45
Thread-ID: 1581223
5 Beiträge
Bedingte Formatierung
Arno

Hallo,
habe das Problem, dass sich in einer Tabelle von 2000 Datensätzen die 4 hinterlegten bedingten Formatierungen nach dem reinkopieren von Datensätzen aus anderen Tabellen mit der selben Formatierung vervielfachen. Die bed. Format., wiederholen sich, aber immer bezogen auf einzelne Zell...
20.03.2014 20:55:35
Thread-ID: 1354257
5 Beiträge
Anzeige
Bedingte Formatierung "geschickt" kopieren
ChrisDi

Hallo!
Ich habe in Zeile 19 in mehreren Zellen die folgende bedingte Formatierung erzeugt:
="Jahr($H19)">"Jahr($H18)"
Diese möchte ich nun auf die anderen Zeilen der Tabelle übertragen. Dabei soll sich jedoch die Zeilennummer immer entsprechend mitändern. Wie bekomme ich das hin,...
14.09.2007 12:30:00
Thread-ID: 907119
12 Beiträge
Tabelle auf verschiedene Weise ausdrucken
nwolf

Guten Morgen,
ich habe jetzt schon nach allem Möglichen gegoogelt. Bin aber auf keinen grünen Zweig gekommen. Folgendes Problem:
Ich habe mehrere Tabellen mit Auflistungen von Räumen. Das sind dann immer 12 Spalten und je nach dem wieviele Räume es gibt auch entsprechend viele Zeilen, m...
20.07.2012 12:57:55
Thread-ID: 1271949
4 Beiträge
Anzeige
VBA - Werte aus best. Bereich kopieren
Dominic

Hi zusammen,
aus einem vorherigen Thread hier in diesem Forum habe ich folgendes VBA Script erhalten:
Dim Ze As Long
For Ze = 36 To 1164 Step 6
Rows(Ze + 1).EntireRow.Hidden = False
Next
ElseIf [B6] = 3 And [B2] = 1 Then
For Ze = 36 To 1014 Step 6
Rows(Ze + 1).En...
28.01.2013 16:51:16
Thread-ID: 1296354
2 Beiträge
VBA immer special Paste
MISTERWENN

Hallo,
Bei uns im Unternehmen nutzen wir ein Excel File, welches ausgefüllt und an eine Abteilung gesandt werden soll.
Allerdings wird fast schon Grundsätzlich und mit Vorsatz, diese Vorlage durch Formatierungen so verunstaltet, dass dann sogar oftmals meine Makros nicht mehr greifen un...
03.12.2019 11:53:14
Thread-ID: 1726883
12 Beiträge
Bedingte Formatierung mit VBA
Mister

Hallo!
ich habe eine Tabelle mit Kundendaten erstellt. Die Daten werden per UF eingegeben und zwar beginnend mit Zeile 6 in den Spalten B bis K. Es sind insgesamt 550 Zeilen. Ich möchte folgendes erreichen:
Wenn die jeweilige Zelle "B" leer ist, soll in der Zeile die Zellen B - K hel...
04.12.2006 10:41:51
Thread-ID: 825878
3 Beiträge
Zeilen mit Formatierung kopieren
gerhard

Hallo,
Bitte um VBA Hilfe!
Via CeckBox1 sollten die Zellen von B1 bis B5 von der Tabelle Daten in die Tabelle Drucken in die Zellen B1 bis B5 mit allen Zell-Formatierungen kopiert werden.
Via CeckBox2 sollten die Zellen von B1 bis B5 von der Tabelle Daten in die Tabelle Drucken in d...
13.11.2016 21:20:25
Thread-ID: 1524650
6 Beiträge
bed. formatierung kopieren
Jens P.

Hi,ich hab gerade meine Tabelle fertig.
Sie enthält viele Bezüge und bedingte Formatierungen.
Ich müsste jetzt Zahlen in Zellen eintragen, die eine bed. Formatierung enthalten.
Von hand funktioniert das einwandfrei,
aber mit kopieren/einfügen wird auch die Formatierung gelöscht!
27.11.2002 15:02:23
Thread-ID: 186299
2 Beiträge
Formel kopieren nicht möglich - nur Ergebnis wird angezeigt
Benjamin
Hallo Miteinander,

ich habe einen Dienstplan erstellt, bei welchem automatisch die abwesenden Personen gezählt werden. Sind es zu wenige, wird ein Dienst in Zelle D26 "ausgeschrieben" und in eine andere (gleichzeitig geöffnete) Tabelle übertragen.
Ich möchte die Formel für die Berechnu...
22.11.2025 08:24:52
Thread-ID: 2021274
4 Beiträge
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum