Bonjour à tous,

j'ai un petit soucis pour récupérer le contenue de mes zones de texte.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Private Sub UserForm_Initialize()
     TextBoxAdre.Value = ActiveSheet.Shapes.Range(Array("ZoneTexte 2")).TextFrame2.TextRange.Characters.Text 'adresse
     TextBoxSit.Value = ActiveSheet.Shapes.Range(Array("ZoneTexte 3")).TextFrame2.TextRange.Characters.Text 'site
     TextBoxRP.Value = ActiveSheet.Shapes.Range(Array("ZoneTexte 7")).TextFrame2.TextRange.Characters.Text 'réalisé par  
End Sub
Sous Excel 2010 ça fonctionne très bien mais sur 2003 ça me donne Erreur d'exécution 438 "Propriété ou méthode non gérée par cet objet."

Si quelqu'un peu m'aider à le rendre compatible avec 2003 ce serai super.

Merci d'avance

(Ps: je ne peux pas coder tout le temps en 2003, je ne l'ai sous la main que rarement)