Video není dostupné.
Omlouváme se.
UserForm pour les débutants : Faire un formulaire de saisie Excel
Vložit
- čas přidán 18. 08. 2024
- Mon matériel de bureau :
Clavier sans fil Logitech MX Keys S AZERTY : amzn.to/46heVwk
Souris sans fil Logitech MX Master 3S : amzn.to/4d5wPFj
Micro USB Fifine K658 : amzn.to/3SiHbcx
Bras de micro Elgato Wave Mic Arm LP : amzn.to/3Y87A0h
Elgato Stream Deck MK.2 15 touches : amzn.to/3Y7aRwS
Pour que le contenu s'adapte à votre besoin, n'hésitez pas à remplir l'enquête a ce lien :
docs.google.co...
00:00 Intro
01:00 Créer une UserForm
01:30 Propriétés des UserForms
02:55 Insertion des labels
03:58 Ajout des zones de texte
05:22 Ajout des boutons
06:50 Faire apparaitre la UserForm en VBA
08:00 Code VBA pour le bouton annuler
10:20 Code VBA pour le bouton ajouter
13:37 Rechercher la première ligne vide VBA
15:07 La boucle while en VBA
19:26 Annoter son code en VBA
21:20 Outro
Très instructif merci encore . J attends impatiemment la suite avec les conditions dans le textes box
Précis, clair et très simplifié......BRAVO et MERCI
Merci Tmoy pour ton commentaire !
Merci pour ce tuto. Clair et très pédagogique pour s'initier.
Merci pour ce tuto. Très intuitif et parfaitement expliqué.
Très bien expliqué, merci pour tous ces tutos !
Meri pour ces vidéos, elles sont très utile pour moi
Super, très pédagogique. J'ai beaucoup apprécié.
merci beaucoup pour cet grand effort.
on attend la suite avec impatience.😀😀😀😀
Très bien expliqué j'attend impatiemment le code pour supprimer un adherent 🙏
Super video, merci !
Merci pour ce tuto
Tuto super et tout mais... pour ma part.. en cliquant sur "insertion" je n'ai pas l'option "UserForm"... j'ai module et class module uniquement.. j'ai beau chercher, je ne trouve pas. merci !
J'aime vraiment tes vidéos
Merci pour ton commentaire, ça fait plaisir :)
Bonsoir, Un grand merci pour cette vidéo forte intéressante et mise en place immédiatement: Pour votre information, la formule de renvoi a ligne ne fonctionnait pas chez moi et planté Excel.
J'ai utilise celle-ci qui est opérationnelle:
'Recherche premiere ligne vide
l = 5
With Worksheets("Nom de feuille")
Do Until Cells(l, 3).Value = ""
l = l + 1
Loop
End With
Vivement la suite !
Question: comment faire pour le la forme a compléter se positionne sous la dernière ligne remplie?
Super si vous avez trouvé une solution. Alors là aucune idée pour le positionnement du UserForm par rapport au remplissage. Je ne suis même pas sur que ce soit possible. Si vous trouvez une solution pour cette dernière question n'hésitez pas à la mettre en commentaire.
génial ! merci :)
Très clair
Merci pour ce début de tuto, à quand la suite avec le bouton supprimer ?
Merci Yoyo ! Date indéterminée à date ;)
Bravo 👏👏👏👏👏
Merci Ikram !
Merci pour ce tuto très intéressant, par contre je souhaite que l'enregistrement se fasse sur la feuille Data de mon classeur Excel et la... je bloque 😞
Content de savoir que la vidéo rend service. Dans la macro VBA, il est possible de faire référence à une autre feuille : Worksheets("Data").cells(2,3)=... Ce petit bout de formule fait référence à la cellule de la ligne 2 colonne 3 (C3) de la feuille Data.
Bonjour cela était très bien expliquer j'ai pu faire mon fichier client grace a vous Mais Vous n'avez pas expliquer pour le bouton supprimer comment peut ont faire pour qu'il supprimé un client svp merci à vous et bonne journée
Un grand merci pour ce tuto qui m'a bien aidé ! Pour compléter, sais-tu comment on pourrait faire pour qu'une fois la ligne ajoutée, la liste se classe automatiquement par ordre alphabétique ?
Hello ! Je pense que tu peux regarder si tu trouves des choses sur la fonction "AutoFilter" en VBA notamment comment utiliser le ".sort" et les sous fonctions associées. N'hésite pas à mettre un commentaire en réponse si tu trouves quelque chose : ça pourra aider les autres ;)
@@xperiencel1105 Finalement j'ai opté pour un enregistrement de macro où j'ai effectué un tri de mon tableau. J'ai ensuite collé le code vba issu de cet enregistrement dans le code du bouton d'ajout que tu as détaillé entre la fermeture du formulaire et le End Sub :)
Très sympa, c'est dommage que l'image soit si mauvaise
Très bon cours.version numérique pdf
Bien expliqué ! j'ai réussi à faire mon premier formulaire Userform pour entrer des données ! Par contre, comment empêcher la validation du formulaire en tapant sur "Entrée" ? Actuellement, même si toutes les données ne sont pas inscrite et que je tape par habitude sur "Entrée", les données s'inscrivent sur ma feuille excel ...
Merci MissConti76. Je pense que vous pouvez regarder comment intégrer dans votre code les lignes avec la méthode "Application.OnKey" : vous devriez trouver sur le net quelques informations vous permettant de désactiver puis réactiver votre touche "Entrée" en fonction de là ou vous en êtes dans votre code.
Bonjour, je n'ai pas la méthode Hide, est-ce quelque chose que vous avez ajouté ? Sinon pouvez-vous m'expliquer comment faire s'il vous plait
Bonjour Coline, peut être vérifier ce qu'il y a avant le .Hide : Est ce bien le bon objet ?
Bonjour Coline, peut être vérifier ce qu'il y a avant le .Hide : Est ce bien le bon objet ?
Comment faire pour le bouton supprimer un adhérent
C'est un peu plus compliqué pour le coup. Il faut soit trouver des astuces de codes en imaginant les cas possibles. Ça demanderait une vidéo spécifique ;)
Juste une suggestion ; Le code permettrait de plus facilement progresser, car parfois, on butte sur pas grand-chose et on laisse tomber... Mis le but c'est tout de même de s'impliquer un minimum…!
Merci Alain pour votre commentaire 👍 Pour vérifier que j'ai bien compris, vous souhaiteriez que la part dédiée au code soit plus longue dans la vidéo ?
Bonjour XperienceL,
Désolé de m'immiscer mais, quand on veux apprendre la programmation à des débutants, faut le faire correctement.
1.- Il est important de déclarer les variables en ajoutant Option Explicit en haut du module. Et leur expliquer pourquoi.
2.- Il est inutile de créer une boucle d'incrémentation. Exemple:
Dim ligne as Integer
ligne = Range("a" & Rows.Count).End(xlUp).Row + 1 '=dernière ligne pleine + 1
Cells(ligne, 1) = NomBox
Cells(ligne, 2) = PrenomBox
Etc., etc.
Bonjour Jacky et merci pour votre commentaire. Je suis bien navré que mes compétences ne vous suffisent pas, cependant croyez bien que je fais de mon mieux. J'attends avec impatience votre vidéo pour pouvoir m'améliorer ;-) A bientôt !
@@xperiencel1105 Désolé mais, faire des vidéos ne m’intéresse pas. Par contre, donner des conseils de temps en temps, il n'y a aucun souci.
Dim LastRow As Long
LastRow=ActiveWorkbook.Sheets("XXXXX").Range("B1000000").End(xlUp).Row
LastRow = LastRow + 1
With ActiveWorkbook.Sheets("XXXXX")
.Range("B" & LastRow).Value=Ajouter.Value
Un truc du genre ?