Separation de données

[bobjazz]

Bonsoir le Forum

c'est encore moi
j'ai cela c1 =a1 & ' ' & b1
et cette fois je voudrais
en C1 j'ai 'EX N° 90012378'
et je voudrais separer tout les données entre les espaces
comme cela
D1'EX', E1'N°', F1'90012378'

je sais faire cela, c1 =a1 & ' ' & b1 et maintenant c'est l'inverse :side:

Merci d'avance

 

[JeanMarie]

Bonsoir

Sélectionne les données de la colonne, puis clique sur le menu Données/Convertir..., Dans la boîte de dialogue, clique sur le bouton suivant, puis coche le champ 'espace' puis clique sur le bouton terminer. Voilà

Attention les données existantes sur les colonnes à la droite seront écrassées.

@+Jean-Marie

 

[bobjazz]

Re Bonsoir JeanMarie

Merci cela marche

Je fait vite pour que tu ne sois pas embete
En tout cas moi c'est fini pour ce soir, au lit fatigué

Encore Merci

 

[_Thierry]

Re Bonsoir BobJazz et Jean-Marie, le Forum

Jean Marie va finir par croire que je fais exprès de repasser derrière lui LOL

En VBA ça donnerait un truc comme çà :

Option Explicit

Sub TheSpaceExtractorWithAlert()
Dim Plage As Range, Cell As Range
Dim Container As Variant
Dim StringComplet As String
Dim Alert As String
Dim i As Byte


Set Plage = Range('C1:C' & Range('C65536').End(xlUp).Row)
   
    For Each Cell In Plage
        StringComplet = Cell
           
          Container = Split(StringComplet, ' ')
            If UBound(Container) > 0 Then
                For i = 0 To UBound(Container)
                        Cell.Offset(0, i + 1) = Container(i)
                Next i
            Else
                Alert = Alert & Cell.Address(0, 0) & vbTab & StringComplet & vbCrLf & vbTab
                Cell.Interior.ColorIndex = 3
            End If
    Next Cell
    If Len(Alert) > 0 Then
        MsgBox 'Les Cellules suivantes n'ont pas pu être traïtées' & vbCrLf & vbTab & Alert, vbCritical
    End If
End Sub

Bonne Nuit
[ol]@+Thierry[/ol]

 

[bobjazz]

Re bonsoir le Fil

Merci à vous, je suis comblé
avec JeanMarie façon outils qui marche à merveille
avec @Thierry façon VBA qui marche à merveille

mais là, vu mon âge et surtout mon job de demain, je vous laisse à vos codes

Bonne nuit et merci