Bonjour à tous
voilà j'ai un petit problème sur excel/vba. je suis totalement débutant sur ça mais je dois faire dans le cadre d'un stage un petit programme pour gérer une liste de fournisseurs.
Voici comment se pose mon problème: j'ai une liste de fournisseurs sous un format excel (Nom en "A", Prénom en "B", etc..) et je dois créé un formulaire pour rajouter des nouveaux fournisseurs à l'aide d'un userform. Ils doivent rejoindre la liste et se classer par ordre alphabétique.
J'ai créé mon formulaire qui se compose de 6 variables à renseigner et des boutons "Ajout" et "Annuler".
voilà un peu où j'en suis pour le moment:
Pour l'instant je devrais avoir les noms qui se rajoutent au fur et à mesure mais ça coince.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 Private Sub Annuler_Click() Unload Me End Sub Private Sub AjouterIntervenant_Click() Nomconverti = Application.WorksheetFunction.Proper(Me.TextNom) Prenomconverti = Application.WorksheetFunction.Proper(Me.TextPrénom) Sheets("Feuil1").Cells(A).Value = Me.TextNom Sheets("Feuil1").Cells(B).Value = Me.TextPrénom Sheets("Feuil1").Cells(C).Value = Me.TextTéléphone Sheets("Feuil1").Cells(D).Value = Me.TextMail Sheets("Feuil1").Cells(E).Value = Me.TextEntreprise Sheets("Feuil1").Cells(F).Value = Me.TextAdresse Unload Me End Sub
Pouvez-vous m'aider sur ce petit problème.
Merci
ps: Pour info j'utilise Excel 2007 sur Vista
Partager