enregistrer sous en xlsx

phlaurent55

Nous a quittés en 2020

Repose en paix

• 26 Septembre 2013

• #2

Re : enregistrer sous en xlsx

Bonjour,

à essayer:
ActiveWorkbook.SaveAs Filename:="H:\Done\" & NomFic & ".xlsx", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

à+
Philippe

 

Vote positif 0 Vote négatif

S

sonskriverez

XLDnaute Occasionnel

• 26 Septembre 2013

• #3

Re : enregistrer sous en xlsx

Bjr phlaurent55

J'ai essayé cela donne : toto.xls.xlsx

Pas top

 

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 26 Septembre 2013

• #4

Re : enregistrer sous en xlsx

Re,

en raccourcissant le nom du fichier de 4 caractères pour que n'apparaisse plus .xls

ActiveWorkbook.SaveAs Filename:="H:\Done\" & Left(NomFic, Len(NomFic) - 4) & ".xlsx", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False


à+
Philippe

 

Vote positif 0 Vote négatif

S

sonskriverez

XLDnaute Occasionnel

• 26 Septembre 2013

• #5

Re : enregistrer sous en xlsx

Super

Cela marche parfaitement, il fallait y penser

merci beaucoup

 

Vote positif 0 Vote négatif