Excel-VBA: Gestion Base de Données
HTML-код
- Опубликовано: 27 авг 2024
- Tout sur les Bases De Données avec Excel et VBA
ABONNEZ VOUS et PARTAGEZ CETTE VIDEO, merci !
Téléchargement classeur: up1.fr/Video_s...
Tous les classeurs Excel: up1.fr/A/UP1_C...
Merci. Le tuto est très accessible. Vous êtes un bon enseignant. 🎉
Bonjour , merci pour cette présentation claire en matière de gestion de bases de données sous Excel -VBA. Franchement , j'ai fais du Excel-VBA , et j’étais à la recherche d'une bonne explication dans la gestion de bases données . je crois qu'avec cette vidéo je saurai faire assez des codes et associé les macros avec un formulaire .
Très propre et claire . Merci encore Mon CHER Monsieur...
Merci pour ce tutoriel, car il m'a beaucoup aidé dans ma vie professionnelle; que Dieu vous bénisse
le cours est très bon, je vous dis merci beaucoup
se genial d apprendre avec vous. merci
Merci beaucoup Cher Maitre. Salue de la Turquie
Merci pour ce tutoriel et bonne continuation
Merci beaucoup pour ce tuto!
Mr SEYE depuis le Sénégal
Great job man, thank you so much (y)
j'aime, merci à vous
bonjour M. Correze, merci beaucoup pour ce travail que vous avez abattu. je vous serais gré de nous faire voir comment créer un code (d'une façon plus simple). merci beaucoup d'avance
Je tiens à vous remercier pour toutes ces vidéos Vraiment, elles m'ont beaucoup aidé à découvrir le VBA étant débutant. J'ai suivi avec intérêt cette vidéo et encore mille merci pour ce que vous faites. cependant des petits détails m'ont échappé: Je vous serai très reconnaissant si vous pouviez me répondre ici même sur deux questions. D'abord le code pour la macro de modification n'apparait pas dans la vidéo et puis pour moi concernant le bouton de commande modifier , en cliquant dessus il n'affiche pas d'abord l'inputBox me demandant l'ID à modifier mais il affiche directement le formulaire de modification. peut être que si j'avais le code de toute cette partie je me rattraperai. Encore une fois mille merci..
bonjour,
le bouton "modifier" affiche l'inputbox qui demande l'id à modifier sinon comment savoir quel id modifier ?
bon donnez moi votre mail je vous envoi tout ça
c'est fait !
Romuald
Bien reçu cher Romuald, encore une fois je vous remercie pour votre rapide réponse. Nous n'avons pas à aller chercher des hommes vivants sur Mars : Ils sont bien parmi nous sur Terre, et vous êtes l'un d'eux. Merci.
Salut Youssef, peux-tu le partager stp..meri d'avance
Bien sûr avec la permission de monsieur Romuald, envoie ton Email
Bravo!
Bonjour, comme beaucoup de personne, j'ai suivi à la lettre vos instructions mais j'ai un problème pour le bouton modifier.
Quand je clique dessus il me marque erreur de compilation : membre de méthode ou donnée introuvable.
Je vois que le problème vient de la ligne de code suivante :
formulaire_modif.ID = numID
En réfléchissant je me dis qu'on ne rentre pas d'ID dans le formulaire et qu'il se calcule automatiquement.
Pouvez-vous m'aidez cordialement
Bonjour Marine,
encore une fois je me méfie beaucoup quand on me dit "avoir suivi à la lettre la video" mais... qu'il y a un bug... ;-)
enfin, si on suit à la lettre, on obtient le bon résultat, pas un bug.
dans la vidéo je n'ecris pas : formulaire_modif.ID = numID
mais : Modif_Form.ID = nomID ET JE CORRIGE DE SUITE PAR UserForm1.ID = cells(ligne,1)
car mon formulaire de modification s'appelle UserForm1 et que nomID = cells(ligne,1)
vous pouvez le voir à la 66 ème minute de la vidéo soit à 1:06 de temps écoulé.
j'ai corrigé le Modif_Form par UserForm1à 1h08mn50sec car mon form s'appelle UserForm1
Corrigez déjà celà et vérifiez que vous n'avez pas fait d'autres erreurs ailleurs dans la vidéo.
Cordialement,
Romulad
bonjour ! j'ai le problème comme lui. je n'ai pas vu "ID" qui n'a pas été créé dans la video comme les autres (Nom, Prenom....) Donc, lorsque j'excécute, il y a un bug " ne pas trouver variable "UserForm1.ID"
bonjour merci beaucoup
Bonsoir,
Merci pour votre tutoriel très bien fait.
Je voudrai savoir avec quel logiciel vous réalisez la capture vidéo de votre PC.
En effet, c’est très fluide, il n’y a pas de flou.
Avez-vous des paramètres particuliers à respecter avant de le poster sur You Tube ?
Merci encore
il est existe plusieurs, moi j'utilise Camtasia studio et j'envoi de fichiers mp4
Romuald
Bonjour, Romuald Correze.
Je suis débutant et j’utilise votre tuto a la lettre pour ma petite base de gestion.
J’ai une question, peut-on remplacer la commande Delete dans Rows(i).Delete par Copy
Avec le critère d’une date, et copie toute la liste de la date que j’ai demandé de ma source dans une autre feuille que j’ai nommée résultat.
J’ai déjà fais mon useform avec la date à écrire et un bouton a côté pour valider la recherche.
Svp aidez-moi, merci d’avance.
Cordialement
bonjour
comme tout le monde ici je tiens a vous remercier pour cette video qui est vraiment génial malgrés tout j'ai quand meme un soucis quand je supprime 1 ID les boutons modifier et supprimer remonte d'un cran également de plus dans l'introduction de la vidéo vous avez une partie recherche qui n'est pas indiqué dans la video qui me serrai vraiment très utile serrait il possible de savoir comment faire merci beaucoup et encore une fois un grand merci pour cette video qui est vraiment bien fait
bjr Sébastien,
je n'ai pas expliqué ça car c'est pas du VBA mais de l'Excel pur...
bref :
- clic droit sur chaque bouton (mode création)
- Format de contrôle
- Propriétés
- "Ne pas déplacer ou dimensionner avec les cellules"
et c'est plié !
pour le moteur de recherche, la vidéo commençait à être assez longue du coup j'ai laissé tomber
je vais essayer d'en faire une juste pour les abonnés.
reçu merci beaucoup en tout cas et dommage pour la partie recherche cela m'aurais été très utile surtout pour une base de données avec plus de 500 accès aussi mais je comprend en tout cas je vous remercie encore beaucoup pour cette video très bien faite et très claire je ne connais pas grand chose en programmation mais grâce a vos explication j'ai pu adapté le programme même en changeant le nom des cases j'ai réussi a m'en sortir :) bonne continuation en tout cas
bonjour . j'ai des bases de données sous fichier EXCEL ( des statistiques pour des régions ,provinces et communes ex: population .classe d'age .salaire ...etc ) chaque catégorie sur une feuille .le problème je trouve pas mal de difficultés pour extraire des informations .je veux bien organiser mes données et faciliter la modification comme meme .tu peux m'aider monsieur +Romuald Correze
+Said Lakhdine Bonjour, ok allons-y.
+Romuald Correze merci d'avoir répondu à mon post .est ce que je dois vous envoyer le fichier EXCEL ?
Said Lakhdine oui et dites moi ce qui ne va pas...
+Romuald Correze pourriez-vous me donner votre adresse e-mail .merci d'avance
+Said Lakhdine contact@up1.fr
tres belle video felicitations mais jai un soucis au niveau de la modification je voudrais savoir ce que vous avez declarer comme "ID" dans le userform1 puisquil n'ya pas de champ id dans le formulaire.merci d'avance
merci beaucoup, et vous- pouvez nous faire une video sur la gestion de paiment d'ecolage des élèves par exemple? comment nous faire sous excel??
Bonjour,
je ne fais pas de tutoriel sur commande
je fais des tutoriels en illustration de cours dispensés à mes élèves.
Nous pourrons faire la gestion d'écolage si vous devenez mon élève.
Cordialement.
Bonjour, je vous félicite et je vous remercie beaucoup pour cette présentation . Seulement j'ai vu au début de cette vidéo qu'il y a un Bouton Rechercher par Nom ou par ID que j'ai pas vu sa présentation .
c'est exact Mohammad,
allez, je m'y mets, je fais une video juste pour ça !
abonnez vous, vous serez prévenu en priorité.
Romuald
en fait j'avais déjà fait un tutoriel là dessus
c'est fiches personnelles voici le lien :
ruclips.net/video/Hvu96jD0o3E/видео.html
Romuald
Bonjour monsieur, j'ai une base de donnée excel concernant des validation des dates sur plusieurs feuilles j'ai besoin de votre aide pour mieux organiser mes données et aussi avoir un message d'alerte a chaque foi que la date de validation est passer.Merci d'avance
Bonjour M. Romuald
J'aimerais vous demander quelques conseils pour la réalisation d'un dico bilingue avec traduction "semi-automatique" (LE BUT de ce programme est la rapidité de recherche et ensuite l'affichage des données trouvées, le tout en quelques secondes).
Je fais de la programmation VB depuis pas mal d'années en amateur juste pour analyser les résultats du loto) :
Exemple : - 6,7,8 colonnes (mot/phrase, genre, catégorie gram., registre/domaine, syn., traduction, etc.)
- 1 million voire plus de lignes
Que doit faire le programme : rechercher toutes les occurrences pour chaque mot d'un texte et afficher chaque occurrence (un mot peut avoir 50 occurrences, 50 fois une ligne entière avec toutes les colonnes), et ce, en 10 secondes pour 100 à 1000 mots, si possible...
Inutile de dire qu'une recherche séquentielle avec une boucle for/next ou do/loop, est extrêmement long.
y a-t-il une méthode/technique capable de le faire en Excell en quelques secondes (rechercher 100 mots sur 1 millions de lignes voire plus ? =recherche ou scripting.dictionary ou array , ...
Je sais que c'est possible de le faire, mais en Excell, je ne sais pas :
J'ai un dictionnaire comme le Robert et Collins et d'autres : il affiche (dans recherche étendue) toutes les occurrences de façon instantanée. Ensuite, il faut parcourir chaque occurrence qui comprend des 100 mots voire des milliers de mots, C'EST TROP LONG. Si Excell pouvait déjà faire cela, cela serait déjà un bon début ! IL faut juste automatiser ce processus pour tout un texte (de 100, 1000 mots) et n'afficher que les lignes comportant le mot recherché.
Je suis tout ouïe, ...
Merci d'avance pour votre aide,
Sergio
bonjour, utilisez les variables tableaux.
j'ai fait une vidéo sur ces variables
OK merci M. Romuald. Je vais aller voir.Je vous tiens au courant. Bonne continuation.
Bonjour, super cours en VBA suis sur Mac Excel 2011, cela fonctionne aussi ????
Bonsoir Monsieur est il possible de protéger une bdd tout en pouvant lui ajouter des lignes ? Car des que je déverrouille mon tableau je n'arrive plus à lui ajouter des lignes ? Merci
bonjour,
oui il faut créer une bdd "identifiants"
un formulaire pour interroger la bdd
et rendre la bdd inaccessible tant que les identifiants et mots de passe ne sont pas reconnus.
Bonjour et merci pour cette magnifique vidéo. Débutant en VBA j'ai suivi pas à pas votre vidéo, seulement voilà arrivé au bouton pour faire apparaitre le formulaire et voir si les listes déroulantes fonctionnent, excel bug et je suis obligé de le fermer.
si la macro est placé sur click là pas de problème, le formulaire apparait bien mais pas les listes déroulantes, si je met le fichier comme précisé en initialize c'est là que ça bug.
c'est pourtant une pale copie de ce que vous faite.
auriez-vous une idée du problème?
+simon defer Bonjour Simon, la copie ne doit pas être si pâle que ça, sinon tu aurais de même résultat que moi..
ceci dit je reconnais que je n'ai pas été très clair dans la vidéo : il faut remplir les listes déroulantes dans une macro userform_initialize() et ne pas oublier d'incrémenter le compteur i = i +1 juste avant le loop de la boucle.
(la macro correcte est visible à la 15ème minute de la vidéo)
puis, on fait une macro Validation_click() pour le bouton valider du formulaire
On appelle le formulaire grâce à une macro affectée à un bouton
Bonne continuation,
Romuald
Bonjour Romuald, merci beaucoup pour cette vidéo tutoriel qui m'aide beaucoup en ce moment. J'aurai juste un problème au niveau du bouton " modifier ", lorsque je clique dessus il me renvoie une erreur de compilation sur la ligne " Private Sub UserForm_Initialize() ", j'ai regardé plusieurs fois votre vidéo sans voir mon erreur. Pourrai je avoir votre aide pour trouver la solution ? Merci à vous !
bonjour Sylvain, dans cette macro le nom du userform concerné doit correspondre exactement au userform
sinon envoyez moi votre macro.
Merci pour la vidéo. J'ai beaucoup appris. Cependant je trouve vraiment fastidieux de faire un autre formulaire pour les modifications sur les enregistrements. En d'autres termes est-il, possible de réutiliser le formulaire d'ajout de données pour faire les modifications sur les enregistrement
bonjour,
oui on peut, mais pour le formulaire il suffit de faire un copier/coller...
Bonsoir Mr. Romualdd
tout d'abords je tiens à vous remercier pour toutes vos tutos elles m'ont étés d'un grand aide, aprés je voudrais discuter un peu avec vous á propos du boutton "valider" de "MODIFIACTION D'ENREGISTREMENT" á chaque fois que je valide une modification on m'envoi ce message "erreur d'execution '13': incompatibilité de type!!!!!!, Alors que j'ai suivi vos consignes étape par étape et á la lettre:
Private Sub valider2_Click()
Dim MODIFICATION As Integer
MODIFICATION = nom22.Value
With ThisWorkbook.Sheets("feuil1")
For i = Range("A" & .Rows.Count).End(xlUp).Row To 2 Step -1
If Range("A" & i).Value = MODIFICATION Then
Range("A" & i).Value = nom22.Value
Range("B" & i).Value = prenom22.Value
Range("C" & i).Value = cin22.Value
Range("D" & i).Value = telephone22.Value
Range("E" & i).Value = mutuelle22.Value
Range("F" & i).Value = adresse22.Value
Range("G" & i).Value = ddn22.Value
Range("H" & i).Value = intervention22.Value
Unload UserForm2
End If
Next i
End With
End Sub
N.B: j'ai mon propre tableau et formulaire et tout marche bien le seul et unique souci que je rencontre et celui du boutton de validation pour la modifacitaion, sinon le reste marche á merveille.
En l'attente de votre réponse je vous dis mille merci encore fois.
bonjour,
encore une fois vous n'avez pas fait comme sur la vidéo, vous avez même supprimé certaines choses et transformé d'autres choses que je montre dans la vidéo et vous avez le culot de me dire que "vous avez suivi mes consignes étape par étape et à la lettre" !!!! c'est FAUX.
- dans la vidéo il y a un ID -> vous l'avez supprimé
- dans la vidéo les ID sont classés -> pas dans votre bdd
- est-ce que vos noms sont classés -> je suis sur que non
faites réellement comme sur la vidéo et vous verrez que vous obtenez obligatoirement le même résultat
une fois que vous avez terminé, faites vos modifications.
Romuald
bonjour,
quel est la symtasse pour passé en mode VBA?
bonjour,
pressez simultanément sur ALT et F11
;-)
Bonjour et merci pour ce grand travail video .Je suis débutant en vba, j'ai testé la partie dans la Video à la Minute 17 environ , la boucle qui va insérer les items des 2 listes déroulantes du Formulaire à partir des 2 colonnes Villes et Fonctions .
Ici cela fonctionne, dans la video, mais il y a un problème , je m'explique . La boucle s'arrête à la Première Cellule vide rencontrée dans la Colonne A , celle des Villes .
Autrement dit dans l'exemple, la boucle s'arrête à la Ligne 13 . Mais si la Colonne C, celle des Fonctions est plus longue, par exemple avec des valeurs jusqu'en C20, ces valeurs , de C13 à C20 ne seront pas visibles puisque la boucle s'est arrêtée à la Ligne 12 ? Si vous avez une solution... Merci d'avance
+Roland Grimonpont
Bonjour Roland,
il est hors de question qu'une base de données ait une colonne plus longue qu'une autre, c'est un principe de base des bases de données.
je vous invite à voir ou revoir mon tuto "Excel: structure d'une base de données" à cette adresse : ruclips.net/video/03ipUtkS-9w/видео.html
il ne faut pas accrocher la charrue avant les boeufs ;-)
Bon visionnage !
+Romuald Correze
Merci de votre réaction rapide, c'est Super ! J'ai bien réfléchi à propos de votre réponse ... J'ai déjà quelque expérience de vraie Bdd comme Mysql et PhpMyadmin, mais j'irai quand même visionner votre Video avec plaisir Merci ! Je pense que j'utilise un Contrôle (2 mêmes) à mauvais escient . Dans mon cas, il s'agit plutôt (je pense ?) d'utiliser une Liste de Choix ! Mon Formulaire doit permettre 1) de Choisir une donnée parmi le nom de 3 écoles . 2) de choisir une Activité parmi 23 activités ! Afin que ces données soient toujours écrites de la même manière pour un tri ultérieur ... Je faisais déjà ceci, en utilisant la Validation de données d'Excel . Naturellement, ceci n'est plus le même code vba que dans votre video .
Merci pour votre aide ,
Cordialement .
Mettez les 23 activités sur chacune des lignes d'enregistrement (après avoir vu ma vidéo)
Ok merci ! je visionne directement ! :-)
J'aimerais connaître comment s'y prendre pour avoir le formulaire de recherche
J'ai suivi pas à pas cette vidéo. Pourtant, entre les bug, les erreurs, et les ommissions, ça m'affiche une erreur de compilation quand je clique sur le bouton modifier !! perdu 2h ...
ça montre que vous avez mal suivi "pas à pas", car dans la vidéo il n'y a ni bug, ni erreur, ni omissions.
reprenez la vidéo attentivement, si vous faites pareil (EXACTEMENT PAREIL) vous devriez y arriver.
sinon télécharger à cette adresse: up1.fr/Video_semaine.php?lecture=Gestion_Base_de_Donnees
Bonjour,
Etant en stage, j'ai pour mission de mettre à jour une grille de calcul d'emballage. J'aimerais savoir comment faire pour afficher plusieurs prix avec les différentes tailles de conteneurs en même temps c'est-a-dire quand un client sélectionnera le mode de transport exemple camion ou conteneur, il faudrait que tous les prix des différents tailles de conteneurs s'affichent directement. Si vous disposez d'un cours ou des informations sur la procédure à suivre afin de mener a bien cette mission. Je vous en serais très reconnaissante pour l'aide apportée.
bonjour, cette vidéo + Excel-VBA Nomenclature et catalogue de produits expliquent très bien cela
Bonjour et grand merci pour cette excellente vidéo. Je suis débutant en VBA, j'ai suivi exactement la procédure pour créer et modifier un formulaire, mais problème pour la modification, il ne trouve pas .ID de Userform1 et me donne ce message "Erreur de compilation. Membre de méthode ou de données introuvable". J'ai bien déclaré la variable dans le bouton Modifier et dans Userform1 comme ci aprés
Dim Modifier As Integer
Modifier = id.Value
et dans userform1
Dim nom_ID As String
nom_ID = InputBox("ID a modifier", "Modification enregistrement")
UserForm1.id = nom_ID
Merci pour une réponse SVP
+henri sauret bonjour, j'ai l'impression que vous confondez ID et id par exemple vous cherchez un ".ID" d'un coté et vous avez un "id.Value" d'un autre...
vérifiez la syntaxe que vous avez donnée lors de la création du formulaire et conservez la tout au long de votre programmation.
bonjour Romuald
je vais ai dejà posé la question comme quoi si il était possible de payer vos formations à partir de la côte d'voire, il ya de cela deux ans. mais vous aviez dit que cela n'étais pas possible.
j'aimerais savoir si cela peut être possible maintenant. Merci et bonne continuation pour vos tutos formidables
Bonjour Daniel,
oui aujourd'hui c'est possible de n'importe où dans le monde.
qu'est-ce qui vous intéresse comme formation ?
je veux me former en excel vba. j'ai un niveau moyen
il faut me dire exactement ce que vous savez déjà faire réellement en VBA afin de ne pas payer des cours que vous maîtrisez déjà, on pourra ainsi réduire le nombre d'heures pour préserver vos informations contactez moi sur romualdcorreze arobase gmail point com
Bonjour Romuald et merci pour ce tutoriel, j'ai un petit soucis à force de supprimer des enregistrements ça supprime la ligne entière et à force ça comprime les boutons sur le coté (j'ai peu être zapper un truc)
Merci par avance pour ta réponse
cordialement
Bonjour,
fais un clic droit sur ton bouton, puis va sur "format de contole"
onglet "Propriétés" et coche
'Ne pas déplacer ou dimensionner avec les cellules"
Merci bcp
Bonjour Monsieur je vous remercie pour votre vidéo et pour le temps que vous consacrez à ce partage. J’ai exactement le même problème que la plupart des gens dans la modification et vos explications ne me suffisent pas. En effet lorsque j’écris ID je le fais comme vous, j’écris d’abord « UserForm1.id =nomid »et quand j’appuie sur entrer ça devient « UserForm1.ID = nomID »
Votre réponse «revoyez la vidéo » ne me convient pas car dans la vidéo à la base vous avez mis « Modif_Form ». il doit il y avoir une explication plus précise et plus poussée à ce problème non?
De plus lorsque je tape « UserForm. » id n’apparaît pas dans la liste déroulante, est-ce normal? Je ne vois pas comment résoudre ce problème même en revoyant votre vidéo (que j’ai déjà vue plusieurs fois). A quelle adresse puis je vous envoyer mon fichier? Bien à vous,
Bonjour Alain,
voici des explications plus précises et plus poussées.
Dans un premier temps, "la plupart des gens" n'ont aucun problème avec les point que vous évoquez d'ailleurs vous êtes le seul a m'en parler.
Quand vous tapez « UserForm1.id =nomid » cela affiche « UserForm1.id =nomID » car c'est ainsi que la variable a été définie précédemment. C'est donc tout à fait normal.
Pour le « Modif_Form » qui devient "UserForm1" je pense vraiment que vous devriez revoir la vidéo, car si vous l'avez fait " plusieurs fois", vous avez été plusieurs fois inattentif.
Pour vous le montrer, rendez-vous dans la vidéo à 1h08mn et 52sec je pense que la reponse vous conviendra.
Enfin pour ID (et non pas id) qui n’apparaît pas en tapant UserForm, c'est tout à fait normal. :
il n'est nullement question de UserForm dans ce code mais de UserForm1 et ça change tout. la programmation informatique est une discipline très précise et rigoureuse qui n'accepte pas l'à peu près.
Essayez avec UserForm1. et vous verrez ce fameux ID.
il est normal que vous ne compreniez pas tout, il est normal que vous ayez besoin de plus d'explications et je me fais une joie d'y répondre à chaque fois que je peux mais pourquoi prétendre que "la plupart des gens" ont ce problème quand c'est faux ?
Pourquoi utiliser un ton exigeant alors que vous êtes en situation de demande ? (explications plus precises et poussées, cela ne me convient pas, etc...)
Allez, je suis sur qu'en revoyant attentivement la vidéo, tout cela devriendra très clair dans votre esprit, comme pour la plupart des gens ;-).
bonjour bon j ai un tableau qui contiens deux colonnes la première code client et la deuxième nom client et par la fonction recherchev je tape le code et dans la colonne noms client il affiche le nom et j ai essayé de faire une fonction de recherche pour évité aller chaque fois a la deuxième feuille de la base des donnes, et j ai vu dans votre tableau cette fonction la recherche par nom ou code merci beaucoup.
+Mohamed Saadi Bonsoir, je n'utilise absolument pas la fonction recherchev dans ce cas là. La fonction recherchev est basée sur une recherche dans une plage de cellules dont la 1ere colonne doit être triée par ordre croissant comme une colonne de codes par exemple.
Si vous voulez utiliser recherchev par le nom il faut alors mettre les noms en 1ere colonne et les trier par ordre alphabétique.
Dans l'exemple que vous citez j'utilise VBA.
Cordialement,
Romuald
Pour les Codes et ce que on peut les avoir svp ??
Merci pour ce super cours. Mais j'ai une préoccupation. J'ai un agent qui m'a transmis un questionnaire qu'il a créer sauf que le questionnaire ne prend pas en compte les conditions nécessaires et quand j'essais d'intégrer les conditions je n'arrive pas. Pouvez vous m'aider svp. MERCI
bonjour,
dites moi ce qu'il vous faut sur up1.fr/index3.php?lecture=CONTACT.php
Bonjour Romuald CORREZE, j'espère que vous allez bien.
Aussi étant d'une nature obstiné et quelque peu têtu, je me permets donc par la présente de vous faire part de quelques soucis à mon niveau que je ne peux déceler dans la MODIFICATION (car pour l'ajout et la suppression de données, il n'y a plus de problème), donc à savoir :
'3 - Pour attribuer la fonctionnalité du bouton ANNULER pour la modification dans l'UserForm1'
PAS DE SOUCI A CE NIVEAU
Private Sub Annuler_Click()
Unload UserForm1
End Sub
'2 - Pour attribuer la fonctionnalité du bouton VALIDER pour la modification dans l'UserForm1'
APPARAÎT UN MESSAGE D'ERREUR "Erreur d'exécution 424 - Débodage"
Je ne comprends plus rien et ne cesse de me fracasser la tête mais en vain ... (c'est mon petit côté maniaque ... et qui adore l'ordre établi)
Private Sub Modification_Click()
Dim Modification As Integer
Modification = ID.Value
With ThisWorkbook.Sheets("Feuil2") 'Ligne soulignée en jaune'
For i = Range("A" & .Rows.Count).End(xlUp).Row To 2 Step -1
If Range("A" & i).Value = Modification Then
Range("A" & i).Value = ID.Value
Range("B" & i).Value = Nom.Value
Range("C" & i).Value = Prenom.Value
Range("D" & i).Value = Telephone.Value
Range("E" & i).Value = Adresse.Value
Range("F" & i).Value = cpostal.Value
Range("G" & i).Value = Ville.Value
Range("H" & i).Value = Fonctions.Value
Unload UserForm1
End If
Next i
End With
End Sub
'1 - Pour afficher la boîte de dialogue demandant le numéro d'ID à modifier ainsi que les différentes fonctionnalités (les variables et boucles ...)'
A CE NIVEAU, JE RENCONTRE UN GROS PROBLEME, CAR SI JE SAISI "UserForm1.ID = nomID" PUIS 4 LIGNES EN DESSOUS "UserForm1.ID=Cells(ligne,1)" DONC AVEC LE .(point), UN MESSAGE S'AFFICHE "Erreur de Compilation - Membre de méthode ou de données introuvables". ALORS QUE SI J'OPTE POUR AUCUN . (point) COMME CI-DESSOUS, L'AFFICHAGE DE LA BOÎTE DE DIALOGUE ME PROPOSANT LE NUMÉRO D'ID A MODIFIER APPARAÎT SANS MESSAGE ET LE PLUS NORMALEMENT DU MONDE !
EST-CE NORMAL ET COHÉRENT, OU EST DONC MON ERREUR ?
Private Sub UserForm_Initialize()
Dim nomID As String
nomID = InputBox("ID à modifier", "Modification d'enregistrement")
UserForm1ID = nomID
Dim ligne As Integer
For ligne = 2 To 20
If Cells(ligne, 1) = nomID Then
UserForm1ID = Cells(ligne, 1)
UserForm1.Nom = Cells(ligne, 2)
UserForm1.Prenom = Cells(ligne, 3)
UserForm1.Telephone = Cells(ligne, 4)
UserForm1.Adresse = Cells(ligne, 5)
UserForm1.cpostal = Cells(ligne, 6)
UserForm1.Ville = Cells(ligne, 7)
UserForm1.Fonctions = Cells(ligne, 8)
End If
Next ligne
'Définir la variable i comme un entier
Dim i As Integer
i = 1
'Remplir les listes déroulantes du formulaire avec "Feuil1"
Do While Worksheets("Feuil1").Cells(i, 1) ""
'affiche la valeur "ville" du formulaire = valeur "Ville" de la feuille de calcul "Feuil1" en ligne i et colonne 1
Ville.AddItem Worksheets("Feuil1").Cells(i, 1)
'Affiche la valeur "Fonctions" du formulaire = valeur "Fonctions" de la feuille de calcul "Feuil1" en ligne i et colonne 3
Fonctions.AddItem Worksheets("Feuil1").Cells(i, 3)
i = i + 1
Loop
End Sub
In fine, par pitié pouvez-vous m'aider à comprendre et surtout à résoudre ces 2 soucis (paragraphe 1 et 2 ci-dessus) car j'ai adapté cette vidéo à une autre tâche de travail avec plus de 21 colonnes, etc ... et rencontre le même problème.
Mille mercis pour votre aide.
Dans l'attente d'une réponse de votre part qui me sauverait la vie à travers ce tutoriel et plus particulièrement qui me permettrait d'adapter mon fichier de travail précédemment construit.
Très Cordialement.
Ivan
bonjour, il faut donner un nom différent pour chaque userform !
pour le reste, soit vous connaissez VBA et la video doit suffire, soit vous me demandez une formation
mais je ne vais pas passer du temps sur votre problème pour rien.
faut que je mange moi aussi ;-)
Bonjour Romuald CORREZE, Merci pour votre réponse assez spleen-hilarante à travers laquelle je me permets de vous souhaiter malgré tout un très bon appétit, nonobstant votre humour du style "pince sans rire" que je partage et apprécie malgré tout, je vous recontacterai bientôt pour une formation (en n'omettant pas de vous quémander au moment opportun un devis bien évidemment). Pour ma part, continuant peu ou proue de m'acharner avec opiniâtreté quant aux suivis de vos mémos, cours et didacticiels sur la toile dont je suis un fan inconditionnel mais pas masochiste. Vous souhaitant une très bonne journée et une bonne dégustation pour un Céviche de poisson ou d'un bon Millassou (mets corréziens). Salutations Distinguées. Ivan Le Gentil Terrible.
bonjour et merci pour cette vidéo. j'ai exécuter votre vidéo tout marche bien sauf, (modification=ID,Value erreur 424) comment corriger cette erreur , et merci
+habib mohamedi Bonjour, si vous faites exactement comme sur la video vous aurez exactement le même résultat. Revoyez ça et soyez attentif ;-)
bonjour merci beaucoup de cette explication, j ai un problème au niveau de la fonction recherche est ce que vous pouvez me aider merci
+Mohamed Saadi Bonjour, quel est votre problème ?
Bonsoir , j'ai une erreur sur le .ID dans la parti modification d'un enregistrement. Uen fois terminer je clique sur le bouton et celui-ci m'envoi sur l'erreur. Pouvez-vous m'aider ?
+Exp3nsiveSporT bonjour, je ne peux pas deviner quelle erreur vous avez fait... revoyez la vidéo pas à pas et vérifiez le code qui marche avec ce que vous avez saisi, si vous faites exactement pareil vous obtiendrez exactement le même résultat.
Je ne comprend pas j'ai suivi a la lettre le tutoriel et j'ai une erreur de compilation sur le bouton modification enregistrement on dirait que vba ne reconnait pas le .ID, d'autre personne on deja eu le probleme je crois
+Exp3nsiveSporT oui, comme vous cette personne disait qu'elle faisait exactement comme sur la vidéo sauf que tantôt elle écrivait ID tantôt id donc elle ne faisait pas comme indiqué dans la vidéo !
et vous non plus puisque vous n'avez pas le même résultat.
Après je comprends que c'est fatigant de revoir une vidéo et de vérifier ce qu'on a fait, peut être voulez vous que je vous envoi le code ?
Je veux bien si c'est possible, j'ai une autre erreur quand je supprime un enregistrement j'ai toute la disposition de la feuille qui ce modifie normal ?
+Exp3nsiveSporT tout ce que vous me dites là montre bien que vous ne suivez pas les instructions de la vidéo. l'avez-vous seulement visionnée en entier ?
enfin, si vous voulez le fichier original, il me faut votre email
Bonjour,
Votre vidéo est très déductive et bien faîte, mais à partir de la 56ème minute pour la finalisation concrète et mise en pratique de de la commande SUPPRIMER UN ENREGISTREMENT, j'ai un message :
Erreur d'exécution '424':
Aussi depuis 2 jours complets je suis en train d'effacer et de recommencer, puis de vérifier, revérifier, re-revérifier,donc in fine j'en perds mon latin et je ne comprends plus d'où est l'erreur.
Pourriez-vous, SVP m'aider à résoudre ce qui à mon niveau de débutant mais devenu impérialement non résolvable,
Vous en remerciant par avance.
Très Cordialement.
ivan
Private Sub Ajouter_Click()
Form1.Show
End Sub
Private Sub Supprimer_Click()
Dim i As Integer
Dim SUPPRESSION As String
SUPPRESSION = InputBox("Veuillez entrer l'ID à supprimer", "Suppression d'enregistrement")
With ThisWokbook.Sheets("Feuil2")
For i = .Range("A" & .Rows.Count).End(xlUp).Row To 2 Step -1
If .Range("A" & i).Value = SUPPRESSION Then
Rows(i).Delete
End If
Next i
End With
End Sub
Merci de nous partager votre expertise, j'en suis dans mon début VBA, et cette application répond à mon apprentissage malgré que je ne suis pas capable de la faire fonctionner chez moi. Si c'était possible j'aimerai bien obtenir le fichier excel pour m'y référer et bâtir sur ma propre base, ainsi ci joints mon email framock@gmail.com , d'une façon ou autre un grand merci.
Comment avoir un numero d'ordre d'enregistrement dynamique en fonction d'un ajout ou d'une suppression d'enregistrement?
BONJOUR,
je l'explique dans ce tuto : ruclips.net/video/92ffyoalk3U/видео.html
@@RomualdCorreze dans ma base de donnée "Gestion de permission" j'ai une colonne "ordre" qui s'incrémente pour chaque enregistrement mais lorsque je supprime un enregistrement il n'ya plus d'ordre.
comment faire pour ajouter le controle listview a la boite outil j'ai essayer tous les solution possible c'est difficcile et merci
je n'ai pas ajouté de controle "listview", c'est un inputbox multilignes
sinon dans l'onglet Développeur, bouton Insérer, choix Autres controles
salut je suis un debutant je vouderais savoir pour le i pourquoi tu l as appeler i et merci
bonjour,
et bien c'est par pure fainéantise !
i est la variable du compteur que j'aurais pu appeler "compteur" ou "decompte" mais voilà "i" c'est plus court lol
lol Fallait prévenir que ce n'était pas gratuit et qu'il fallait payer par PayPal pour pouvoir télécharger le ficher excel avec le code VBA.
Vous avez une voix gutturale
c'est vrai, en même temps c'est pas évident de parler tout seul devant son écran.