Afficher Userform à l'ouverture
Résolu
Liam-alec
Messages postés
4
Date d'inscription
Statut
Membre
Dernière intervention
-
Cidou -
Cidou -
Bonjour,
Je suis débutante, très débutante en VBA. Je dois fournir un fichier Excel avec différents renseignements sur des personnes sous forme de mini base de données. (Je ne peux pas le faire avec access). J'ai créé un USERFORM qui s'affiche à l'ouverture du classeur (trouvé le code dans le forum), mais maintenant je n'ai aucune idée de comment faire pour que les informations que je vais entrer dans les champs texte apparaissent sur ma feuille Excel dans les bonnes colonnes.
Merci d'avance de votre précieuse aide
Je suis débutante, très débutante en VBA. Je dois fournir un fichier Excel avec différents renseignements sur des personnes sous forme de mini base de données. (Je ne peux pas le faire avec access). J'ai créé un USERFORM qui s'affiche à l'ouverture du classeur (trouvé le code dans le forum), mais maintenant je n'ai aucune idée de comment faire pour que les informations que je vais entrer dans les champs texte apparaissent sur ma feuille Excel dans les bonnes colonnes.
Merci d'avance de votre précieuse aide
A voir également:
- Afficher Userform à l'ouverture
- Afficher appdata - Guide
- Page d'ouverture google - Guide
- Afficher taille dossier windows - Guide
- Windows 11 afficher d'autres options - Guide
- Afficher mot de passe wifi android - Guide
3 réponses
Bonjour,
Il existe une large gamme d'instructions permettant de savoir ce genre de chose
de façon automatique.
exemple :
Il existe une large gamme d'instructions permettant de savoir ce genre de chose
de façon automatique.
exemple :
Sub InsereData()
Dim Limite As Long
' var = plage(de A65535).fin de cellule pleine(par en haut).Numero de ligne + 1
Limite = (Range("A65536").End(xlUp).Row + 1)
Cells(Limite, 1).Value = UserForm1.TextBox1.Value
Cells(Limite, 2).Value = UserForm1.TextBox2.Value
Cells(Limite, 3).Value = UserForm1.TextBox3.Value
End Sub
'
Bonjour,
Exemples types :
Lupin
Exemples types :
Private Sub TextBox1_AfterUpdate()
Sheets("Feuil1").Range("C4").Value = Me.TextBox1.Value
End Sub
'
Private Sub TextBox1_Change()
Sheets("Feuil1").Range("C4").Value = Me.TextBox1.Value
End Sub
Lupin
Bonjour,
Merci pour votre réponse. Si je comprends bien, les données entrées dans la Form sont insérées dans des cellules prédéfinies et indiquées préalablement. Si par exemple j'ouvre mon fichier xls, que j'enregistre de nouvelles données, elles vont écraser les données précédemment enregistrées? Si c'est le cas, comment faire pour que les nouvelles données s'inscrivent à la suite dans la colonne?
Merci d'avance
Merci pour votre réponse. Si je comprends bien, les données entrées dans la Form sont insérées dans des cellules prédéfinies et indiquées préalablement. Si par exemple j'ouvre mon fichier xls, que j'enregistre de nouvelles données, elles vont écraser les données précédemment enregistrées? Si c'est le cas, comment faire pour que les nouvelles données s'inscrivent à la suite dans la colonne?
Merci d'avance
Merci beaucoup pour votre aide. Je vais faire des essais. Bonne soirée