Hallo Markus,
du "formatierst" ja deine Labels mit "#,##0.00 €"
Wenn du das dann so in eine Zelle schreibst, bleibt es erst mal ein String, da hinter der Zahl ja ein Leerzeichen und € kommt.
Und mit einem String kann kein Diagramm was anfangen, man benötigt ein "Wert"
Dafür setzt man dann eine Umwandlungsfunktion ein, in deinem Beispiel, da du ja auch mit Nachkommastellen rechnest
würde ich dir die Funktion "CDbl" empfehlen.
Worksheets( "Tabelle1" ).Range( "F1" ).Value = CDbl( Me .lblLaender)
Die Funktion fängt bei einem String vorne an, und geht so lange nach rechts bis sie auf ein Text-Zeichen trift.
Das wird dann als Wert zurückgegeben.
|