Suprimer Texte inutile dans un fichier Excel

Bonjour à tous, je suis nouveau sur le forum et j'aurais besoin d'un peu d'aide !

Je suis actuellement en stage, et je dois traiter une base de donnés. Je ne suis pas très doué sur Excel donc je voudrai solliciter vos connaissance.

Je cherche donc a supprimer du texte inutile dans mon fichier excel, et j'aurais besoin de garder juste les donnés de type " JIC: 12-34-56 XXX 12345 " dans la colone A..

Voilà, merci bien !

20fichier-excel.xlsx (10.37 Ko)

Bonjour,

En C3 mettre la formule en C1 et C2 cette formule donne #VALEUR car JIC ne s'y trouve pas

=DROITE(A3;NBCAR(A3)-TROUVE("JIC";A3;1)+1)

la tirer vers le bas.

Bonjour,

une solution via une macro,... si j'ai bien compris. j'ai un doute pour les données à afficher.

Sub test()
Set ws1 = Sheet1
Set ws2 = Sheet2
dl = ws1.Range("a" & Rows.Count).Row
k = k0
For i = 1 To dl
r = ws1.Cells(i, 1)
s = InStr(r, "JIC :")
If s <> 0 Then
  k = k + 1
  ws2.Cells(k, 2) = Mid(r, s)
  'ws2.Cells(k, 1) = Left(r, s - 1)
  'ws2.Cells(k, 3) = ws1.Cells(i, 2)
End If
Next i
Set ws1 = Nothing

Merci beaucoup d'avoir pris le temps de répondre, c'est super sympa de votre part ! J'ai utilisé la première solution de Robjam, elle marche du feu de dieu !!!! Merci quand même à H2s04 pour ta reponse !

Rechercher des sujets similaires à "suprimer texte inutile fichier"