XL 2016 isolés série de caractère d'une chaine

[tuti]

bonsoir,

dans une cellule A1, je dispose d'une chaine de caractères

ABC - azertyuiopqsdfghjklm


en B1, je souhaiterais isolés/conservés seulement les 3 premiers caractères
en C1, je souhaiterais l'inverse, supprimer les 6 premiers caractères


merci

 

[laurent950]

Bonsoir,

en B1 =GAUCHE(A1;CHERCHE("-";A1)-2)
en C1 = DROITE(A1;NBCAR(A1)-CHERCHE("-";A1)-1)

 

[tuti]

merci

 

[Staple1600]

Bonsoir

Une autre possibilité
Utiliser Données Convertir (deux fois)
1ere fois: Délimité / séparateur: -
2ème fois: Largeur fixe

NB: Une petit macro (juste pour illustrer mon propos)

Sub Macro1()
[A1] = "ABC - azertyuiopqsdfghjklm"
MsgBox "Début test"
[A1].TextToColumns Destination:=Range("B1"), DataType:=xlDelimited, Other:=True, OtherChar:="-", FieldInfo:=Array(Array(1, 1), Array(2, 1))
MsgBox "1er Données/Convertir"
[C1].TextToColumns Destination:=Range("C1"), DataType:=xlFixedWidth, FieldInfo:=Array(Array(0, 9), Array(7, 1))
MsgBox "2nd Données/Convertir"
'mise en forme, juste pour le test
With [B1:C1]
    .Borders.Value = 1
    .Interior.Color = 1600
    .Font.Color = RGB(55 + 1600 / 8, 0, 0)
    .Font.Bold = True
    .Font.Size = 16
End With
[A1].CurrentRegion.Columns.AutoFit
End Sub