[VBA Access Excel] Creer une feuille Excel
Fermé
bonjour,
Je developpe en vba sous access.
J'execute une requete sql sous access qui me creee une table (SELECT TELEACTEUR INTO TABLE FROM TABLE ORIGINE WHERE....)
Je voudrai avec les données de la table les importer dans Excel mais en creant une feuille par TELEACTEUR.
Comment puis faire.
merci pour votre reponse.
Bye
Je developpe en vba sous access.
J'execute une requete sql sous access qui me creee une table (SELECT TELEACTEUR INTO TABLE FROM TABLE ORIGINE WHERE....)
Je voudrai avec les données de la table les importer dans Excel mais en creant une feuille par TELEACTEUR.
Comment puis faire.
merci pour votre reponse.
Bye
A voir également:
- [VBA Access Excel] Creer une feuille Excel
- Liste déroulante excel - Guide
- Déplacer une colonne excel - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Si et excel - Guide
- Word et excel gratuit - Guide
1 réponse
Set AppliExcel = CreateObject("Excel.Application")
Wbk = AppliExcel .Workbooks.Add
Sht = Wbk.ActiveSheet
With Sheet
Set Rs=CurrentDB.OpenRecordSet("SELECT * FROM [ta_table]")
Ligne=1
Do While Not Rs.EOF
.Range("A" & Ligne)=Rs(0)
.Range("B" & Ligne)=Rs(1)
.Range("C" & Ligne)=Rs(2)
'ect...
Ligne=Ligne + 1
Loop
End With
Voila en gros ce que tu peux faire...
C'est une solution parmis tant d'autres