Probleme avec code vba

anthonys006 Messages postés 8 Date d'inscription   Statut Membre Dernière intervention   -  
anthonys006 Messages postés 8 Date d'inscription   Statut Membre Dernière intervention   -
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 : 

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
A voir également:

1 réponse

Réponse 1 / 1
jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
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 ligne 
Label1.Caption = feuil1.Range("A5")

devrait se situer avant le Userform Show
ou au moins dans le Userform_initialize()
0
anthonys006 Messages postés 8 Date d'inscription   Statut Membre Dernière intervention  
 
je comprend pas vraiment ce que tu veuc dire
merci je suis debutant du coup je regarde sur internet beaucoup de chose qui minteresse pour faire mon propre userform
0
jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
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.
0
anthonys006 Messages postés 8 Date d'inscription   Statut Membre Dernière intervention  
 
je voudrais modifier le nom de mon label1 dans mon userform avec ume msgbox puis donne le meme nom que le lebel directement a la cellule A5
jusque la jai reussi mes quand je ferme mon userform et que je l'ouvre a nouveau le non ne reste pas
0
jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752 > anthonys006 Messages postés 8 Date d'inscription   Statut Membre Dernière intervention  
 
Ca c'est ce que fait déjà ton code non ?
Donc quel est le souci ?
0
anthonys006 Messages postés 8 Date d'inscription   Statut Membre Dernière intervention  
 
le non ne reste pas quand je ferme luserform et quand je clic annuler il ce vide au lieux de juste pas modifier
0

Discussions similaires

sertissage des cables rj45
lekludo -
brupala -

7 réponses