Supportnet / Forum / Tabellenkalkulation

Hallo ihr da draußen, ich habe mir ein Wasserfall-Diagramm gebastelt, in dem ich per Makro die Werte der jeweiligen Balken durch eine Zelle ersetze. Das makro sieht so aus: ActiveSheet.ChartObjects("Diagramm 1").Activate ActiveChart.SeriesCollection(2).DataLabels.Select ActiveChart.SeriesCollection(2).Points(6).DataLabel.Select Selection.Characters.Text = Range("H42") Selection.AutoScaleFont = False With Selection.Characters(Start:=1, Length:=4).Font .Name = "Arial" .FontStyle = "Fett" .Size = 11 .Strikethrough = False .Superscript = False .Subscript = False .OutlineFont = False .Shadow = False .Underline = xlUnderlineStyleNone .ColorIndex = xlAutomatic End With Nun habe ich aber ein Problem: Ich möchte bei den Werten, die größer als 1000 sind ein 1000er-Trennzeichen haben. Ich kann zwar im Diagramm dort ein Häckchen setzen, es passiert aber nichts. Ich glaube, das liegt daran, dass im Makro in dieser Zeile Selection.Characters.Text = Range("H42") dieses Feld als Text markiert wird. Hat jem. einen Vorschlag, wie ich dieses Feld als eine Zahl definieren kann? Gruß Heiko

Hallo
Vielleicht geht´s so:

Selection.Characters.Text = Format(Range("H42"), "#.##0")

Ansonsten sollte man das Ding (Arbeitsmappe) sichten, da ich mir unter einem Wasserfall-Diagramm nichts konkretes vorstellen kann. www.netupload.de

Gruß[h3]{[h1]^Ó_¤[sup...fürLau
Signatur wurde ganz und gar ohne SNTool erstellt.

Vielen Dank für die antwort.

Ersteinmal nur so zur Info: ein wasserfalldiagramm ist z.B. das hier. http://de.wikipedia.org/wiki/Bild:Wasserfalldiagramm.png

Gibt aber auch noch andere bezeichnungen dafür.

Ich werde morgan ausprobieren, ob der Vorschlag klappt.

Gruß Heiko

• Makro macht nur einen Schritt
• Diagrammbeschriftung in Excel
• kann wegen makro nicht drucken - was machen?