Bonjour
J'ai fait un code VBA excel qui récupère le contenu d'un email et le met dans un fichier .txt
je fais ensuite ce traitement
Do
str_ligne = txtfile.ReadLine
Loop While (InStr(str_ligne, " Session Type Pr Date IS Name Description")) <> 1
Do
str_ligne = txtfile.ReadLine
ActiveCell.FormulaR1C1 = str_ligne
ActiveCell.Offset(1, 0).Range("A1").Select
Loop While (str_ligne <> "Data ")
Edit modo : merci de mettre le code entre balises SVP avec le bouton </>
Dès que j'arrive à la dernière ligne du mail il m'affiche ce message d'erreur (62) (voir titre)
une piste svp pour contourner le problème?
un grand merci d'avance