in einem Diagramm auf Sheets("Monthly") habe ich ein Label eingefügt, das per Makro den Inhalt der Zelle C7 aus Sheets ("Result") übernehmen soll. Dazu habe ich folgendes geschrieben. Funktioniert aber nicht. Kann mir jemand helfen? Vielen herzlichen Dank. Rüdiger
Sub label_beschriften ()
Sheets("Monthly").Shapes("Label 16").Characters.Text = Sheets("Result").Range("C7")
End Sub