Enregistrer sous une extension perso

PascalXLD

XLDnaute Barbatruc

• 29 Mars 2007

• #2

Re : Enregistrer sous une extension perso

Bonjour

je suppose que tu parles de fichier prn

essaies peut-être ainsi

Application.DisplayAlerts = False
WBk.SaveAs Filename:= _
"C:\tonchemin\Classeur1.prn", FileFormat _
:=xlTextPrinter, CreateBackup:=False
WBk.Close False
Application.DisplayAlerts = True

 

Vote positif 0 Vote négatif

L

Lipaika

Guest

• 29 Mars 2007

• #3

Re : Enregistrer sous une extension perso

En fait non! Il s'agit bien de .rnp, comme ça aurait pu être .abc
Est-ce que ça change qlqch dans ce cas??

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 29 Mars 2007

• #4

Re : Enregistrer sous une extension perso

Re

bah je ne sais pas; essaies avec mon code pour voir

 

Vote positif 0 Vote négatif

L

Lipaika

Guest

• 30 Mars 2007

• #5

Re : Enregistrer sous une extension perso

Si j'enregiste avec l'extension .txt, y a 'til un moyen pour renommer le fichier avec une extension inconnue en VB biensûr.

Merci

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 30 Mars 2007

• #6

Re : Enregistrer sous une extension perso

Bonjour,
Tu peux essayé ce code a insérer dans ta macro (le fichier est dans C:\test):


Dim OldName, NewName
ChDrive "C"
CurDir "C:\test"
ChDir "C:\Test"
OldName = "Monfichier.TXT": NewName = "Monfichier.rnp" ' Définit les noms de fichiers.
Name OldName As NewName ' Renomme le fichier.

 

Vote positif 0 Vote négatif