Ouvrir et attribuer une variable nom à un classeur

Hi there,

Je cherche à ouvrir des classeurs (en lecture seule ou non) et à leur attribuer un nom en une seule et même étape. Est-ce possible ?

Pour le moment j'attribue à une variable string le ActiveWorkbook.Name puis je me sers uniquement de cette variable pour référer à ce classeur.

Dim nomclasseur$

Workbooks.Open Filename:="C:\classeur.xlsx", ReadOnly:=True
nomclasseur = ActiveWorkbook.Name
With Workbooks(nomclasseur).Sheets("blabla")
      [...]
End With
Workbooks(nomclasseur).Close False

bonjour

essaie ceci

Set wb = Workbooks.Open("test.xlsx")
With wb.Sheets("blabla")
      [...]
End With
wb.Close False

Merci, ça me semble très bien !

Par contre je n'avais pas pensé : j'ai aussi des .csv à ouvrir avec Workbooks.opentext et évidemment ça ne marche pas (confer ce lien pour les détails =>

).

Y a t'il une solution à ce niveau ?

bonjour,

pas que je sache

Bonjour,

Peut être une solution pour les fichiers .csv :

ThisWorkbook.FollowHyperlink "c:\\xxxxx\xxxx\xxxxx.csv"

Répertoire à adapter biensur

Cdlt,