[VBA] Eclater une donnée

Bonjour,

je réalise actuellement une macro sous VBA (ça fait 2 ans que j'y ai pas touché, je vous raconte pas la galére :D ).
J'aurais besoin d'éclater une donnée de type "chiffre;Ip;date" de 1 à 3 colonnes.
La date fait toujours le même nombre de caractére mais pas le chiffre ni l'IP.

Si quelqu'un a une idée du comment faire et avec quelles fonctions (sans obligatoirement me faire le code, mais la démarche) ?

Merci à vous :-)
Configuration: Windows XP
Mozilla

2 réponses

  1. Avec les données en A1 :
    Sub EclateMoi()
        Tableau = Split(Range("A1"), ";")
        Chiffres = Tableau(0)
        IP = Tableau(1)
        LaDate = Tableau(2)
    End Sub
    
    1
    1. Contributeur Ambassadeur
      faire une boucle qui parcoure la colonne de départ
      pour chaque valeur :
      chiffre=left(valeur,instr(valeur,";")-1)
      reste=right(valeur,len(valeur)-instr(valeur,";")
      IP=left(reste,instr(reste,";")-1)
      date=right(reste,len(reste)-instr(reste,";")
      0