EXCEL - VBA DEBUTANT - METTRE A JOUR D'UNE BASE DE DONNÉES

No video

EXCEL - VBA DEBUTANT - METTRE A JOUR D'UNE BASE DE DONNÉES - 2

Рет қаралды 9,341

Күн бұрын

EXCEL - VBA DEBUTANT - METTRE A JOUR D'UNE BASE DE DONNÉES - 2
Soutenez la chaîne Un Mec En Baskets avec Tipeee : fr.tipeee.com/...
Abonnez-vous : www.youtube.co...
www.excel-conc...
excel-concept....
/ unmecenbaskets
/ unmecenbaskets
Vous souhaitez apprendre à utiliser Excel. Nos tutoriels sont fait pour vous. En effet, ils vous permettrons de découvrir excel pas à pas, du niveau débutant au niveau expert et vous offrant des vidéos claires et explicites chacune vous permettant d'apprendre à votre rythme et d'expérimenter à chaque fois les nouvelles fonctions découvertes.
Si vous avez aimé ce tutoriel, n'hésitez pas à liker cette vidéo et si vous souhaitez recevoir les nouveaux tutoriels, abonnez-vous à notre chaîne.
Liens affiliés, le matériel que j'utilise :
Le plus important, la paire de converse all star chuck taylor :
amzn.to/3wcyAws
Douchette code barre simple :
amzn.to/3ZKUHI0
Douchette code barre stockage de mémoire :
amzn.to/3wf5GMj
Ordinateur :
amzn.to/3IRh60a
Ecran :
amzn.to/3GOPLZY
Carte wifi :
amzn.to/3GMj53b
Web cam :
amzn.to/3XDzVYR
Clavier :
amzn.to/3iMxfcx
Micro :
amzn.to/3GSfHnz
Hauts-Parleurs :
amzn.to/3CUXW5L
Imprimante :
amzn.to/3XuYwz0
Casque audio :
amzn.to/3XDADFv

Пікірлер: 24

@UnMecEnBaskets 6 жыл бұрын

J'espère que cette vidéo vous plaira, si c'est le cas, lâchez un like. N'hésitez pas à vous abonner à la chaîne pour retrouver et être informé de tous les nouveaux tutoriels. Abonnez-vous : kzfaq.info

@patrickhulot9060 4 жыл бұрын

Bonjour et merci pour tuto très clair simplement explique. A la fin de ce tuto vous évoquiez un tuto n3 pour les motifs. Impossible de la trouver. Merci de votre retour bonne continuation et encore bravo

@simohammedaboussaad4549 4 жыл бұрын

Bonsoir, Franchement, très intéressant vos tutos et je vous remercie beaucoup pour votre méthode d'enseignement : simple , bien expliqué, méthodique, bravo et bonne continuation, juste une question : Pourriez vous lancer un tuto du langage cobol ? c'a m’intéresse énormément. c'est très gentil à vous. Encore merci à vous.

@dianena-oh1696 2 жыл бұрын

Salut, Un grand merci pour tes vidéos, sympas, clair et détaillées. Je me demande s'il y a une raison particulière pour laquelle tu n'utilises pas, pour tes comboBox la propriété RowSource? dans laquelle tu n'as qu'à renseigner le nom d'une liste préalablement définie. Dans ton exemple, tu aurais juste à sélectionner les Noms présents dans ta colonne A puis DONNEES/Définir Un nom. Tu appelles ta liste admettons ListeNom et ensuite dans les propriétés de ton Combobox1, en face de rowsource tu note ListeNom. Ca fonctionne et ça se met à jour automatiquement. Comme je ne t'ai pas vu l'utiliser ni dans la vidéo 1 ni dans celle-ci, je me demande s'il y a une raison particulière, des problèmes que ça pourrait engendrer plus tard? En tout cas, Milles merci pour tes videos et me rendre excel sympa à apprendre:)

@videofil001 Жыл бұрын

Merci pour ce tuto instructif. Toutefois vous n'avez pas expliqué le décalage (+2) entre ComboBox1.ListIndex et ligne. Je suppose que c'est parce que le premier enregistrement de la ComboBox a l'index 0 ?

@amandineschlur4025 8 ай бұрын

