Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Diagramm umbenennen

Diagramm umbenennen
01.05.2006 18:54:12
Matthias
Hallo Forum,
wenn ich mit VBA über diesen Befehl,

Charts.Add

ein Diagramm erzeuge, wird diesem automatisch ein Name zugewiesen, z.B. "Diagramm 3".
Wie kann ich den Name des Diagramms selbst bestimmen bzw. ändern?
Ich habs so versucht,

Charts.Add
ActiveChart.Name = "Beispiel"

funktioniert aber nicht.
Danke schon mal.
Gruß.
Matthias
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Diagramm umbenennen
01.05.2006 19:03:55
ChrisL
Hallo Matthias

Sub t()
Dim ch As Chart
Set ch = Charts.Add
ch.Name = "Beispiel"
End Sub

Gruss
Chris
AW: Diagramm umbenennen
01.05.2006 19:42:47
Matthias
Hallo Chris,
ich hab mich falsch ausgedrückt.
Ich schilder mal das ganze Problem. Ich will das Diagramm als "Objekt in die Mappe" einfügen und will dann die Größe des Diagramms ändern.
Die Größe müsste ich eigentlich so ändern können,

ActiveSheet.ChartObjects("Diagramm 25").Activate
ActiveChart.ChartArea.Select
ActiveSheet.Shapes("Diagramm 25").ScaleWidth 1.26, msoFalse, _
msoScaleFromTopLeft
ActiveSheet.Shapes("Diagramm 25").ScaleHeight 1.25, msoFalse, _
msoScaleFromBottomRight

aber damit das funktioniert muss ich den Namen oder den Titel oder was das in der Klammer auch immer ist, selbst festlegen können.
Danke.
Gruß.
Matthias

Anzeige
AW: Diagramm umbenennen
02.05.2006 10:46:03
Herbert
Hallo Matthias,
ActiveSheet.ChartObjects.Add(20, 100, 300, 200).Name = "Mein Diagramm"
gruß Herbert
AW: Diagramm umbenennen
02.05.2006 23:57:37
Matthias
Vielen Dank.
Funktioniert einwandfrei.
Aber was bedeuten die Zahlen (20, 100, 300, 200)?
Gruß.
Matthias
AW: Diagramm umbenennen
03.05.2006 08:29:52
Herbert
linker Abstand,oberer Abstand,
Breite,Höhe
gruß Herbert
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Diagramm umbenennen in Excel


Schritt-für-Schritt-Anleitung

Um ein Diagramm in Excel umzubenennen, kannst Du VBA verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne den VBA-Editor:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Füge ein neues Modul hinzu:

    • Klicke im Menü auf Einfügen und wähle Modul.
  3. Füge den Code ein:

    • Kopiere den folgenden Code in das Modul:
    Sub DiagrammUmbenennen()
       Dim ch As Chart
       Set ch = Charts.Add
       ch.Name = "Mein Diagramm"
    End Sub
  4. Führe das Makro aus:

    • Drücke F5, um das Makro auszuführen. Dein Diagramm wird nun mit dem Namen "Mein Diagramm" erstellt.
  5. Diagramm als Objekt einfügen:

    • Um ein Diagramm als Objekt in die Mappe einzufügen und gleichzeitig die Größe zu ändern, kannst Du folgenden Code verwenden:
    ActiveSheet.ChartObjects.Add(20, 100, 300, 200).Name = "Mein Diagramm"

Hierbei sind die Zahlen die Position und Größe des Diagramms: linker Abstand, oberer Abstand, Breite, Höhe.


Häufige Fehler und Lösungen

  • Fehler: Diagramm wird nicht umbenannt
    Lösung: Stelle sicher, dass Du den Namen des Diagramms im Code korrekt angibst. Vermeide Sonderzeichen.

  • Fehler: Diagramm erscheint nicht
    Lösung: Überprüfe, ob das Makro wirklich ausgeführt wurde. Du kannst auch die Excel-Version prüfen, da einige Funktionen in älteren Versionen nicht verfügbar sind.


Alternative Methoden

Wenn Du Diagramme in Excel benennen möchtest, kannst Du auch die Benutzeroberfläche verwenden:

  1. Rechtsklick auf das Diagramm.
  2. Wähle Diagrammtyp ändern.
  3. Im rechten Bereich kannst Du den Namen des Diagramms anpassen.

Diese Methode ist nützlich, wenn Du nicht mit VBA arbeiten möchtest.


Praktische Beispiele

Hier sind einige praktische Beispiele, wie Du Diagramme in Excel benennen kannst:

  • Beispiel 1: Ein einfaches Liniendiagramm erstellen und benennen:

    Sub LiniendiagrammErstellen()
       Dim ch As Chart
       Set ch = Charts.Add
       ch.ChartType = xlLine
       ch.Name = "Verkaufszahlen 2023"
    End Sub
  • Beispiel 2: Ein Säulendiagramm erstellen und als Objekt hinzufügen:

    ActiveSheet.ChartObjects.Add(50, 50, 400, 300).Name = "Umsatz 2023"

Tipps für Profis

  • Nutze sprechende Namen: Stelle sicher, dass die Namen der Diagramme aussagekräftig sind, wie z.B. "Umsatz 2023" oder "Kundenzufriedenheit Q1".

  • Verwende Variablen: Wenn Du viele Diagramme erstellst, speichere den Namen in einer Variablen, um den Code übersichtlicher zu gestalten.

  • Automatisiere den Prozess: Erstelle eine Schleife, um mehrere Diagramme in einem Rutsch zu benennen.


FAQ: Häufige Fragen

1. Wie kann ich ein bereits bestehendes Diagramm umbenennen?
Du kannst das Diagramm mit VBA ansprechen und den Namen ändern:

Charts("Diagramm 1").Name = "Neuer Name"

2. Funktioniert das auch in älteren Excel-Versionen?
Die meisten VBA-Funktionen sind ab Excel 2007 verfügbar. Bei älteren Versionen kann es zu Einschränkungen kommen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige