Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Problème pour changer la caption d' 1 bouton

Problème pour changer la caption d' 1 bouton

1 réponse
Avatar
Serge
Bonjour,

J'ai un problème pour changer la caption d'1 bouton.
Voici mon code :

Sub Bouton3_QuandClic()
Worksheets("Résultats").Activate
If Columns("B:N").EntireColumn.Hidden = True Then
Columns("B:N").EntireColumn.Hidden = False
Bouton3.Caption = "visible" -----> Ligne me posant problème
Else
Columns("B:N").EntireColumn.Hidden = True
Bouton3.Caption = "caché" -----> Ligne me posant problème
End If
End Sub

Merci de votre aide
Signaler un problème avec ce contenu

1 réponse

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jean-Marie GILTAIRE
Je l'ai fait avec un CommandButton de la barre d'outil "Boîte de contrôle"
et ça fonctionne.
Cela répond-il à ton attente ?

JM

PS : tu devrais rester dans le fil de discussion initial.

"Serge" <serge.g8[NO-SPAM]@laposte.net> a écrit dans le message de news:
ck05s9$1eq2$
Bonjour,

J'ai un problème pour changer la caption d'1 bouton.
Voici mon code :

Sub Bouton3_QuandClic()
Worksheets("Résultats").Activate
If Columns("B:N").EntireColumn.Hidden = True Then
Columns("B:N").EntireColumn.Hidden = False
Bouton3.Caption = "visible" -----> Ligne me posant problème
Else
Columns("B:N").EntireColumn.Hidden = True
Bouton3.Caption = "caché" -----> Ligne me posant problème
End If
End Sub

Merci de votre aide