OVH Cloud OVH Cloud

Zone de texte

1 réponse
Avatar
Dardevil
Bonjour

J'aimerai créer une zone de texte, modifiable en fonction d'une variable
(par exemple un prenom), non proteger, et l'afficher ou la masquer a ma
guise d'un un classeur partager..

En fait, la zone de texte doit s'afficher lors de l'exécution d'une macro, a
la fin se masquer.

Vu que le classeur est proteger et partager on ne peut creer un objet, on
peut n'afficher qu'un objet existant... enfin je crois

ma question est donc, comment afficher et masquer a ma guise, une zone de
texte ds un classeur partager et proteger, et changer le texte a
l'interieur...

Merci

Dardevil

1 réponse

Avatar
AV
Qque chose comme ça ?

Sub zz_ZnText()
Application.ScreenUpdating = False
With ActiveSheet
.Unprotect
With .DrawingObjects("MaZone")
.Visible = False
.Characters.Text = "riri"
End With
.DrawingObjects("MaZone").Visible = True
.Protect
End With
End Sub

AV