Alek63
XLDnaute Nouveau
Bonsoir a tous !
Je cherche a créer une base de données des concerts que je suis allé voir.
La BDD est deja constitué et un menu de recherche avec menu déroulant est dèja opérationnel. Je n'arrive pas à obtenir les propositions du menu déroulant classé par ordre l'alphabétique mais ce n'est pas la priorité du moment.
Je cherche à avoir des champs permettant de saisir de nouveaux concerts auxquels j'assisterais. J'ai deja créé cette zone et une macro affecté a un bouton pour déclencher la copie de ces données dans la BDD mais ca ne marche pas.
Voici le code de ma macro :
Sheets("Tableau Données").Select
Rows("229:229").Insert Shift:=xlDown
Range("C23").Value = Sheets("Formulaire").Range("A229").Value
Range("C24").Value = Sheets("Formulaire").Range("B229").Value
Range("C25").Value = Sheets("Formulaire").Range("C229").Value
Range("C26").Value = Sheets("Formulaire").Range("D229").Value
Sheets("Formulaire").Select
End Sub
Merci par avance de votre aide !
Je cherche a créer une base de données des concerts que je suis allé voir.
La BDD est deja constitué et un menu de recherche avec menu déroulant est dèja opérationnel. Je n'arrive pas à obtenir les propositions du menu déroulant classé par ordre l'alphabétique mais ce n'est pas la priorité du moment.
Je cherche à avoir des champs permettant de saisir de nouveaux concerts auxquels j'assisterais. J'ai deja créé cette zone et une macro affecté a un bouton pour déclencher la copie de ces données dans la BDD mais ca ne marche pas.
Voici le code de ma macro :
Sheets("Tableau Données").Select
Rows("229:229").Insert Shift:=xlDown
Range("C23").Value = Sheets("Formulaire").Range("A229").Value
Range("C24").Value = Sheets("Formulaire").Range("B229").Value
Range("C25").Value = Sheets("Formulaire").Range("C229").Value
Range("C26").Value = Sheets("Formulaire").Range("D229").Value
Sheets("Formulaire").Select
End Sub
Merci par avance de votre aide !