Extraction EXCEL

Résolu
alain -  
cbauf Messages postés 5337 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je reçois des informations dans une cellules EXCEL que je souhaiterais extraire pour les organsier en plusieur colonnes

Je vous donnes une exemple.

Je récupére l'info suivante en A1 : imprimante 4000/FAX 3625/Photocopieur 9560/...................(plusieurs fois)

Je souhaiterais les mettre en forme comme cela:

B1 : imprimante 4000
C1 : FAX 3625
D1: Photocopieur 9560
..........
.
etc

Connaissais vous une solution.

Merci par avance de votre aide.

Alain
Configuration: Windows XP
Internet Explorer 6.0

2 réponses

  1.
    lermite222 Messages postés 9042 Statut Contributeur 1 199
     
    Bonjour,
    un modèle !! 
    Sub sépare()
Dim Txt As String, i As Integer
Dim T
'pour l'exemple
Txt = "imprimante 4000/FAX 3625/Photocopieur 9560/"
    T = Split(Txt, "/", -1)
    For i = 0 To UBound(T)
        Cells(i + 1, 1) = T(i)
    Next i
End Sub

    A+
    0
    1. alain
       
      Bonsoir,

      Je suis parti sur la solution de votre confrère qui est beaucoup plus simple.

      Toutefois, je tiens à vous remercie d'avoir passer du temps pour me répondre.

      A bientôt.

      Alain
      0
  2. cbauf Messages postés 5337 Date d'inscription   Statut Contributeur Dernière intervention   803
     
    Bonjour,
    Moi j'utiliserais la fonction convertir
    Donnés > convertir > Option Délimité et tu choisis le « / » comme séparateur

    (Décocher tabulation " par Défaut")
    0
    1. alain
       
      CBAUF,

      C'est la première que j'utilise ce forum pour résoudre ce type de problème et alors là chapeau.

      Je tiens à vous remercie pour votre promtitude et la qualité de votre réponse.

      Si il y avait une note à mettre ce serait sans hésitation 10/10

      Félicitations et encore MERCI.

      Alain.
      0
      1. cbauf Messages postés 5337 Date d'inscription   Statut Contributeur Dernière intervention   803 > alain
         
        RESOLU

        De rien ;-)))))


        Tu peux, si tu penses que c'est le cas,
        mettre ce topic en résolu :

        Pour les membres !
        Dans l'option en haut ou en bas de la page

        OU POUR

        Les "non-membres", ont aussi la possibilité de le faire !


        Click sur l'icône triangle jaune.

        et expliques que le problème est résolu.
        0