Bonjour et merci pour vos tutos ! Très utile :) Je cherche à créer une base de données en langue géorgienne. Hélas, dans VBA, dès que j'utilise l'alphabet géorgien, le texte est automatiquement converti en ?????? ?????????????... Savez-vous si c'est modifiable ? Et comment ? Notamment, dans les zones de liste, j'aimerais proposer des valeurs texte en géorgien... Merci de votre aide

@djaggakan7308 3 жыл бұрын

Bonjour Tutoriels Informatique Un Mec En Baskets! Tes tutos m'ont presque fait un As en VBA excel. Merci pout tout. J'aimerai savoir quand est-ce que tu vas nous apprendre le bouton MODIFIER, comme promis?

@UnMecEnBaskets 3 жыл бұрын

Merci à toi. Le bouton Modifier... bientôt, très bientôt.

@UnMecEnBaskets 3 жыл бұрын

En attendant, une première piste pour pouvoir effectuer une modification d'une base de données : kzfaq.info/get/bejne/adpgns5019zXiZc.html

@djaggakan7308 3 жыл бұрын

@@UnMecEnBaskets Merci! tu es un As

@martialsaccucci 4 жыл бұрын

Un très grand merci pour ces tutos très bien expliqué avec une ambiance pédagogique top ;) Grace à vous je peux, via le formulaire, ajouter et consulter une base de donnée. Il ne me manque que le module 3 à savoir modifier une base de donnée. Vous précisez la mettre prochainement à disposition dans votre conclusion mais je ne l'a trouve pas dans votre playlist. Pouvez vous m'aider?

@UnMecEnBaskets 4 жыл бұрын

Salut Martial, merci pour votre commentaire... J'ai oublié le module ? Oups... Au temps pour moi. On va essayer de corriger cela rapidement... mais ça risque de prendre un peu de temps. Si vous avez besoin d'un coup de main rapidement, vous pouvez faire la demande a unmecenbaskets@gmail.com. Et je vous expliquerai très rapidement comment mettre a jour votre base de données...

@aureliendeschamps4380 5 жыл бұрын

Salut, merci pour les super tutos! Juste une question, je voudrais afficher les données d'une combobox mais celle ci viennent d'une autre feuille. Comment dois je faire?

@UnMecEnBaskets 5 жыл бұрын

Salut, si tu veux m'envoyer ton fichier par mail, ce sera plus simple en ayant un visuel de ce que tu veux. Je te le renvoi par la suite corrigé avec les explications de la macro. unmecenbaskets@gmail.com

@aggressiverecords1 5 жыл бұрын

Salut le mec en basket! Déjà un grand merci à toi, grâce à toi j'ai pu créer une base de donnée ainsi que des formulaires de saisies pour me faciliter la gestion de stock. Depuis le temps que je cherchais des tutos intuitifs et facilement transposable ;) J'attend avec très grande impatience la partie 3 du tuto car je n'arrive pas à trouver comment modifier une donnée déjà existante à partir du formulaire. D'ailleurs à ce sujet, Regis a une question: J'ai inclus dans mon userform une checkbox. Lorsque je la check, j'aimerai qu'apparaisse dans une colonne de la bdd le mot "oui" (de cette manière je pourrai ensuite faire le tri entre les ref scannées et les ref non scannées). Comment que je fais? Merci pour d'avance pour ton aide mec en chaussette :D

@aggressiverecords1 5 жыл бұрын

A merde je viens de voir dans les comm plus bas que Regis c'est un vrai mec en fait!!! hahahaha Bon bah du coup même question mais de ma part

@UnMecEnBaskets 5 жыл бұрын

@@aggressiverecords1 Salut, merci à toi pour ton commentaires. Je vais m'efforcer de faire le nécessaire pour proposer une partie 3, si possible, dès la semaine prochaine. Ah au fait oui, Régis est une vrai personne ! Concernant ton problème de checkbox, pas de soucis. Deux cas de figure : Premier cas, ta checkbox met à jour une cellule fixe, dans ce cas : If checkbox.value = True Then Sheets("Nom de ta feuille").Range("Cellule").value = "OUI" Else Sheets("Nom de ta feuille").range("cellule").value = "NON" End if Deuxième cas, ta checkbox met à jour une cellule non fixe, dans ce cas : Après avoir évidemment défini une variable correspondant à la ligne du genre : Dim Derligne as integer Derligne = sheets("nom de ta feuille").Range("A65536").end(xlup).row + 1 Alors du coup : If checkbox.value = True Then Range("Lettre de la colonne de destination" & Derligne).value = "OUI" Else Range("Lettre de la colonne de destination" & Derligne).value = "NON" End if Voili voilo !!! J'espère avoir répondu à ta question et encore un grand merci à toi pour ton soutien.

