Extraction EXCEL

Résolu
alain -  
cbauf Messages postés 4299 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
A voir également:

2 réponses

Réponse 1 / 2
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
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
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
Réponse 2 / 2
cbauf Messages postés 4299 Date d'inscription   Statut Contributeur Dernière intervention   786
 
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
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
cbauf Messages postés 4299 Date d'inscription   Statut Contributeur Dernière intervention   786 > 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