Probleme Methode OpenText

Bonjour le forum,

J'aurais besoin de quelques informations sur la methode open et opentext.

Dans mes macros, j'ai l'habitude d'ouvrir mes fichiers comme suit:

Code:

---

1 2 3 4

FileSelection = Application.GetOpenFilename("", , "File Selection", , True) a = 1 For a = 1 To UBound(FileSelection) Set Treatedfile = Application.Workbooks.Open(FileSelection(a)) '(OpenFile, xlMSDOS)

---

avec TreatedFile déclaré comme Workbook et FileSelection comme variant, et je déroule ensuite le code.

Cette fois, je souhaite ouvrir un fichier texte en mettant des points virgule comme délimitant pour les colonnes.
J'ai bien trouvé la méthode suivante:

Code:

---

1 2 3 4

FileSelection = Application.GetOpenFilename("", , "File Selection", , True) a = 1 For a = 1 To UBound(FileSelection) Workbooks.OpenText Filename:=CStr(FileSelection(a)), DataType:=xlDelimited, Semicolon:=True

---

le problème, c'est que je n'arrive plus à affecter le fichier ouvert à une variable, en gors à Treated file. Si j'écris:

Code:

---

Set Treatedfile = Application.Workbooks.OpenText(FileSelection(a), semicolon:=true)

---

Une erreur de compilation apparait (fonction ou variable attendue) avec openText en surbrillance!!

Pouvez vous m'expliquer et/ou m'aider SVP? :roll:

Vous remerciant par avance,

Johann

Bonjour johannj,

en effet, j'avais observé la même chose

la solution que j'avais trouvé est la suivante :

Code:

---

1 2 3 4 5

FileSelection = Application.GetOpenFilename("", , "File Selection", , True) a = 1 For a = 1 To UBound(FileSelection) Workbooks.OpenText Filename:=CStr(FileSelection(a)), DataType:=xlDelimited, Semicolon:=True Set Treatedfile = Activeworkbook

---

Bonjour le forum,

Merci tototiti2008 pour ta réponse.
Du coup, suite à ta réponse, j'ai une nouvelle question ou remarque. Depuis le début, j'ai toujours remarqué que les personnes "confirmées" préconisaient de ne pas utiliser le genre d'instruction "Activeworkbook" ou "selection"!!

Ce qui parait vraiment bizarre, c'est qu'il y ai tant de "différence" entre les méthodes "open" et "opentext" :(

En tout cas, merci de ta réponse,
A bientot,
Johann

Bonjour johannj,

en effet, si on peut éviter, c'est mieux
mais là je n'ai pas trouvé de moyens d'éviter...
Ceci dit, il y a assez peu de risques, puisque tu viens d'ouvrir le "classeur", il doit être actif
si avec ça tu gère les éventuelles erreurs d'ouverture, je ne vois pas trop le problème