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

Forumthread: Gantt-Diagramm per Makro anpassen

Gantt-Diagramm per Makro anpassen
Litschis
Hallo zusammen,
grübel hier gerade über einem für mich sehr kniffligen Problem! Ich würde gerne mit Hilfe eines Makros das Gantt-Diagramm in unten stehender Datei je nach Projektstatus farblich anpassen, d.h. wenn z.B. der Projektschritt "Kriterienkatalog erstellen" als Status "Complete" eingetragen hat, soll auch der entsprechende Balken im Diagramm grün eingefärbt sein.
Ist sowas möglich? Habe überlegt, dass man ein Makro hinter einen Button ´"Aktueller Projektstatus" legen könnte, aber vielleicht braucht man den auch gar nicht und man kann das Makro "automatisieren"?
Meine VBA Kentnisse sind auf kleinstem Anfängerniveau, daher wollte ich euch fragen, ob ihr eine Idee dazu hättet?
Lieben Dank schonmal an alle Helfenden!!
LG
Litschis
https://www.herber.de/bbs/user/77258.xls
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Gantt-Diagramm per Makro anpassen
29.10.2011 11:45:36
derTom
Hallo Litschis,
hier ist mal eine ich hoffe recht überschaubare Lösung zu
deinem Problem:
https://www.herber.de/bbs/user/77275.xls
eine kurze Skizze des Lösungsweges:
1) Farbanpassung im Diagramm:
- ermitteln der Tabellenzeile des geänderten Status
- Zuordnung der Farbe zu dem entsprechenden Eintrag
- Aktivieren des zugehörigen Datenpunktes der
Diagramm-Datenreihe und Einfärben
2) Automatisierung des Makroaufrufes:
a) prinzipiell könnte der Makroaufruf durch einen Button-Klick oder eine Tastenkombination erfolgen
b) diese Lösung nutzt die ereignisgesteuerte Programmierung;
zu b)
die Prozedur Worksheet_Change wird ausgelöst, wenn Eingaben in einer Tabellenzelle vorgenommen werden:
- ermitteln der Zeile des ausgewählten Bereiches
- überprüfen, ob die Zelle in dem zu überwachenden Bereich "E4:E15" liegt
- in diesem Fall wird die Prozedur zur Farbanpassung aufgerufen
Beste Grüße
derTom
Anzeige
AW: Gantt-Diagramm per Makro anpassen
02.11.2011 18:09:20
Litschis
Hi Tom,
Perfekt! Genau nach solch einer Lösung habe ich gesucht!
Vielen Dank,
Litschis
;

Forumthreads zu verwandten Themen

Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Gantt-Diagramm in Excel per Makro anpassen


Schritt-für-Schritt-Anleitung

Um das Gantt-Diagramm in Excel farblich an den Projektstatus anzupassen, kannst du ein VBA-Makro verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne die Excel-Datei, in der sich dein Gantt-Diagramm befindet.

  2. Aktiviere die Entwicklertools:

    • Gehe zu "Datei" > "Optionen" > "Menüband anpassen".
    • Setze ein Häkchen bei "Entwicklertools".
  3. Öffne den VBA-Editor:

    • Klicke auf "Entwicklertools" > "Visual Basic".
  4. Füge ein neues Modul hinzu:

    • Rechtsklick auf "VBAProject (deinDateiname)" > "Einfügen" > "Modul".
  5. Kopiere den folgenden Code in das Modul:

    Sub UpdateGanttChart()
        Dim ws As Worksheet
        Set ws = ThisWorkbook.Sheets("NameDeinesBlattes") ' Blattname anpassen
        Dim rng As Range
        Set rng = ws.Range("E4:E15") ' Bereich des Projektstatus
    
        Dim cell As Range
        For Each cell In rng
            Select Case cell.Value
                Case "Complete"
                    cell.Offset(0, 1).Interior.Color = RGB(0, 255, 0) ' Grün
                Case "In Progress"
                    cell.Offset(0, 1).Interior.Color = RGB(255, 255, 0) ' Gelb
                Case "Not Started"
                    cell.Offset(0, 1).Interior.Color = RGB(255, 0, 0) ' Rot
            End Select
        Next cell
    End Sub
  6. Schließe den VBA-Editor und kehre zu Excel zurück.

  7. Führe das Makro aus:

    • Klicke auf "Entwicklertools" > "Makros" und wähle UpdateGanttChart aus.

Häufige Fehler und Lösungen

  • Fehler: Makro funktioniert nicht
    Lösung: Stelle sicher, dass die Makros in deinen Excel-Einstellungen aktiviert sind. Gehe zu "Datei" > "Optionen" > "Sicherheitscenter" > "Einstellungen für das Sicherheitscenter" und aktiviere die Makros.

  • Fehler: Falsche Farben werden angezeigt
    Lösung: Überprüfe die Werte in deinem Statusbereich (E4:E15). Sie müssen genau mit den im Makro definierten Werten übereinstimmen ("Complete", "In Progress", "Not Started").


Alternative Methoden

Wenn du keine VBA-Makros verwenden möchtest, kannst du auch bedingte Formatierungen nutzen, um das Gantt-Diagramm in Excel farblich anzupassen:

  1. Wähle die Zellen aus, die du formatieren möchtest.
  2. Gehe zu "Start" > "Bedingte Formatierung" > "Neue Regel".
  3. Wähle "Zellen formatieren, die enthalten" und gib die entsprechenden Werte ein.
  4. Lege die gewünschten Farben fest.

Praktische Beispiele

Hier ist ein Beispiel zur Anwendung:

Angenommen, du hast ein Gantt-Diagramm mit den folgenden Status in der Spalte E:

Projektschritt Status
Kriterienkatalog erstellen Complete
Planung der Ressourcen In Progress
Umsetzung Not Started

Nach der Ausführung des Makros wird dein Gantt-Diagramm in Excel automatisch die Balken entsprechend einfärben.


Tipps für Profis

  • Automatisiere die Ausführung des Makros: Du kannst das Makro so einstellen, dass es automatisch ausgeführt wird, wenn der Status geändert wird, indem du die Worksheet_Change-Prozedur verwendest.
  • Erstelle Schaltflächen: Füge eine Schaltfläche ein, um das Makro per Klick auszuführen. Das verbessert die Benutzerfreundlichkeit.

FAQ: Häufige Fragen

1. Wie kann ich das Makro anpassen, um mehr Status hinzuzufügen?
Du kannst einfach zusätzliche Case-Anweisungen im Makro hinzufügen, um weitere Projektstatus zu berücksichtigen.

2. Funktioniert dies in allen Excel-Versionen?
Ja, das VBA-Makro sollte in den meisten modernen Excel-Versionen (Excel 2010 und höher) funktionieren. Achte darauf, die richtigen Referenzen und Einstellungen zu verwenden.

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