Salut

Je fais ouvrir sous excel pour mon programme plusieurs fichiers .CSV (avec séparation de virgule)

Mes premiers essais son concluant mais ca marche tant que j'utilise les meme fichiers .CSV

dès que je change il ne fait plus la séparation grave au point-virgule

je pense que c 'est normal puisque ma macro inclue les paramêtre de séparation spécifique à mon fichier CSV que j'utilise en exemple.

Comment faire pour ouvrir n'ilmporte quel fichier CSV ?


voici le code utiliser


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Workbooks.OpenText Filename:= _
        CommonDialog1.Filename _
        , Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier _
        :=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=True _
        , Comma:=True, Space:=False, Other:=False, FieldInfo:=Array(Array(1, 1), _
        Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), Array(7, 1), Array(8, 1), _
        Array(9, 1), Array(10, 1), Array(11, 1), Array(12, 1), Array(13, 1), Array(14, 1), Array(15 _
        , 1), Array(16, 1), Array(17, 1), Array(18, 1), Array(19, 1), Array(20, 1), Array(21, 1), _
        Array(22, 1), Array(23, 1), Array(24, 1), Array(25, 1), Array(26, 1), Array(27, 1), Array( _
        28, 1), Array(29, 1), Array(30, 1), Array(31, 1), Array(32, 1), Array(33, 1), Array(34, 1), _
        Array(35, 1))

Merci d'avance ++