Déplacement partiel d'une chaine d'une colonne à l'autre

Bonjour a tous,

Je sollicite votre aide pour l'écriture en VBA d'un déplacement partiel d'une chaine de caractère de la colonne B à la colonne A.

Ex: Dans ma colonne B: TT 04

LCV 07

TT 08

PT 02

Je souhaiterais déplacer les caractères de gauche jusqu'à l'espace de la colonne B, à la colonne A sur leur ligne respective.

Ceux qui donnerais dans ma colonne A: TT Et dans ma colonne B: 04

LCV 07

TT 08

PT 02

Si vous pouviez m'aider, j'ai essayé de faire un bout de code avec l'insertion d'une formule

<< ActiveCell.FormulaR1C1 = "=RIGHT(R[0]C[-1],FIND(R[0]C[+1],"" "")-1)" >>

Mais sa ne donne rien et je ne sais pas pourquoi, je suis débutant en VBA

Can you help me please

Ce n'est pas très clair je reprend l'exemple

Je voudrais dans ma colonne A:

TT

LCV

TT

PT

Et dans ma colonne B:

04

07

08

02

Bonjour,

Quelque chose comme :

Sub Test()
    Dim v, c As Range
    Application.ScreenUpdating = False
    For Each c In ActiveSheet.Range("B2:Bxx")
        v = Split(c)
        c.Cells(1, 0) = v(0)
        'au choix l'une des deux lignes suivantes, mais pas les deux en même temps
        c = "'" & v(1)
        c = v(1): c.NumberFormat = "00"
    Next c
End Sub

Cordialement.

Bonjour,

pas besoin de formule ni de vba.

'Données / Convertir' est prévu pour ça. Choisi 'Délimité' puis coche Espace en séparateur.

eric

Merci de vos réponses rapides, vous m'avez beaucoup aidé.

Je prend la solutions d'eriic elle fonctionne parfaitement, mais du cout elle supprime le 0 avant mes chiffres, une idée de comment ne pas le supprimer?

J'ai trouvé c'était juste le format de cellule à modifier

Encore merci de votre aides