@aggressiverecords1 5 жыл бұрын

Yes merci de ta réponse ça fonctionne nickel! En revanche il y a une notion qui a dû m'échapper. En principe checkbox1.value = Thrue veut dire que tu a bien coché la checkbox, auquel cas la valeur à mettre dans la cellule est OUI. D'une facon que je ne comprend pas, chez moi c'est le contraire, comme si tout été inversé. Afin d'obtenir le Oui dans ma cellule lorsque la checkbox est coché j'ai du rentrer le code suivant: Dim Derligne As Integer Derligne = ComboBox1.ListIndex + 6 If CheckBox1.Value = thrue Then Range("L" & Derligne).Value = "NON" Else Range("L" & Derligne).Value = "OUI"

@UnMecEnBaskets 5 жыл бұрын

@@aggressiverecords1 étonnant effectivement. Mais pour la Checkbox tu as mis = True ou = thrue la bonne formule étant True

@michelcarrere644 5 жыл бұрын

j ai fait la 1er partie du tuto excel mettre a jour une base de données impeccable j ai réussi du 1er coups les explications était très claire:encourager par se 1er essai je me suis attaquer a la deuxième partie : j ai un problème au niveau de la boite de dialogue pour la combox1 (private Sub UserForm_Initialize() j ai taper le texte suivant: Set Ws =Sheets("base_de_données") et le coquin ne veut pas le prendre il m envoi immédiatement au débogage avec une fenêtre d erreur de compilation( variable non définie) le Set (se met bien en bleu) et l erreur est au niveau de Ws = qui devient tout bleu . et j ai beau faire, retaper la phrase rien ni fait . je suis coincer si quelque un pouvais éclairé ma lanterne il en serait remercier. j espéré pouvoir continuer se tuto. d avance merci MICHEL

@UnMecEnBaskets 5 жыл бұрын

Ws détermine le nom de la feuille à prendre en compte. Si cela ressort en erreur c'est qu'il ne reconnaît pas la feuille. Il doit avoir une différence même infime au entre le nom réel de la feuille et celui déclaré en Ws. ...

@jeanfrebet6866 3 жыл бұрын

@@UnMecEnBaskets je me trouve dans la même situation avec une erreur d'exécution 1004 Erreur définie par l'application ou par l'objet

@regisverreault 5 жыл бұрын

Bonjour je suis un peux désespéré. Je cherche une formule pour modifier une cellule dans la base de donné, et en même temps que la valeur soit monétaire pour que les calculs fonctionne j'ai déjà essayé avec cette formule, sa fonctionne mais la valeur inscrit dans la cellule ne se calcul pas. il faut que je clic dans la cellule et que j'appui sur "enter" et la sa fonctionne. avez vous une solution pour m'aider je suis dans un impasse :( Sheets("depot_banquaire").Select Dim no_ligne As Integer Sheets("depot_banquaire").Select no_ligne = ComboBox6.ListIndex + 2 Cells(no_ligne, 7) = Format(Me.txtmontant1.Value, "currency")

@UnMecEnBaskets 5 жыл бұрын

Bonjour, sans voir le fichier je proposerais les options suivantes : Option 1 : Cells(no_ligne, 7) = Format(TxtMontant1, "# ###.00 €") Option 2 : Cells(no_ligne, 7) = CDbl(textmontant1) Et si Textmontant1 est une textbox devant contenir une valeur numérique j'ajouterais ceci dans le code de la userform contenant la textbox en question : Private Sub Txtmontant1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) If KeyAscii = 46 Then KeyAscii = 44 If InStr("1234567890,-", Chr(KeyAscii)) = 0 Then KeyAscii = 0 End Sub Afin de n'autoriser que la saisie numérique dans la textbox et que le point soit systématiquement remplacé par une virgule. Voilà ce que j'ai sous le coude concernant votre demande. Si cela ne fonctionne pas, n'hésitez pas à m'envoyer votre fichier via l'onglet contact du site internet : www.unmecenbaskets.fr