Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 09:31:31
Bild "In Zelle platzieren"
25.04.2024 09:23:47
Spalten in Kreuztabelle hinzufügen/löschen je nach Vorgabe
25.04.2024 08:41:49
VBA: Probleme mit pdftk zum Zusammenfügen
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1588to1592
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
1588to1592
1588to1592
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

WENN DANN Diagramme

WENN DANN Diagramme
17.11.2017 13:59:24
Ruil 

Sub DatenbeschriftungSteuerung()
Sheets("Diagramm").ChartObjects("DiagrammA").Activate
If (msoElementDataLabelCallout) = 211 Then
ActiveChart.SetElement (msoElementDataLabelNone)
ElseIf (msoElementDataLabelNone) = 200 Then
ActiveChart.SetElement (msoElementDataLabelCallout)
End If
End Sub
Mit dem obigen Makro möchte ich die Datenlegende im "DiagrammA" ein- und ausblenden können, allerdings funktioniert das ganze nicht. Die Datenlegende wird weder ausgeblendet noch eingeblendet. Woran liegt das?

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Datenreihenbeschriftung Anzeigen/Ausblenden
17.11.2017 15:00:46
Beverly
Hi,
meinst du so etwas:
    With Worksheets("Diagramme").ChartObjects("DiagrammA").Chart
If .SeriesCollection(1).HasDataLabels = True Then
.SeriesCollection(1).DataLabels.Delete
Else
.SeriesCollection(1).ApplyDataLabels
End If
End With

AW: WENN DANN Diagramme
17.11.2017 15:15:53
Ruil
Ja genau, allerdings für alle Datensätze mit den jeweiligen Werten der X und Y-Achse. In deinem Fall wird nur der X-Wert des 1. Datensatzes ein- und ausgeblendet.
Datenreihenbeschriftung Anzeigen/Ausblenden
17.11.2017 16:50:29
Beverly
In deinem Beitrag stand ja nicht, wie viele Datenreihen das Diagramm hat. Wenn es mehr als 1 ist musst du einfach in einer Schleife über alle Datenreihen laufen...
    Dim lngReihe As Long
With Worksheets("Diagramme").ChartObjects("DiagrammA").Chart
For lngReihe = 1 To .SeriesCollection.Count
If .SeriesCollection(lngReihe).HasDataLabels = True Then
.SeriesCollection(lngReihe).DataLabels.Delete
Else
.SeriesCollection(lngReihe).ApplyDataLabels
End If
Next lngReihe
End With

Anzeige

301 Forumthreads zu ähnlichen Themen

wenn eingabe in zelle, dann anderes diagramm
Martin

Hallo zusammen,
ichj hab da mal ne Frage:
ich möchte in einer vorlage in der ich ein diagramm habe je nachdem ich eine eingabe in Zelle d55 habe die Datenquelle erweitern und die neue Linie auf der Sekundärachse haben(die anderen drei Linien bleiben auf der Primärachse.
Der normale...
28.10.2005 16:12:25
Thread-ID: 688493
5 Beiträge
Anzeige
Wenn 1 dann Wert aus Überschrift
Kendra

Hallo,
ich habe folgendes Problem, zu dem mir einfach keine Lösung einfallen will:
Meine Matrix sieht in etwa so aus:
______Peter_Hans_Susi_Karl_Klaus
Auto___0____1____0___2___0
Haus___1____0____0___0___2
Urlaub__0____0____1___0___2
Hobby__2____0____0___1___0...
23.09.2008 14:03:57
Thread-ID: 1011726
7 Beiträge
Linie im Chart dicker machen (...als max.)?
ingo

Moin,
folgende Frage: Habe aus einer Tabelle einen Chart erstellt und möchte jetzt die Chartlinie dicker machen... und zwar dicker als das Maximum vorgibt (sind ja nur 4 Breiten einstellbar und die breiteste reicht halt nicht aus). Gibts da einen Weg?
Danke und Gruss, Ingo
08.01.2009 14:01:00
Thread-ID: 1037910
2 Beiträge
Anzeige
Durchgehende Linie mit EINEM Wert bei Diagramm?
Frank

Hallo zusammen,
ich habe ein Balkendiagramm mit Werten für die Monate Januar bis Dezember. Ein zusätzlicher Wert aus der Datentabelle soll als durchgehende Linie über die 12 Monate dargestellt werden ohne an der Datentabelle Ergänzungen vornehmen zu müssen.
Geht das überhaupt in Excel?...
26.01.2009 07:40:00
Thread-ID: 1043728
3 Beiträge
Wenn kein Eintrag dann 0
Alex

Hi @ all!
Habe ein kleines Problem:
Habe folgende Formel, aber es wird immer Divison durch Null angezeigt...
=WENN(H3=" ";"0";H3/F3)
Ich quasi nur Teilen, wenn in H3 ein Eintrag vorhanden ist, oder eben wenn kein Eintrag vorhanden ist soll 0 da stehen...
Vielen Dank schon ma...
14.07.2009 12:41:15
Thread-ID: 1088433
5 Beiträge
Balkendiagramm mit Zeitziellinie
{Boris}

Hi Leute,
ich hab folgendes Diagramm in Säulenform und möchte es aber gerne als Balkendiagramm haben. Probleme macht mir die Zeitziel-Datenreihe (Zeitziel errechnet sich automatisch in Abhängigkeit des aktuellen Datums), der ich im Bild das Liniendiagramm zugewiesen habe. Doch senkrecht wil...
31.08.2009 14:10:08
Thread-ID: 1099603
4 Beiträge
Balkendiagramm mit Ziellinie
Heike

Hallo,
leider komme ich in der Excel 2007 Version nicht mit Diagrammen klar. Ich hoffe, ihr könnt mir helfen.
Ich habe eine einfache Tabelle, die Umsätze werden als Balken dargestellt, nun möchte ich aber noch eine Ziellinie haben, die bei 5.000 € liegt. Also eine waagerechte Linie ober...
16.09.2009 21:30:01
Thread-ID: 1103344
24 Beiträge
Diagramm trendlinie Automatisch einfügen,ändern,an
chris

Hallo VBA experten,
ich brauche eure Hilfe.Ich habe ein ganz normales Balkendiagramm.In diesem stelle ich Werte dar über 2 jahre(unten Rubrikenachse).
die wete sind immer unterschiedlich je nachdem welche daten eingegeben und Ausgewertet werde.
Die Achse links ist aber für beide jah...
08.01.2010 01:11:33
Thread-ID: 1127913
4 Beiträge
Anzeige

Links zu Excel-Dialogen

Label

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
4
4
6
1
1
2
4
3
23
3
3
8
7
4
1
6
1
11
4
3
7
5
2
9
4