XL 2013 lire le texte d'une shapes dessin à main levée (erreur 1004)

patricktoulon · 27 Juillet 2020

bonjour a tous
quelqu'un sait comment lire le texte d'une shape (dessin a main levée)
j'ai une belle erreur 1004

sylvanu · 27 Juillet 2020

Bonjour Patrick
J'ai appris ça aujourd’hui :

VB:

Sub essai()
    MsgBox ActiveSheet.Shapes("Rectangle 1").TextFrame.Characters.Text
    MsgBox ActiveSheet.Shapes("Forme libre 2").TextFrame2.TextRange.Characters.Text
End Sub

Texte dans une forme libre - Macros et VBA Excel

Je cherche à insérer du texte dans une forme créée en dessin vectoriel, donc pas ne forme standard. Pour cela Excel ne le permet pas en utilisation normale (lorsque l'on clique sur la forme, "Modifier le

www.developpez.net

sylvanu · 27 Juillet 2020

Bonjour Patrick
J'ai appris ça aujourd’hui :

VB:

Sub essai()
    MsgBox ActiveSheet.Shapes("Rectangle 1").TextFrame.Characters.Text
    MsgBox ActiveSheet.Shapes("Forme libre 2").TextFrame2.TextRange.Characters.Text
End Sub

Texte dans une forme libre - Macros et VBA Excel

Je cherche à insérer du texte dans une forme créée en dessin vectoriel, donc pas ne forme standard. Pour cela Excel ne le permet pas en utilisation normale (lorsque l'on clique sur la forme, "Modifier le

www.developpez.net

patricktoulon · 27 Juillet 2020

re bonjour @sylvanu
Ah!!... ben voila une bonne chose
Merci Sylvanu
c'est nickel
on aura appris tout les deux
good job!!!

XL 2013 lire le texte d'une shapes dessin à main levée (erreur 1004)

patricktoulon

XLDnaute Barbatruc

sylvanu

Texte dans une forme libre - Macros et VBA Excel

sylvanu

XLDnaute Barbatruc

Texte dans une forme libre - Macros et VBA Excel

Pièces jointes

patricktoulon

XLDnaute Barbatruc

Discussions similaires