Arggg qui l'eut cru, je suis complètement rouillé en VBA ...
et mes codes soint au boulot ...

voilà je n'arrive plus à insérer le contenu d'un fichier texte dans une variable string ...

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Private Sub GetMailBody_Click()
MailingFile.ShowOpen
bodyPath = MailingFile.FileName
Set fs = CreateObject("Scripting.fileSystemObject")
Set df = fs.OpenTextFile(bodyPath)
mailBody = ?????
df.Close
MsgBox (mailBody)
End Sub