Bases de données

Christ69fr -  
 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
Configuration: Windows 2003 Internet Explorer 6.0

2 réponses

  1. man1999 Messages postés 90 Date d'inscription   Statut Membre 19
     
    As tu access ?
    Excel est bien mais a ses limites
    Access je pense ira bien
    0
    1. Christ69fr
       
      non pas d'acces, oblige de me débrouiller avec excel
      0
  2. christ69fr
     
    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