Comment faire un save as avec en modifiant l'extension du fichier (.doc en .prn)

Yous00 Messages postés 36 Date d'inscription lundi 29 janvier 2007 Statut Membre Dernière intervention 17 janvier 2017 - 28 janv. 2010 à 14:26
Yous00 Messages postés 36 Date d'inscription lundi 29 janvier 2007 Statut Membre Dernière intervention 17 janvier 2017 - 29 janv. 2010 à 22:44
Bonjour, merci pour la reponse tout et dans le titre je fais un save as auto (ActiveDocument.SaveAs FileName:=d) mais je voudrais bien chgt l'extension, je bloc, merci (PS sur Word)

Petit bidouilleur en excel (vba) ...

6 réponses

alain122 Messages postés 8 Date d'inscription jeudi 25 juin 2009 Statut Membre Dernière intervention 30 mars 2010
28 janv. 2010 à 15:56
bonjour
Sous word

Private Sub CommandButton1_Click()
ActiveDocument.SaveAs "c:\essai.prn"
End Sub

A+
0
Yous00 Messages postés 36 Date d'inscription lundi 29 janvier 2007 Statut Membre Dernière intervention 17 janvier 2017
28 janv. 2010 à 18:29
Oui, merci, je me suis mal exprimer en faite j'utilise ActiveDocument.name pour garder le même nom en gros cela donne ca


a = "c:/truvmuch/aa/"
b = ActiveDocument.name
c = a + b
ActiveDocument.saveas:= c

et il me sauvegarde ke doc en .doc, normale maios il le le faut en .prn

merci

Petit bidouilleur en excel (vba) ...
0
alain122 Messages postés 8 Date d'inscription jeudi 25 juin 2009 Statut Membre Dernière intervention 30 mars 2010
29 janv. 2010 à 09:59
Bonjour
Essaie ceci

b = "ActiveDocument.name"
A = "c:/truvmuch/aa/"
b = Left(ActiveDocument.name, Len(ActiveDocument.name) - 4) & ".prn"
c = A + b
ActiveDocument.saveas:= c

A+
0
Yous00 Messages postés 36 Date d'inscription lundi 29 janvier 2007 Statut Membre Dernière intervention 17 janvier 2017
29 janv. 2010 à 11:31
Bonjour,
Super, j'avais déjà essayer mais j'avais du oublier une ) ou autre je te remerci, sa passe comme ca

A = "c:/truvmuch/aa/"
b = Left(ActiveDocument.name, Len(ActiveDocument.name) - 4) & ".prn"
c = A + b
ActiveDocument.saveas:= c

on est pas obliger de mettre deux b différents merci encore bonne journée

Jyb

Petit bidouilleur en excel (vba) ...
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 234
29 janv. 2010 à 18:04
Bonjour,

Il y a une énorme différence entre changer l'extension de .doc en .prn et transposer un fichier .doc en fichier .prn ...
modifier l'extension n'en fait pas un fichier prn ..
Que cherchais tu donc à faire, finalement ?
La réponse qui t'a été donnée ne transforme pas en .prn

____________________
Vous aimez Codes-Sources ? Il vous aide ? Cliquez ici pour l'aider à continuer
Cliquer sur "Réponse acceptée" en bas d'une solution adéquate est
0
Yous00 Messages postés 36 Date d'inscription lundi 29 janvier 2007 Statut Membre Dernière intervention 17 janvier 2017
29 janv. 2010 à 22:44
Oui je sais bien mais je passe avec un distiller donc c'est nickel merci encore pour m'avoir aider

Cdlt


Petit bidouilleur en excel (vba) ...
0