Sauvegarde d'un Workbook

Bonjour,


Voici un petit bout de code dans lequel je bloque. Je reçois des fichiers
xls au format 97 mais j'utilise 2003 et pour éviter le message
d'avertissement me disant que le fichier est d'une version antérieur, je
veux avant de faire un traitement sur le fichier xls, l'ouvrir et le
sauvegarder directement au format 2003.

J'ouvre le Workbook avec la méthode Open
Mais comment sauvegarder le Workbook après l'avoir ouvert ?
Il n'y a pas de méthode "Save" ...


Mercide vos réponses

Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Add
Set xlSheet = xlBook.Worksheets(1)
xlApp.Workbooks.Open (repSource + "" + chiffrierExcel), , True
'******************************
ici je voudrai sauvegarder

'******************************


xlApp.Application.Quit

Set xlApp = Nothing
Set xlBook = Nothing
Set xlSheet = Nothing

Bonsoir.

tu peux faire par exemple:
Dim XL_App As New Excel.Application
With XL_App
.Workbooks.Add
.DisplayAlerts = False
.ActiveWorkbook.SaveAs ("Classeur1.XLS")
.DisplayAlerts = True
.Quit
End With
Set XL_App = Nothing


--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Jacques" <jac_be@hotmail.com> a écrit dans le message de news:
u3bzcs$SFHA.2872@TK2MSFTNGP14.phx.gbl...

Bonjour,


Voici un petit bout de code dans lequel je bloque. Je reçois des fichiers
xls au format 97 mais j'utilise 2003 et pour éviter le message
d'avertissement me disant que le fichier est d'une version antérieur, je
veux avant de faire un traitement sur le fichier xls, l'ouvrir et le
sauvegarder directement au format 2003.

J'ouvre le Workbook avec la méthode Open
Mais comment sauvegarder le Workbook après l'avoir ouvert ?
Il n'y a pas de méthode "Save" ...


Mercide vos réponses

Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Add
Set xlSheet = xlBook.Worksheets(1)
xlApp.Workbooks.Open (repSource + "" + chiffrierExcel), , True
'******************************
ici je voudrai sauvegarder

'******************************


xlApp.Application.Quit

Set xlApp = Nothing
Set xlBook = Nothing
Set xlSheet = Nothing

Bonjour Raymond
Ce message est pour Mr Raymond

Voila je ne peux plus créer un nouveau sujet (Panneau de sens interdit)
????

Javais une question à poser sur la liste des communes, département région
de
france mise à disposition par Raymond (Fond vert et blanc)

comment peut-on déclanché une ouverture de table avec un double clic sur
un
champ Commune affiché

Merci

Bonjour.

passe moi un mail pour m'expliquer le problème.

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Guy BRUSSON" <GuyBRUSSON@discussions.microsoft.com> a écrit dans le message
de news: FEAC6BA9-11F7-42F5-8BF0-390D65CD6448@microsoft.com...

Bonjour Raymond
Ce message est pour Mr Raymond

Voila je ne peux plus créer un nouveau sujet (Panneau de sens interdit)
????

Javais une question à poser sur la liste des communes, département région
de
france mise à disposition par Raymond (Fond vert et blanc)

comment peut-on déclanché une ouverture de table avec un double clic sur
un
champ Commune affiché

Merci

Re bonjour Raymond

sur quelle adresse mail SVP
Merci

Bonjour.

passe moi un mail pour m'expliquer le problème.

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Guy BRUSSON" <GuyBRUSSON@discussions.microsoft.com> a écrit dans le
message
de news: FEAC6BA9-11F7-42F5-8BF0-390D65CD6448@microsoft.com...

Bonjour Raymond
Ce message est pour Mr Raymond

Voila je ne peux plus créer un nouveau sujet (Panneau de sens interdit)
????

Javais une question à poser sur la liste des communes, département
région
de
france mise à disposition par Raymond (Fond vert et blanc)

comment peut-on déclanché une ouverture de table avec un double clic
sur
un
champ Commune affiché

Merci