Nom de fichier

Bonjour,

Dans une macro, je souhaiterais ouvrir in fichier du genre :

Open "c:\PAIEMMAAAA.txt" For Input As #1 en demandant à l'utilisateur de saisir MM et AAAA au cour de la macro.

Je ne sais pas si c'est possible, mais si c'est le cas, votre aide serait la bien venue

Bonjour et bienvenue,

Avec ce code à essayer

Option Compare Text
Sub test()
'Macro Dan pour TH051 - XL pratique le 09/04/2009
Dim chemin As String, Fichier As String, extension As String, a As String
chemin = "C:\"
extension = ".txt"
a = InputBox("taper votre mois et année au format MMAAAA sans espace")
Fichier = "PAIE" & a
On Error GoTo message
Workbooks.Open Filename:=chemin & Fichier & extension 'aaaa.xls"
Exit Sub
message:
MsgBox "Le fichier n'existe pas ou vous n'avez pas respecté la systaxe MMAAAA"
End Sub

Amicalement

Dan

PS : Si ton pb est solutionné n'oublie pas de mettre RESOLU sur le fil. Explication par ici --> https://forum.excel-pratique.com/viewtopic.php?t=13

Merci Dan,

le problème c'est que l'instruction que j'utilise (et le reste de ma macro est construite sur cette base) est

Open "c:\compta.txt" For Input As #1

je n'ouve donc pas le fichier txt dans excel.

je pense qu'il reste juste une petite modif

Merci

rectificatif c'est

Open "c:\paieMMAAAA.txt" For Input As #1 j'ai fait un copié collé trop rapide

J'ai utilisé

Open chemin & Fichier & extension For Input As #1

et ça marche

Par contre je ne trouve pas l'utilitaire pour indiqué que le post est résolu

Merci