Janniv
Nouveau membre
Bonjour,
Je commence juste à m'intéresser aux macros d'excel et je tombe sur un pb. Je souhaite faire une macro qui m'ouvre un fichier .txt dans excel avec des séparateurs tels que ";", "tab"... mais aussi ce symbole "┘". Le problème est que VBA ne prend pas ce symbole et ne veut pas me séparer le texte quand je relance la macro!!!
Avez-vous une solution??
Merci beaucoup d'avance.
Voici le code de ma programmation :
Workbooks.OpenText Filename:= _
"blablabla.txt", _
Origin:=xlMSDOS, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, Semicolon:=True, _
Comma:=False, Space:=True, Other:=True, OtherChar:="+", 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)), TrailingMinusNumbers:= _
True
On voit bien que le OtherChar ne prend pas le symbole "┘" mais le symbole "+"...
Je ne sais pas quoi faire...
Je commence juste à m'intéresser aux macros d'excel et je tombe sur un pb. Je souhaite faire une macro qui m'ouvre un fichier .txt dans excel avec des séparateurs tels que ";", "tab"... mais aussi ce symbole "┘". Le problème est que VBA ne prend pas ce symbole et ne veut pas me séparer le texte quand je relance la macro!!!
Avez-vous une solution??
Merci beaucoup d'avance.
Voici le code de ma programmation :
Workbooks.OpenText Filename:= _
"blablabla.txt", _
Origin:=xlMSDOS, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, Semicolon:=True, _
Comma:=False, Space:=True, Other:=True, OtherChar:="+", 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)), TrailingMinusNumbers:= _
True
On voit bien que le OtherChar ne prend pas le symbole "┘" mais le symbole "+"...
Je ne sais pas quoi faire...