Sauvegarde et copy Feuille excel

[croftman]

Bonsoir!

Voila, je voulais savoir comment faire pour sauvegarder une feuille excel dans un nouveau classeur, avec le format des cellulles!

J'ai testé ça, mais ça ne garde pas le format :

Workbooks(i).SaveAs Filename:=txt_loc.Text, FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False 'Sauvegarde du classeur

En plus de ça, la méthode SaveAs à échoué... sur excel 2000 et 2003.

Quelle commande serait compatible de 97-2003 ou 2000-2003?

Et pour la copie d'une feuille d'un classeur à un autre je fais :

Set xls = New Excel.Application
Set MonClasseur = xls.Workbooks.Open(Module_Choisi)
Set MafeuilleDeDonnees = MonClasseur.Worksheets(cmb_feuilles.Text)

MafeuilleDeDonnees.Range("A" & x, "K" & x).Copy
Sheets("Materiaux_Complexes").Range("A" & j, "K" & j).PasteSpecial xlPasteValues, xlPasteSpecialOperationNone

MonClasseur.Close (False)
xls.Quit

Mais ça ne copie pas le format non plus! J'ai tenté avec xlPasteValues + xlPasteFormats mais rien non plus!

Je me demande si ce n'est pas lié a mon autre problème de format! cf Probleme format de cellule

 

[gilbert_RGI]

Re : Sauvegarde et copy Feuille excel

Bonjour

il faut tester la version et en fonction du resultat de ce test mettre les bons arguments
qui font planter les versions antérieures

Cdlt

RGI

 

[croftman]

Re : Sauvegarde et copy Feuille excel

Ben en fait c'était lié à un problème de "trop de format de cellules différents", c'est reglé donc

Merci quand même ^^