Bases de données

Fermé
Signaler
-
 christ69fr -
Bonjour,
Je voudrais créer une bases de données avec un formulaire et des listes déroulantes.
Je vous joint mon fichier, j'espère que vous comprendrez ce que je souhaite.
http://www.cijoint.fr/cjlink.php?file=cj200907/cij2YSgRUK.xls

Merci de m'aider.

Christ69fr

2 réponses

Messages postés
89
Date d'inscription
jeudi 9 juillet 2009
Statut
Membre
Dernière intervention
6 novembre 2009
19
As tu access ?
Excel est bien mais a ses limites
Access je pense ira bien
0
non pas d'acces, oblige de me débrouiller avec excel
0
j'ai trouvé comment faire ma bases de données, mais j'ai un souci avec le code VBA.
Si qq1 peut bien m'aider.

Sub transpose_dans_tableau()
Sheets("Formulaire").Select
Range("B2:B28").Select
Selections.Copy

Sheets("Bases de données").Select
valeurA3 = Range("A3").Value
If valeurA3 = "" Then
Range("A3").Select
Else
Range("A2").Select
Selection.End(x1Down).Select
ligne_active_base = ActiveCell.Row
Range("A" & ligne_active_base + 1).Select
End If
ligne_active_base = ActiveCell.Row
Range("A" & ligne_active_base).Select
Selection.PasteSpecialPaste = x1PasteallExceptBorders
Operation:=x1None , skipBlanks:=False, Transpose:=True (il me dit que l'erreur vient d'ici)
Sheets("Formulaire").Select
Range("B2:B28").Select
Selection.ClearContents
Range("B2").Select
Sheets("Bases de données").Select
Range("A2").Select
End Sub

Merci de votre aide
0