Créer une liste déroulante dans Excel en VBA à partir d'Access

[Experosta]

Bonjour à tous,

J'ai téléchargé les 3/4 des ressources totales du web, fouillé tous les FAQ, les forums, mais malgrès cela, je n'ai toujours pas trouvé de réponse à mon problème "unique"...

J'ai une application Access qui créer des fichiers Excel que je met en forme et rempli en VBA.

Mon problème: A partir d'Access, en VBA, je voudrais pouvoir créer une ListBox dans une cellule précise du fichier Excel que je viens de générer.

J'ai trouvé plein d'information sur:
-Création de ListBox dans un fichier Excel
-Gestion de ListBox dans un formulaire
-Récupération de valeur
-...
Mais rien pour faire du Access-->Excel via VBA!

N'hésitez pas à me questionner si j'ai manqué de précision
Merci d'avance pour vos idées!

[Godzestla]

Bonjour,

il y a toujours des informations sur Access -> Excel en Vba dans la FAQ sousi 11.7.1.1,

mais tu peux peut-être t'inspirer de cette discussion

[Experosta]

Merci de votre réponse.

Justement, c'est précisément le document avec lequel j'ai travaillé: http://access.developpez.com/faq/?page=Excel#PilotExcel

Je vais préciser la manipulation:
**Idée principale: piloter la création de fichier Excel à partir d'Access.
**Problème: créer une ListBox dans Excel à partir d'Access.

-J'ai une base de donnée Access.
-A partir d'un bouton contenu dans un formulaire, je lance la création d'un fichier Excel (fonction en VBA dans Access).
-Je met en forme mon fichier Excel (insertion de valeur, couleur, bordure, police...) à partir des informations de ma base de donnée, toujours grâce aux fonctions que j'ai codé en VBA sous Access.
-Et là, problème: il faut que je mette une liste déroulante dans une cellule Excel. Les valeurs des options sont contenues dans la base de donnée, mais aussi dans le fichier Excel (je peux utiliser celles que je veux, ceux sont les mêmes).

Les résultats des recherches sur Google, forum, faq...sont pollués par des questions plus "classique" et donc je n'arrive pas à trouver d'info'. J'ai notamment cherché le code VBA sous Excel pour créer des listes, mais impossible d'avoir un résultat cohérent pour la raison que j'expliqué précédement (pollution des résultats).

[Godzestla]

Bonjour,

pas besoin de chercher sur Google ou sur le net, il suffit dans excel de faire la manip avec l'enregistreur de macro activé puis de regarder le code généré.

Ici un exemple ou la liste de validation pour la cellule C9 se trouve de "AA2" à "AA_Sheet_Id" ou Sheet_id est une variable numérique correctement initialisée.

Code :

1
2
3
4
5
6
7
8
9
10
11
12
    With Range("C9").Validation
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=$AA$2:$AA$" & Sheet_id
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
    End With