Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Null-Werte in Datenbeschriftung ausblenden

Null-Werte in Datenbeschriftung ausblenden
26.08.2005 11:10:20
WebViper
Hallo,
ich erstelle per VBA mehrere Diagramme aus Tabellen eines Datenblattes. Die Anzahl dieser Tabellen ist variabel.
Jetzt hab ich das Problem, dass diese Tabellen des öfteren 0-Werte beinhalten, die dann als Datenbeschriftung immer mit ausgegeben werden.
Kann ich Datenbeschriftungen in Form von "Kategorie, 0,00, 0 %" nicht irgendwie unterbinden?
Ich kann nicht immer alle Nullen durch #NV ersetzen, und diese dann der Hintergrundfarbe anpassen wie im Archiv oft geraten wird. Ich brauche die Nullen für eine komplette Darstellung der Tabelle. Mit diesen Werten wird auch wieder gearbeitet, sprich, die #NVs würden den Fehler nur verschieben.
Hat jemand noch eine Idee?
Danke!
WebViper
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Null-Werte in Datenbeschriftung ausblenden
26.08.2005 12:02:05
Herbert
hallo WV,
so kannst du Nullwerte in der Beschriftung ausblenden:


Sub x()
Dim Datr As Series, dr
Dim pkte As Points, pkt As Point
Dim sh As Worksheet
Set sh = Sheets("Tabelle1")
Application.ScreenUpdating = False
For dr = 1 To 6
    Set Datr = sh.ChartObjects(1).Chart.SeriesCollection(dr)
    Datr.HasDataLabels = True
    Set pkte = Datr.Points
      For Each pkt In pkte
        With pkt.DataLabel
           If .Text = 0 Then .Text = ""
        End With
     Next
Next
Application.ScreenUpdating = True
End Sub

     gruß Herbert
Anzeige
AW: Null-Werte in Datenbeschriftung ausblenden
26.08.2005 14:50:33
WebViper
Hey super,
sowas hab ich mir vorgestellt...
Aber warum for dr = 1 to 6?
Und bei den Datenbezeichnungen, die einen Wert enthalten "löscht" das Programm die Bezeichnung/die Prozentangabe weg und lässt nur den Wert stehen.
Wie kann ich das verhindern?
Danke für die Hilfe!
AW: Null-Werte in Datenbeschriftung ausblenden
26.08.2005 15:55:45
Herbert
das ist nur 0815-Beispiel,daß man an deine Bedürfnisse anpassen muß...
wenn du es genau wissen willst,warum "1 to 6"...
weil ein paar Beiträge weiter unten 6 Datenreihen zum ansprechen waren...
wenn man das genaue Format angibt,
müßte es funken...


      For Each pkt In pkte
         If pkt.DataLabel.Text = "0,0 %" Then
             pkt.DataLabel.Text = ""
         End If
      Next

     gruß Herbert
Anzeige
AW: Null-Werte in Datenbeschriftung ausblenden
29.08.2005 08:42:59
WebViper
Ok, werd ich gleich mal ausprobieren...
vielen Dank!
WebViper
AW: Null-Werte in Datenbeschriftung ausblenden
26.08.2005 23:40:52
th.heinrich
hallo ? bitte mit realvornamen posten,
wenn ich Dich richtig verstanden habe ist dies eine moeglichkeit.
0 in Datenbeschriftung nicht anzeigen [0]#0;;;
gruss thomas
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Null-Werte in Excel-Datenbeschriftungen ausblenden


Schritt-für-Schritt-Anleitung

Um Null-Werte in Excel-Datenbeschriftungen auszublenden, kannst du VBA (Visual Basic for Applications) verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

  1. Öffne deine Excel-Datei und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.

  3. Kopiere den folgenden Code in das Modul:

    Sub x()
       Dim Datr As Series, dr As Integer
       Dim pkte As Points, pkt As Point
       Dim sh As Worksheet
       Set sh = Sheets("Tabelle1") ' Ändere den Namen entsprechend
    
       Application.ScreenUpdating = False
    
       For dr = 1 To 6 ' Ändere die Anzahl der Datenreihen
           Set Datr = sh.ChartObjects(1).Chart.SeriesCollection(dr)
           Datr.HasDataLabels = True
           Set pkte = Datr.Points
           For Each pkt In pkte
               With pkt.DataLabel
                   If .Text = "0" Or .Text = "0,0 %" Then .Text = ""
               End With
           Next
       Next
    
       Application.ScreenUpdating = True
    End Sub
  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Führe das Makro aus, indem du ALT + F8 drückst, das Makro auswählst und auf Ausführen klickst.

Mit diesem Code werden alle Nullwerte in den Datenbeschriftungen deines Diagramms ausgeblendet.


Häufige Fehler und Lösungen

  • Fehler: Die Datenbeschriftungen werden nicht aktualisiert.

    • Lösung: Stelle sicher, dass du das Makro nach jeder Änderung der Daten erneut ausführst.
  • Fehler: Das Diagramm zeigt immer noch die Nullwerte an.

    • Lösung: Überprüfe den Code und stelle sicher, dass die Bedingungen für das Ausblenden der Nullwerte korrekt sind.
  • Fehler: Fehlermeldung beim Ausführen des Makros.

    • Lösung: Stelle sicher, dass der Name des Arbeitsblatts im Code mit dem tatsächlichen Namen übereinstimmt.

Alternative Methoden

  1. Formatierung der Datenbeschriftungen:

    • Du kannst die Datenbeschriftungen manuell formatieren, indem du die Werte auf "Benutzerdefiniert" setzt und das Format 0;-0;;@ verwendest. Dies blendet Nullwerte aus, zeigt jedoch andere Werte an.
  2. Verwendung von Formeln:

    • Erstelle eine Hilfsspalte neben deinen Daten, die die Formel =WENN(A1=0;"";A1) verwendet. Diese Formel zeigt nur Werte an, wenn sie nicht Null sind. Verwende diese Hilfsspalte für deine Diagramm-Datenbeschriftungen.

Praktische Beispiele

Angenommen, du hast ein Diagramm mit den folgenden Werten:

Kategorie Wert
A 10
B 0
C 20
D 0

Wenn du das oben genannte Makro ausführst, wird das Diagramm nur die Werte 10 und 20 in den Datenbeschriftungen anzeigen, während die Nullwerte für B und D ausgeblendet werden.


Tipps für Profis

  • Dynamische Anpassung: Passe den Code an, um die Anzahl der Datenreihen dynamisch zu bestimmen, anstatt sie festzulegen.

  • Fehlerbehandlung: Integriere Fehlerbehandlungsroutinen in deinen VBA-Code, um Abstürze zu vermeiden und informative Fehlermeldungen auszugeben.

  • Visualisierung: Nutze bedingte Formatierungen in Excel, um Diagramme visuell ansprechender zu gestalten, während du gleichzeitig Nullwerte ausblendest.


FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass das Makro nur auf bestimmte Diagramme angewendet wird?
Du kannst das Makro so anpassen, dass es nur auf Diagramme mit bestimmten Namen oder Typen angewendet wird, indem du zusätzliche Bedingungen im Code einfügst.

2. Welche Excel-Version benötige ich, um VBA zu verwenden?
VBA ist in den meisten modernen Excel-Versionen verfügbar, einschließlich Excel 2010, 2013, 2016, 2019 und Microsoft 365.

3. Kann ich Null-Werte auch in anderen Diagrammtypen ausblenden?
Ja, die beschriebenen Methoden gelten für alle Diagrammtypen in Excel, solange du die Datenbeschriftungen entsprechend anpasst.

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