Discussion :

[Axe_Débutant]

Bonjour à tous les forumeurs,

Je tente, je dis bien je tente de me faire un petit programme d'importation de fichiers textes dont le nom commence par LF pour les uns, et IB pour les autres.

La routine débute donc par une instruction du genre "Application.GetOpenFilename..." qui ouvre la boîte de dialogue "ouvrir fichier", puis je double clique sur le fichier texte que je désire importer et les paramètres d'importation s'appliquent. Pour l'instant, j'ai donc 2 routines, mais serait-il possible de les regrouper de manière à poser deux conditions ?

- si le nom du fichier que j'ouvre commence par LF : lancement de la routine 1,

- si le nom du fichier commence par IB : lancement de la routine 2.

Voilà, n'y connaissant pas grand chose, toute aide serait la bienvenue.

Merci d'avance et bonne journée à tous.

[Invité]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
FichierTxt = "c:\Rep\LfXXXX.txt"
    Select Case Left(UCase(Trim("" & FichierTxt)), 2)
            Case "LF "
               RoutineLF
            Case "IB "
               RoutineIB
            Case "XX"
                RoutineXX
    End Select

[Axe_Débutant]

Bonjour Monsieur Rdurupt,

Merci beaucoup pour cette prompte réponse.

La routine est parfaite, et je vais pouvoir avancer dans mon projet.

Merci encore, et excellente journée.