Extraction chaine de caractère et mise sous forme de tableau

VBA
1

Bonjour,
suite à une extraction sql oracle, je copie le résultat texte sur la ligne 1 de ce tableau.
Classeur1.xlsx (9,9 Ko)
Sur la base de cette ligne je souhaite extraire toutes les valeurs Id & DisplayLabel pour les mettre dans les colonnes prévues à cet effet
Le résultat doit donner cela

image
image174×182 2.31 KB

L’ID est toujours sur 6 digits et le Displaylabel également
Il n’y a que la chaîne de caractère ligne 1 qui peut varier en fonction de ma requête

Je vous remercie par avance

2

pas vu ton fichier au premier coup d’œil,
fausse piste

3

Bonjour,

Avec Excel 2024 ou postérieure.

En A3 :

=STXT(EXCLURE(FRACTIONNER.TEXTE(A1;;"Id");1);4;6)

En B3 :

=STXT(EXCLURE(FRACTIONNER.TEXTE(A1;;"DisplayLabel");1);4;10)

Daniel

4

Sinon, avec une macro :

Sub test()
  Dim Tabl As Variant
  Tabl = Split([A1], "Id")
  For i = 1 To UBound(Tabl)
    [A2].Offset(i) = Mid(Tabl(i), 4, 6)
  Next i
  Tabl = Split([A1], "DisplayLabel")
  For i = 1 To UBound(Tabl)
    [B2].Offset(i) = Mid(Tabl(i), 4, 10)
  Next i
End Sub

Daniel