USERFORM au chargement

[MAC_H1]

Bonjour à tous,

Je voudrais qu'un userform s'ouvre lorsque je charge un fichier Excel. Aussi, j'aimerais qu'il possede un champ lié à une celulle et que celui-ci soit rempli pour permettre l'utilisation modifiant la cellule à laquelle il est lié.

Par exemple, j'ouvre mon fichier, je tape "abcdef" dans le champ de l'USERFORM. Admettons que celui ci soit lié à la cellule A1, on trouvera écrit "abcdef" dans la cellule A1.

Merci d'avance,

MAC.

 

[Robert]

Re : USERFORM au chargement

Bonjour Mac, bonjour le forum,

Tu crées une UserForm (UserForm1) avec un champ (TextBox1) et un bouton (CommandButton1) de validation....

Le code suivant, à placer dans le composant ThisWorkbook lance l'Userform à l'ouverture du classeur :

Private Sub Workbook_Open()
UserForm1.Show
End Sub

Tu tapes ton texte dans la Textbox1 et tu valides sur le bouton...
le code suivant inscrit le texte éditée dans la cellule souhaité :

Private Sub CommandButton1_Click()
Sheets("ton_onglet").Range("ta_cellule").Value = TextBox1.Value
End Sub

Édition :

Salut Dull ! Toujours un plaisir pour moi aussi de te croiser.

 

[Dull]

Re : USERFORM au chargement

Salut Mac_H1, le Forum

Beaucoup de réponses se rapporte à ta question En faisant une petite recherche sur ce Forum tu aurais pu trouver ta réponse

enfin
Pour ta Première question

Dans le Module ThisWorkbook colle ces lignes

Private Sub Workbook_Open()
Load Userform1 'Charge ton UserForm1 Si ton UserForm s'appelle comme ça
Userform1.Show 'Apparition de ton UserForm
End Sub

Pour la Seconde
Si ton Champs est un TextBox

Private Sub TextBox1_Change()
ActiveSheet.Range("A1").Value = TextBox1.Value
End Sub

Se sont bien entendu des exemples

Bonne Journée
EDITION: Heureux de te croiser Robert 🙂

 

[MAC_H1]

Re : USERFORM au chargement

Ce n'est pas faute d'avoir cherché, mais ce sont des requetes bien precise et je doutais que qq'un ai eu besoin de la même chose que moi donc je n'y ai pas passé beaucoup de temps..

Quoiqu'il en soit, merci beaucoup, ca marche parfaitement !

MAC.