Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1316to1320
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1316to1320
1316to1320
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Alle Diagramme in Worksheet bearbeiten

Alle Diagramme in Worksheet bearbeiten
17.06.2013 10:50:45
M
Hallo,
habe folgende Codezeile, die genau 1 Diagramm aktiviert (mit dem in der Folge dann bestimmte Anpassungen gemacht werden):
ActiveSheet.ChartObjects("Diagramm 1").Activate
....
Wie bekomme ich es nun hin, nicht nur dieses eine Diagramm zu aktivieren/bearbeiten, sondern alle, die sich in dem Worksheet befinden?

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

Betreff
Datum
Anwender
Anzeige
AW: Alle Diagramme in Worksheet bearbeiten
17.06.2013 11:00:54
Beverly
Hi,
dazu musst du in einer Schleife über alle Diagrammobjekte des Tabellenblattes laufen. Außerdem muss man ein Diagramm nicht aktivieren um es bearbeiten zu können
Sub DiasBearbeiten()
Dim chrDia As ChartObject
For Each chrDia In ActiveSheet.ChartObjects
With chrDia.Chart
' hier der Code zum Bearbeiten
End With
Next chrDia
End Sub

ActiveSheet.ChartObjects.Select oder Schleife
17.06.2013 11:05:09
NoNet
Hallo M.,
je nachdem, welche Aktione Du durchführen möchtest kanns Du dazu entweder eine Schleife verwenden :
Sub AlleCharts()
Dim objChart As ChartObject
For Each objChart In ActiveSheet.ChartObjects
With objChart
.Left = 100 'Position vom linken Rand : 100 Pixel
'weitere Anweisungen
End With
Next
End Sub
Oder (z.B. zum Löschen auch nur alle ChartObjects auf dem aktuellen Blatt direkt referenzieren : 
ActiveSheet.ChartObjects.Select 'Alle Diagramme markieren
ActiveSheet.ChartObjects.Delete'Alle Diagramme löschen
etc.
Gruß, NoNet

Anzeige

90 Forumthreads zu ähnlichen Themen

Pivot zeigt nicht alle Daten an - Mit bsp xls
Julia

Hallo,
habe Problem mit meiner Pivot in der Mappe History, siehe xls
https://www.herber.de/bbs/user/60692.zip
Wieso wird der Vorgang-1009 nicht in der Pivottabelle dargestellt?
Ich habe für dieses Pivot einen Namen definiert als Bezugsquelle, der Name lautet: datenbasis
Und...
26.03.2009 12:19:15
Thread-ID: 1064191
4 Beiträge
Anzeige
Datei lässt sich nicht öffnen
einfachf

Hallo Zusammen ich schreibe gerade an einem Macro.
Dazu soll aus einer bestehenden datei eine andere Datei geöffnet werden.
Leider funzt das nicht und ich weiß nicht warum.
Hier mein Code.
Dim EX As Excel.Application
Dim WB As Workbook
Dim WS As Worksheet
Set EX = Cr...
06.08.2009 12:12:10
Thread-ID: 1094009
3 Beiträge
Automatisierung Exceldiagramme in Powerpoint
morb

Hallo liebes Forum,
ich habe folgendes Problem:
Ich habe eine Excelmappe mit 3 Tabellenblätter.
Auf jedem Tabellenblatt befindet sich ein Diagramm. Ich möchte nun ein einfaches Makro erstellen mit dem ich aus Excel heraus die 3 Diagramme in eine Powerpoint Präsentation einfügen kan...
27.09.2009 22:37:32
Thread-ID: 1105920
3 Beiträge
Anzeige
skalierung größenachse lässt sich nicht ändern
schon

Hallo, vielleicht liegt es ja nur am Sekt, den wir zum Weihnachtsbrunch hatten...
Habe ein simples Liniendiagramm mit 2 Zahlenreihen erstellt. Bei einer Reihe gehen die Zahlen gegen Null, daher schmiegt sich die Linie an die Rubrikenachse. Damit es anschaulicher wird, möchte ich die Skalier...
15.12.2009 16:34:42
Thread-ID: 1123765
2 Beiträge
Datei lässt sich nicht öffnen
Ernst

Hallo Forum
Habe eine Datei abgespeichert, so wie ich es immer mache, lässt sich aber jetzt nicht mehr öffnen.
Wie kann ich die Datei öffnen?
Bitte um Hilfe
mfg
Ernst Dunkel
04.01.2010 13:35:12
Thread-ID: 1127045
5 Beiträge
Tabellenblattreiter lässt sich nicht ändern | Herbers Excel-Forum
Josef_T
Guten Tag zusammen,
ich kann in keiner! Tabelle mehr den Tabellenblattreiter bearbeiten. Egal ob ich mit der linken
oder rechten Maustaste darauf klicke, aktiviere ich nur immer das ganze Blatt.
kann mir bitte jemand einen Tipp geben, wie ich meine Tabellenblattreiter wieder editieren...
23.01.2010 20:19:29
Thread-ID: 1132376
6 Beiträge
Diagrammgröße per VBA ändern
ben

Hallo zusammen,
Ich habe drei Command Buttons mit deren Betätigung drei verschiedene Diagramme (Kuchendiagramm) angezeigt werden können. Wenn ein neues Diagramm angezeigt werden soll, wird das alte zuvor gelöscht.
Leider werden die Diagramme aber immer nur recht klein angezeigt.
Ic...
20.02.2010 10:34:56
Thread-ID: 1139846
4 Beiträge
Makro-Sicherheit lässt sich nicht ändern
NoNet

Hallo VBA-Experten,
ich habe auf meinem PC unter Excel 2003 SP3 seit einiger Zeit das Problem, dass sich Änderungen der Makro-Sicherheit ("Extras - Makros - Sicherheit") nicht mehr dauerhaft ändern lassen.
D.h. : Ich kann zwar die Sicherheitsstufe und auch die Optionen im Register "Vert...
08.03.2010 15:40:14
Thread-ID: 1144340
20 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
2
2
2
2
1
4
5
3
19
7
4
6
3
2
3
3
11
3
5
3
2
2
14
10