Appeler 2 fois une fction vba dans un module

Fermé

GPM-CONCEPTION - Modifié par GPM-CONCEPTION le 21/04/2010 à 18:23
superip79 Messages postés 7 Date d'inscription jeudi 22 avril 2010 Statut Membre Dernière intervention 23 avril 2010 - 22 avril 2010 à 15:20

Bonjour,

J'ai un module qui copie un tableau (price_article_tab) de ma base de données au format Excel suivant le code :

Function Objet()
DoCmd.OutputTo acOutputTbl, "Price_article_tab", "Microsoft Excel 97-2003 (*.xls)", "C:..\Price_article_tab.xls"
End Function

Je voudrais que le même module le fasse pour d'autres tables mais je n'arrive pas à completer le code. Un copier coller donne une erreur de synthase.

Comment faire ? Merci pour votre aide

A voir également:

Appeler 2 fois une fction vba dans un module
Appeler en privé - Guide
Je suis une chose que les garçons utilisent deux fois par jour et les filles une fois toute leur vie - Forum Loisirs / Divertissements
Pas de module ci - Forum TV & Vidéo
On peut m'appeler mais je ne peux pas appeler - Forum Téléphones & tablettes Android
2 ecran pc - Guide

3 réponses

Réponse 1 / 3

supertrip69
22 avril 2010 à 00:28

Sub Objet(nom as String)
DoCmd.OutputTo acOutputTbl, nom, "Microsoft Excel 97-2003 (*.xls)", "C:..\" & nom & ".xls"
End Sub

Il ne te reste qu'à l'appeler :

call Objet("Price_article_tab")

Réponse 2 / 3

GPM-CONCEPTION
22 avril 2010 à 12:32

Bonjour,

Merci pour votre réponse.

Mais comment créer la macro qui va exécuter ce module?

superip79 Messages postés 7 Date d'inscription jeudi 22 avril 2010 Statut Membre Dernière intervention 23 avril 2010
Modifié par superip79 le 22/04/2010 à 13:25

(attention, j'ai changé de nom)
je ne peux pas trop te répondre là. tout dépend de comment tu vas dire "cette table et cette table vont être enregistré au format excel".

Réponse 3 / 3

GPM-CONCEPTION
22 avril 2010 à 15:08

Bonjour,

Merci de me faire une proposition de modèle : me donner un exemple

superip79 Messages postés 7 Date d'inscription jeudi 22 avril 2010 Statut Membre Dernière intervention 23 avril 2010
22 avril 2010 à 15:20

Je n'ai jamais utilisé de table dans excel mais serait-il possible de faire un :
sub main

For each table in mestables
call objet(table.name)
next

end sub

Discussions similaires

Voxbone ? qui est-ce ?

Que peut faire 3fois/j un homme, mais qu'1fois/j une femme

Pourquoi 3 fois !?

devinette

paiment 4x nickel sur top achat