Probleme avec code vba
anthonys006
Messages postés
8
Statut
Membre
-
anthonys006 Messages postés 8 Statut Membre -
anthonys006 Messages postés 8 Statut Membre -
Bonjour,
bonjour jaimerai faire une msgbox pour modifier un labelle dans un serform et qui change aussi dans ma cellule
puis quand je ferme ou ouvre a nouveau mon user form le nom a pas change
exemple :
EDIT : Ajout des balises de code
merci de votre aide
bonjour jaimerai faire une msgbox pour modifier un labelle dans un serform et qui change aussi dans ma cellule
puis quand je ferme ou ouvre a nouveau mon user form le nom a pas change
exemple :
Private Sub Label1_Click()
Label1.Caption = feuil1.Range("A5")
Label1.Caption = InputBox("Entrez le nouveau nom du champ """ & feuil1.Range("A5") & """ :", "Modifier", Label1.Caption)
'InputBox ( invite [ , titre ] [ , défaut ] [ , xpos ] [ , ypos ] [ , fichier d'aide ] [ , contexte ] )
If Label1.Caption <> "" Then
feuil1.Range("A5") = Label1.Caption
Label1.Caption = feuil1.Range("A5")
End If
End Sub
EDIT : Ajout des balises de code
merci de votre aide
1 réponse
-
Bonjour,
Je ne suis pas certain d'avoir compris la question.....
Mais dans le doute.... il faut charger le contenu à afficher à l'ouverture du Userform. Pas uniquement lors du clic sur ton label...
Donc ta ligneLabel1.Caption = feuil1.Range("A5")
devrait se situer avant le Userform Show
ou au moins dans le Userform_initialize()
-
-
Si j'ai du mal à comprendre ta question ... et toi à comprendre mes réponses... on est pas prêt d'y arriver....
Donc commence par reformuler ta question en essayant d'expliquer le plus clairement possible ce qui ne "fonctionne pas" selon toi.
Pense que nous ne sommes pas dans ta tête ni devant ton écran.. tu dois donc décrire ce qu'il se passe et nous dire en quoi cela ne correspond pas au comportement attendu d'après toi. -
-
-
-