Importation des valeurs d'un fichier log en Excel via macro

Bonjour, voilà je désire faire l'importation de valeurs analytiques contenu dans un fichier log vers un fichier de traitement excel.

j'arrive bien à ouvrir le .log en excel mais je bloque sur la copie vers le fichier de destination;
Si vous avez une piste, je suis preneur.
Guigui1976

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

Sub test() nom = Range("a2").Value adresse = Range("b2").Value Nom_Fichier = adresse & nom 'emplacemeent ou se trouve le fichier If Nom_Fichier <> False Then ' vérification de la présence ou non d'une référence de fichier Workbooks.OpenText Filename:=Nom_Fichier, Origin:=xlWindows, _ StartRow:=1, DataType:=xlDelimited, Local:=True, Semicolon:=True End If   Windows(nom).Activate   Range("A1:O1").Select Application.CutCopyMode = False Selection.CopyThisWorkbook.Activate Range("d12").Paste Windows(nom).Close End Sub [ATTACH]213847[/ATTACH]

---

Quelques détails sur ton code :
Tes trois premières lignes pourraient se résumer en une seule.

Code:

---

Nom_Fichier = Range("b2").Value & Range("a2").Value 'emplacemeent ou se trouve le fichier

---

Mais je te conseille de déclarer les variables que tu utilises :

Code:

---

Dim Nom_Fichier As String

---

Là, je ne vois pas trop ce que tu essayes de faire :

Code:

---

If Nom_Fichier <> False Then ' vérification de la présence ou non d'une référence de fichier

---

Tu compares une chaine de caractères avec une valeur booléenne. :koi:
Si tu veux vérifier l'existence du fichier dont ta variable porte le nom, ce n'est pas la bonne méthode.

Citation:

---

j'arrive bien à ouvrir le .log en excel mais je bloque sur la copie vers le fichier de destination;

---

Si ce que tu veux faire c'est enregistrer au format XLSX avec comme nom "log.xlsx" le fichier que tu viens d'ouvrir, alors remplace tout ce qui suit le End If par :

Code:

---

1 2	ActiveWorkbook.SaveAs(Range("b2").Value & "log.xlsx", xlOpenXMLWorkbook) ActiveWorkbook.Close

---

Merci, à toi pour c'est réponse.
Bien vu pour les déclarations de variable et la compilation nom_Fichier.
La vérification est pour être sur qu'il est bien un nom de fichier dans la cellule avant d'aller + loin dans la macro.
ce que je désire c'est de copier les valeurs contenue dans le fichier vers le fichier ou est "logé" la macro, puis de refermer le fichier log pourqu'il puisse être utilisé par le matériel d'analyse.

un grand merci pour ton aide

Guigui1976