Est-il possible et si oui comment, de g=E9n=E9rer un fichier=20
excel avec des onglets correspondants =E0 des tables ?
Par exemple, je voudrai cr=E9er un fichier xcel avec un=20
onglet "Clients" contenant ma table "Clients", un=20
ongle "Articles" contenant ma table "Articles", etc, etc...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonjour.
faut faire un export vers excel et indiquer le numéro de la feuille ( et non onglet). exemple: DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Clients", "fichier.xls", True, "Clients" DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Articles", "fichier.xls", True, "Articles"
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" a écrit dans le message de news:198e801c44d43$b86faa90$ Bonjour,
Est-il possible et si oui comment, de générer un fichier excel avec des onglets correspondants à des tables ? Par exemple, je voudrai créer un fichier xcel avec un onglet "Clients" contenant ma table "Clients", un ongle "Articles" contenant ma table "Articles", etc, etc...
D'avance merci,
Michel
Bonjour.
faut faire un export vers excel et indiquer le numéro de la feuille ( et non
onglet).
exemple:
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Clients",
"fichier.xls", True, "Clients"
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Articles",
"fichier.xls", True, "Articles"
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" <mbarnabo@club-internet.fr> a écrit dans le message de
news:198e801c44d43$b86faa90$a501280a@phx.gbl...
Bonjour,
Est-il possible et si oui comment, de générer un fichier
excel avec des onglets correspondants à des tables ?
Par exemple, je voudrai créer un fichier xcel avec un
onglet "Clients" contenant ma table "Clients", un
ongle "Articles" contenant ma table "Articles", etc, etc...
faut faire un export vers excel et indiquer le numéro de la feuille ( et non onglet). exemple: DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Clients", "fichier.xls", True, "Clients" DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Articles", "fichier.xls", True, "Articles"
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" a écrit dans le message de news:198e801c44d43$b86faa90$ Bonjour,
Est-il possible et si oui comment, de générer un fichier excel avec des onglets correspondants à des tables ? Par exemple, je voudrai créer un fichier xcel avec un onglet "Clients" contenant ma table "Clients", un ongle "Articles" contenant ma table "Articles", etc, etc...
D'avance merci,
Michel
Merci beaucoup, @+
-----Message d'origine----- Bonjour.
faut faire un export vers excel et indiquer le numéro de la feuille ( et non
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" a écrit dans le message de
news:198e801c44d43$b86faa90$ Bonjour,
Est-il possible et si oui comment, de générer un fichier excel avec des onglets correspondants à des tables ? Par exemple, je voudrai créer un fichier xcel avec un onglet "Clients" contenant ma table "Clients", un ongle "Articles" contenant ma table "Articles", etc, etc...
D'avance merci,
Michel
.
Merci beaucoup,
@+
-----Message d'origine-----
Bonjour.
faut faire un export vers excel et indiquer le numéro de
la feuille ( et non
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" <mbarnabo@club-internet.fr> a écrit dans le
message de
Est-il possible et si oui comment, de générer un fichier
excel avec des onglets correspondants à des tables ?
Par exemple, je voudrai créer un fichier xcel avec un
onglet "Clients" contenant ma table "Clients", un
ongle "Articles" contenant ma table "Articles", etc,
etc...
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" a écrit dans le message de
news:198e801c44d43$b86faa90$ Bonjour,
Est-il possible et si oui comment, de générer un fichier excel avec des onglets correspondants à des tables ? Par exemple, je voudrai créer un fichier xcel avec un onglet "Clients" contenant ma table "Clients", un ongle "Articles" contenant ma table "Articles", etc, etc...
D'avance merci,
Michel
.
mbar
Re bonjour, En fait, cela ne fonctionne pas, d'après la doc, l'argument passé pour le nom de la feuille est utilisé uniquement pour l'importation Si tu as une autre idée ? D'avance merci
-----Message d'origine----- Bonjour.
faut faire un export vers excel et indiquer le numéro de la feuille ( et non
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" a écrit dans le message de
news:198e801c44d43$b86faa90$ Bonjour,
Est-il possible et si oui comment, de générer un fichier excel avec des onglets correspondants à des tables ? Par exemple, je voudrai créer un fichier xcel avec un onglet "Clients" contenant ma table "Clients", un ongle "Articles" contenant ma table "Articles", etc, etc...
D'avance merci,
Michel
.
Re bonjour,
En fait, cela ne fonctionne pas, d'après la doc,
l'argument passé pour le nom de la feuille est utilisé
uniquement pour l'importation
Si tu as une autre idée ?
D'avance merci
-----Message d'origine-----
Bonjour.
faut faire un export vers excel et indiquer le numéro de
la feuille ( et non
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" <mbarnabo@club-internet.fr> a écrit dans le
message de
Est-il possible et si oui comment, de générer un fichier
excel avec des onglets correspondants à des tables ?
Par exemple, je voudrai créer un fichier xcel avec un
onglet "Clients" contenant ma table "Clients", un
ongle "Articles" contenant ma table "Articles", etc,
etc...
Re bonjour, En fait, cela ne fonctionne pas, d'après la doc, l'argument passé pour le nom de la feuille est utilisé uniquement pour l'importation Si tu as une autre idée ? D'avance merci
-----Message d'origine----- Bonjour.
faut faire un export vers excel et indiquer le numéro de la feuille ( et non
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" a écrit dans le message de
news:198e801c44d43$b86faa90$ Bonjour,
Est-il possible et si oui comment, de générer un fichier excel avec des onglets correspondants à des tables ? Par exemple, je voudrai créer un fichier xcel avec un onglet "Clients" contenant ma table "Clients", un ongle "Articles" contenant ma table "Articles", etc, etc...
D'avance merci,
Michel
.
Raymond [mvp]
as-tu essayé avant d'affirmer ? il ne faut pas indiquer de plage mais tu peux indiquer une feuille seule.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" a écrit dans le message de news:1972c01c44d4d$f6daa000$ Re bonjour, En fait, cela ne fonctionne pas, d'après la doc, l'argument passé pour le nom de la feuille est utilisé uniquement pour l'importation Si tu as une autre idée ? D'avance merci
as-tu essayé avant d'affirmer ?
il ne faut pas indiquer de plage mais tu peux indiquer une feuille seule.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" <mbarnabo@club-internet.Fr> a écrit dans le message de
news:1972c01c44d4d$f6daa000$a301280a@phx.gbl...
Re bonjour,
En fait, cela ne fonctionne pas, d'après la doc,
l'argument passé pour le nom de la feuille est utilisé
uniquement pour l'importation
Si tu as une autre idée ?
D'avance merci
as-tu essayé avant d'affirmer ? il ne faut pas indiquer de plage mais tu peux indiquer une feuille seule.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" a écrit dans le message de news:1972c01c44d4d$f6daa000$ Re bonjour, En fait, cela ne fonctionne pas, d'après la doc, l'argument passé pour le nom de la feuille est utilisé uniquement pour l'importation Si tu as une autre idée ? D'avance merci
mbar
Mille excuses, En effet, j'ouvrai Excel avec le mauvais fichier. Cela marche impec. Encore merci, Par contre, je ne comprend pas pourquoi l'aide dit des c.....
Michel
-----Message d'origine----- Bonjour.
faut faire un export vers excel et indiquer le numéro de la feuille ( et non
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" a écrit dans le message de
news:198e801c44d43$b86faa90$ Bonjour,
Est-il possible et si oui comment, de générer un fichier excel avec des onglets correspondants à des tables ? Par exemple, je voudrai créer un fichier xcel avec un onglet "Clients" contenant ma table "Clients", un ongle "Articles" contenant ma table "Articles", etc, etc...
D'avance merci,
Michel
.
Mille excuses,
En effet, j'ouvrai Excel avec le mauvais fichier.
Cela marche impec.
Encore merci,
Par contre, je ne comprend pas pourquoi l'aide dit des
c.....
Michel
-----Message d'origine-----
Bonjour.
faut faire un export vers excel et indiquer le numéro de
la feuille ( et non
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" <mbarnabo@club-internet.fr> a écrit dans le
message de
Est-il possible et si oui comment, de générer un fichier
excel avec des onglets correspondants à des tables ?
Par exemple, je voudrai créer un fichier xcel avec un
onglet "Clients" contenant ma table "Clients", un
ongle "Articles" contenant ma table "Articles", etc,
etc...
Mille excuses, En effet, j'ouvrai Excel avec le mauvais fichier. Cela marche impec. Encore merci, Par contre, je ne comprend pas pourquoi l'aide dit des c.....
Michel
-----Message d'origine----- Bonjour.
faut faire un export vers excel et indiquer le numéro de la feuille ( et non
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" a écrit dans le message de
news:198e801c44d43$b86faa90$ Bonjour,
Est-il possible et si oui comment, de générer un fichier excel avec des onglets correspondants à des tables ? Par exemple, je voudrai créer un fichier xcel avec un onglet "Clients" contenant ma table "Clients", un ongle "Articles" contenant ma table "Articles", etc, etc...
D'avance merci,
Michel
.
Jessy Sempere [MVP]
Bonjour
Et voilà finalement ça marche... ;-)))
Bon tant mieux mais je venais juste de faire un code permettant de faire ce que tu souhaites donc maintenant qu'il est fait, autant le mettre... ;-)
Function ExportTblInFileXLS(strFile As String, ParamArray strTables())
Dim appXl As Excel.Application Dim strFileExport As String Dim intFile As Integer Dim strWorkBook As String Dim intTable As Integer
Set appXl = CreateObject("Excel.Application") With appXl .Workbooks.Add strWorkBook = .ActiveWorkbook.name
For intTable = 0 To UBound(strTables()) DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel97, _ strTables(intTable), "c:tmp.xls", True .Workbooks.Open "c:tmp.xls" .Sheets(1).Copy Before:=.Workbooks(strWorkBook).Sheets(intTable + 1) .Workbooks(2).Close Kill "c:tmp.xls" Next .DisplayAlerts = False .Sheets(intTable + 3).Delete .Sheets(intTable + 2).Delete .Sheets(intTable + 1).Delete .DisplayAlerts = True .ActiveWorkbook.SaveAs strFile End With appXl.Quit: Set appXl = Nothing
End Function *******************************************************
-- @+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "mbar" a écrit dans le message news: 1997f01c44d50$32a58fd0$ Mille excuses, En effet, j'ouvrai Excel avec le mauvais fichier. Cela marche impec. Encore merci, Par contre, je ne comprend pas pourquoi l'aide dit des c.....
Michel
-----Message d'origine----- Bonjour.
faut faire un export vers excel et indiquer le numéro de la feuille ( et non
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" a écrit dans le message de
news:198e801c44d43$b86faa90$ Bonjour,
Est-il possible et si oui comment, de générer un fichier excel avec des onglets correspondants à des tables ? Par exemple, je voudrai créer un fichier xcel avec un onglet "Clients" contenant ma table "Clients", un ongle "Articles" contenant ma table "Articles", etc, etc...
D'avance merci,
Michel
.
Bonjour
Et voilà finalement ça marche... ;-)))
Bon tant mieux mais je venais juste de faire un code permettant de
faire ce que tu souhaites donc maintenant qu'il est fait, autant le
mettre... ;-)
Function ExportTblInFileXLS(strFile As String, ParamArray strTables())
Dim appXl As Excel.Application
Dim strFileExport As String
Dim intFile As Integer
Dim strWorkBook As String
Dim intTable As Integer
Set appXl = CreateObject("Excel.Application")
With appXl
.Workbooks.Add
strWorkBook = .ActiveWorkbook.name
For intTable = 0 To UBound(strTables())
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel97, _
strTables(intTable), "c:tmp.xls", True
.Workbooks.Open "c:tmp.xls"
.Sheets(1).Copy Before:=.Workbooks(strWorkBook).Sheets(intTable
+ 1)
.Workbooks(2).Close
Kill "c:tmp.xls"
Next
.DisplayAlerts = False
.Sheets(intTable + 3).Delete
.Sheets(intTable + 2).Delete
.Sheets(intTable + 1).Delete
.DisplayAlerts = True
.ActiveWorkbook.SaveAs strFile
End With
appXl.Quit: Set appXl = Nothing
End Function
*******************************************************
--
@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"mbar" <anonymous@discussions.microsoft.com> a écrit dans le message news:
1997f01c44d50$32a58fd0$a401280a@phx.gbl...
Mille excuses,
En effet, j'ouvrai Excel avec le mauvais fichier.
Cela marche impec.
Encore merci,
Par contre, je ne comprend pas pourquoi l'aide dit des
c.....
Michel
-----Message d'origine-----
Bonjour.
faut faire un export vers excel et indiquer le numéro de
la feuille ( et non
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" <mbarnabo@club-internet.fr> a écrit dans le
message de
Est-il possible et si oui comment, de générer un fichier
excel avec des onglets correspondants à des tables ?
Par exemple, je voudrai créer un fichier xcel avec un
onglet "Clients" contenant ma table "Clients", un
ongle "Articles" contenant ma table "Articles", etc,
etc...
Function ExportTblInFileXLS(strFile As String, ParamArray strTables())
Dim appXl As Excel.Application Dim strFileExport As String Dim intFile As Integer Dim strWorkBook As String Dim intTable As Integer
Set appXl = CreateObject("Excel.Application") With appXl .Workbooks.Add strWorkBook = .ActiveWorkbook.name
For intTable = 0 To UBound(strTables()) DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel97, _ strTables(intTable), "c:tmp.xls", True .Workbooks.Open "c:tmp.xls" .Sheets(1).Copy Before:=.Workbooks(strWorkBook).Sheets(intTable + 1) .Workbooks(2).Close Kill "c:tmp.xls" Next .DisplayAlerts = False .Sheets(intTable + 3).Delete .Sheets(intTable + 2).Delete .Sheets(intTable + 1).Delete .DisplayAlerts = True .ActiveWorkbook.SaveAs strFile End With appXl.Quit: Set appXl = Nothing
End Function *******************************************************
-- @+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "mbar" a écrit dans le message news: 1997f01c44d50$32a58fd0$ Mille excuses, En effet, j'ouvrai Excel avec le mauvais fichier. Cela marche impec. Encore merci, Par contre, je ne comprend pas pourquoi l'aide dit des c.....
Michel
-----Message d'origine----- Bonjour.
faut faire un export vers excel et indiquer le numéro de la feuille ( et non
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"mbar" a écrit dans le message de
news:198e801c44d43$b86faa90$ Bonjour,
Est-il possible et si oui comment, de générer un fichier excel avec des onglets correspondants à des tables ? Par exemple, je voudrai créer un fichier xcel avec un onglet "Clients" contenant ma table "Clients", un ongle "Articles" contenant ma table "Articles", etc, etc...
