VBA convertir avec séparateur

J'ai une cellule avec le nom suivant : Lundi/Mardi/Mercredi

Je souhaite mettre chaque jour dans une colonne. J'ai donc enregistrer une macro pour "Convertir " avec le séparateur "/" et cela me donne le code suivant:

 Selection.TextToColumns Destination:=Range("F2"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
        :="/", FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 1)), _
        TrailingMinusNumbers:=True

Par contre dans ma cellule je peux avoir tous les jours de la semaine comme deux seulement.

Quel est le code quelque soit le nombre de valeur à séparer?

Merci d'avance

Agrimaman

Re-,

Peut-être en supprimant le champ "FieldInfo"?

Selection.TextToColumns Destination:=Range("F2"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar:="/"

Peut-être?

Re

Et ben c'est tout simplement cela

Merci bcp

Agrimaman

Rechercher des sujets similaires à "vba convertir separateur"