Bonsoir à toutes et à tous,
j'ai le code ci-dessous qui enregistre une feuille d'un classeur dans un répertoire. Tout fonctionne bien.
Mon problème est que sous office 2010 il est au format xlsx au lieu de xls. Sous 2007 il est bien au format xls.
Je ne comprend pas.
Merci de votre aide
@+
j'ai le code ci-dessous qui enregistre une feuille d'un classeur dans un répertoire. Tout fonctionne bien.
Mon problème est que sous office 2010 il est au format xlsx au lieu de xls. Sous 2007 il est bien au format xls.
Je ne comprend pas.
Merci de votre aide
@+
Code:
Lechemin = "Y:\" 'Emplacement où on enregistre
LeFichier = ThisWorkbook.Sheets("ASN").Cells(1, 2) 'Le nom du fichier prend la valeur de la cellule B1
ThisWorkbook.Sheets("ASN").Copy 'On copie la feuille
ActiveWorkbook.SaveAs Lechemin & LeFichier & ".xls" 'On enregistre sous au format xls
ActiveWorkbook.Close 'On ferme le fichier