stocker le nom d'un classeur dans une variable

  • Initiateur de la discussion Initiateur de la discussion Kiki
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

K

Kiki

Guest
Bonjour à tous,

Je voudrais retourner (stocker) le nom d'un classeur dans une variable.

Je ne trouve pas l'expression qui complèterait ma macro :

Sub ouvre()

Dim var As String

Workbooks.OpenText Filename:= _
'C:\\fichier.txt' _
, Origin:=xlMSDOS, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=True, _
Comma:=False, Space:=False, Other:=False, FieldInfo:=Array(1, 1), _
TrailingMinusNumbers:=True


Var = ........................................

End Sub

N'hésitez pas à tout corriger !

Merci beaucoup,

A+

Kiki
 
Tu peux essayer le code suivant :

Sub ouvre()

Dim var As String, wkb as workbook

set wkb = Workbooks.OpenText (Filename:= _
'C:\\fichier.txt' _
, Origin:=xlMSDOS, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=True, _
Comma:=False, Space:=False, Other:=False, FieldInfo:=Array(1, 1), _
TrailingMinusNumbers:=True)


Var = wkb.Name

End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
5
Affichages
567
Réponses
1
Affichages
821
Réponses
2
Affichages
1 K
Réponses
22
Affichages
3 K
Réponses
11
Affichages
2 K
Retour