Enregistrer sous

[stargate]

Bonjour,


J'ai ajouter un richtextbox sur ma feuille,
et je voudrais enregistrer son contenu sous le format rtf


j'ai essayé ceci,mais il me retourne une erreur

Run-Time error 1004
Method 'GetSaveAsFilename'of object'_Application failed

Dim fileSaveName
fileSaveName = Application.GetSaveAsFileName(fileFilter:='Format Rtf(*.rtf)')

merci

 

[G.David]

RTF c'est un format de word il n'apparait pas dans les propositions d'excel (enregistrer sous) tu ferait mieux de le convertir en pdf via PDF creator tu auras un fichier en lecture seul (enfin si c'est ce que tu veut) lisible avec Acrobat reader ou Foxitreader (je conseil ce dernier car infiniment plus leger et rapide a l'ouverture et en Français ce qui ne gate rien)
Cordialement
G.David

 

[stargate]

merci pour ta réponse,mais c'est plus simple que je ne croyais


Il faut faire

RichTextBox1.SaveFile('D:\\lefichier.rtf')

le chemin spécifié peut-être choisi en utilisant un variable string qui récupére l'entrée d'une inputbox par exemple


voilà