Hallo Zusammen,
hat jemand eine Idee warum ich bei nsh.Shapes("erstellt_durch").Characters.Text = ksh.Shapes("erstellt_durch").Characters.Text
eine Laufzeitfehler 438 bekommen?
Irgendetwas scheint nicht zu stimmen.
Die beiden Shapes sind vorhanden.
Gruß
Günter
Hi,
Characters.Text ist keine Eigenschaft des Shapes, sondern des Textframes des Shapes.
Denke mal, du hast das mit dem Rekorder aufgezeichnet? Da bezog sich das auf die Selektion.
Klartext:
ActiveSheet.Shapes("Text Box 2").TextFrame.Characters.Text = _
ActiveSheet.Shapes("Text Box 1").TextFrame.Characters.Text
mfg Kurt