transfert contenu fichier excel par macro
Salut à tous !
Je travaille sous Access 97 (anglais) et Excel 2000. J'ai une table d'une dizaine de champs, et un formulaire basé sur cette table qui me permet d'entrer de nouveaux enregistrements dans ma base de données.
J'ai crée une discussion proche de celle-ci il n'y a pas très longtemps, mais qui depuis a changé, ma question me paraît bien plus simple. J'espère avoir trouvé quelque chose qui va faciliter le problème.
J’ai crée une macro qui me crée deux feuilles Excel qui sont le résultat de deux filtres fabriqués avec une requête chacune. Voici ma macro (qui fonctionne très bien) :
OpenForm :
Form Name : Copy of T_Demandeurs2
View : Form
Filter Name :
Where Condition :
Data Mode :
Window Mode :Normal
ApplyFilter :
Filter Name : Query5
Where Condition :
OutputTo:
Object Type : Form
Object Name : Copy of T_Demandeurs2
Output Format : Microsoft Excel(*.xls)
Output File : table date55.xls
Auto Start : No
Template File :
OpenForm :
Form Name : Copy of T_Demandeurs2
View : Form
Filter Name :
Where Condition :
Data Mode :
Window Mode :Normal
ApplyFilter :
Filter Name : Query4
Where Condition :
OutputTo:
Object Type : Form
Object Name : Copy of T_Demandeurs2
Output Format : Microsoft Excel(*.xls)
Output File : table date56.xls
Auto Start : No
Template File :
StopMacro :
Voici les codes SQL de mes requêtes Query4 et Query5 :
Query4 :
Code :
SELECT [Copy of T_Demandeurs2].OutputDate
FROM [Copy of T_Demandeurs2]
WHERE ((([Copy of T_Demandeurs2].OutputDate) Between #1/1/2006# And #1/7/2006#));
Query5 :
Code :
SELECT [Copy of T_Demandeurs2].Status
FROM [Copy of T_Demandeurs2]
WHERE ((([Copy of T_Demandeurs2].Status)='In progress' Or ([Copy of T_Demandeurs2].Status)='Stand-by'));
C'est là que ma question intervient. Je voudrais savoir s’il est possible par l'intermédiaire de cette macro de faire un transfert du contenu d'une des deux feuilles vers l'autre feuille pour les regrouper sur une seule feuille. De plus, je voudrais que le champs InputDate soit trié par ordre croissant du haut vers le bas.
Je remercie d'avance tous ceux qui s'interesseront à mon problème.
Merci d'avance pour votre aide.
