Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
23.04.2024 21:29:56
Bestimmte Zellen auf andere Arbeitsblätter kopieren
23.04.2024 17:41:19
Link erstellen mit Formel oder VBA?
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
600to604
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
600to604
600to604
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Name eines Diagrammes

Name eines Diagrammes
23.04.2005 11:17:00
Franz
Hallo Forum,
jetzt hab ich doch nochmal ne Frage zu Diagrammen: wo bitte finde ich den Namen eines Diagrammes. Mit dem ich das Diagramm in VBA ansprechen kann, z. B.
...visible = true/false
Danke im Voraus und Grüße
Franz

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Name eines Diagrammes
23.04.2005 12:27:54
Rene
Hallo,
wenn Du auf das Diagramm mit der rechten Maustaste klickst und in dem Auswahlmenü dann
Diagrammfenster klickst, dann geht das Diagramm in einem neuen Fenster auf.
Dort steht dann oben in der Titelleiste der Name.
Gruß
René
AW: Name eines Diagrammes
23.04.2005 12:39:01
Franz
Hallo René,
danke, das hab ich gefunden. Aber da steht jetzt sowas wie "Diagramm 481" (dabei ist es das erste Diagramm in dieser Datei :-)))). Aber meine Frage: kann man diesen Namen jetzt auch ändern, würde gerne einen aussagekräftigeren Namen benutzen.
Grüße
Franz
AW: Name eines Diagrammes
23.04.2005 13:15:40
Rene
Hallo Franz,
zunächst einmal vergibt Excel die Namen der Diagramme nach irgendeinem internen Zähler.
Also wenn du schon x Diagramme eingebaut hast (entweder in dieser Sitzung oder in dieser mappe - je nachdem ), dann hat das nächste Diagramm den Namen x+1 .
Diesen internen Namen zu ändern geht so einfach gar nicht, wie ich gerade festgestellt habe.
Allerdings fragt sich, wozu du denn einen anderen Namen vergen willst, da man den Name doch so gut wie nie sieht.
Was möchtest Du mit den Namen den anfangen?
Vielleicht kann ich dir anders helfen.
Gruß
René
Anzeige
AW: Name eines Diagrammes
23.04.2005 13:14:15
Reinhard
Hallo Franz,
mit

Sub tt()
For Each Bild In ActiveSheet.Shapes
MsgBox Bild.Name
Next Bild
End Sub

erfährst du die Namen, zb Chart 38
Mit
ActiveSheet.Shapes("Chart 38").Name = "MeinDiagramm12"
änderst du den Namen.
Ansprechen dann mit
ActiveSheet.Shapes("MeinDiagramm12").Visible = False
Gruß
Reinhard
Viele Grüße
AW: Name eines Diagrammes
23.04.2005 13:19:18
Rene
Das ist korrekt, allerdings wollte, glaube ich Franz,
dass dann auch der interne Name (siehe Diagrammfenster),
geändert wird. Dieser name wird aber nicht geändert.
Codename ?
23.04.2005 13:49:27
Reinhard
Hallo Rene,
aha, dann ist ggfs. der Codename gemeint, siehe nachträglichen Auszug aus der Hilfe. Aus dem Satz:
"Eine programmgesteuerte Änderung dieser Eigenschaft während der Ausführung des Programms ist nicht möglich."
schliesse ich dass man ihn zur Laufzeit nicht ändern kann.
Aber, wie krieg ich denn mit vba diesen Namen angezeigt?
Bild.Codename klappt nicht :-(
Viele Grüße
Reinhard
CodeName-Eigenschaft
Gibt den Codenamen für das Objekt zurück. String Schreibgeschützt.
Anmerkung Der Wert, der im Fenster Eigenschaften in der Zelle rechts neben (Name) angezeigt wird, ist der Codename des ausgewählten Objekts. Sie können den Codenamen eines Objekts beim Entwurf ändern, indem Sie diesen Wert ändern. Eine programmgesteuerte Änderung dieser Eigenschaft während der Ausführung des Programms ist nicht möglich.
Anmerkungen
Der Codename für ein Objekt kann an Stelle eines Ausdrucks verwendet werden, der das Objekt zurückgibt. Wenn der Codename des ersten Tabellenblatts Sheet1 lautet, stimmen die beiden folgenden Ausdrücke miteinander überein:
Worksheets(1).Range("a1")
Sheet1.Range("a1")
Der Blattname kann sich vom Codenamen unterscheiden. Beim Erstellen eines Blatts stimmen Blattname und Codename überein. Die Änderung des Blattnamens wirkt sich jedoch nicht auf den Codenamen aus, und die Änderung des Codenamens (mit Hilfe des Fensters Eigenschaften im Visual Basic-Editor) ändert nicht den Blattnamen.
Anzeige
AW: Codename ?
23.04.2005 14:29:24
Rene
Hallo Reinhard,
dieser Code zeigt dir die Name alles Diagramme an, allerdings in der englischen Version
(Chart statt "Diagramm"). Kann aber sein, dass das an der Excel-Version liegt.
Versuchs einfach mal.

Sub Name()
Dim ch As ChartObject
Dim i As Integer
For i = 1 To Worksheets.Count
Worksheets(i).Activate
For Each ch In ActiveSheet.ChartObjects
MsgBox ch.Name
Next ch
Next i
End Sub

Gruß
René
AW: Codename ?
23.04.2005 17:30:32
Nepumuk
Hallo René,
das kommt daher, weil du das Chartobject ansprichst. Das Chartobject ist ein Containerobjekt, welches das Chart als Objekt enthält. Wenn du an den Diagrammnamen kommen willst, musst du das entsprechende Element ansprechen.
MsgBox ch.Chart.Name
Gruß
Nepumuk
Anzeige
O T danke für die Info
25.04.2005 22:37:21
Reinhard
Hallo Nepumuk,
"Das Chartobject ist ein Containerobjekt, welches das Chart als Objekt enthält"
Sowas steht ja auch in der Hilfe so, das ist für mich wie die Arrayformeln von Boris, wird noch sehr lange dauern bis ich das kapiere :-)
Viele Grüße
Reinhard
Danke Euch allen...
23.04.2005 18:58:53
Franz
Hallo an alle,
(Antwort erst jetzt, war mit den Kids draußen...)
aus all dem, was Ihr hier geschrieben habt, konnte ich mir das rausziehen, was ich suchte (Diagramm ansprechen, Namen ändern, ...). In erster Linie ging es mir ums Anzeigen/Verstecken von Diagrammen. Habe mehrere gleichartige Sheets selben Aufbaus. In jedem Blatt soll ein Diagramm mehrere Wertereihen des Blattes darstellen, allerdings nur auf Knopfdruck dargestellt. Und all das konnte ich dank Eurer Hilfe umsetzen.
Nochmal danke und Grüße
Franz
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige