ouvrir un fichier .log avec excel et recuperer les données

[nicroq]

Bonjours à tous,

Dans un classeur Excel, je voudrais rajouté un bouton de commande qui doit permettre :
1 - d'ouvrir un fichier .log dans le meme dossier,
2- de copier les infos
3- de les placer dans mon fichier excel,
4- et fermer le fichier.

dans mon cas le nom du fichier a ouvrir se trouve dans la cellule A1 de mon fichier excel originel.

Merci d'avance

 

[nicroq]

Re : ouvrir un fichier .log avec excel et recuperer les données

j'ai trouvé cela sur le forum mais je n 'arrive pas à l'adapter a mon probleme :

Sub Ouvre()
Dim wbMyWb As Workbook
Dim Nom_Fichier As Variant

Nom_Fichier = Application.GetOpenFilename("Fichiers Excel (*.xls), *.xls")
If Nom_Fichier <> False Then
Set wbMyWb = Workbooks.Open(Nom_Fichier)
wbMyWb.Activate
End If