Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Modifier le texte d'une forme par macro

16 views
Skip to first unread message

Fredo(67)

unread,
May 9, 2022, 5:06:23 AM5/9/22
to
Bonjour,

Soit une feuille avec 1 forme nommée CASE_01

Soit une macro destinée à modifier le texte affiché dans cette forme
pour lui appliquer une valeur notée dans la cellule M1

J'ai tenté ce code, mais il ne semble pas fonctionner
Sub BLOCK_Z()
Dim Sh As Shape
Sh.CASE_01.Caption = Range("m1").Value
End Sub

MichD

unread,
May 9, 2022, 6:07:31 AM5/9/22
to
Le 09/05/22 à 05:06, Fredo(67) a écrit :
Bonjour,

LaShape = "Nom de la form shape"

with worksheets("Feuil1")
.Shapes("LaShape").OLEFormat.Object.Text = .Range("m1").Valueur
End with

MichD

MichD

unread,
May 9, 2022, 6:50:05 AM5/9/22
to

Le 09/05/22 à 06:06, MichD a écrit :
.Valueur doit être ".Value"

MichD

Fredo(67)

unread,
May 10, 2022, 2:57:35 AM5/10/22
to
Ok merci beaucoup
0 new messages