isoler une chaine de carractere dans cellule

[benjy555]

Bonjour à tous,

une question très classique mais impossible de trouver un cas identique au mien dans l'historique.

Voici la situation :

j'ai une colonne ou dans chaque ligne il y a un commentaire plus ou moins long, donc nbr de caractère variable, mais à un endroit dans cette chaine il y a la portion que je veux isoler.

Cette portion par contre a toujours la même structure en nbr de caractère (8) et commence toujours par les 2 mêmes lettres (BL) mais est suivi de 6 chiffres qui changent :

exemple :

BL123456

le but est donc d'isoler " BL****** " dans ma cellule sachant que sa position varie suivant les cellules.

Merci pour votre aide

 

[R@chid]

Re : isoler une chaine de carractere dans cellule

Bonjour,
Ça semble facile, pourrais-tu joindre un fichier exemple avec 30 lignes pour bien saisir la demande.


@ + +

 

[djidji59430]

Re : isoler une chaine de carractere dans cellule

bonjour,
=STXT(A1;CHERCHE("bl";A1);8)

 

[R@chid]

Re : isoler une chaine de carractere dans cellule

Re,
Salut djidji59430,

bonjour,
=STXT(A1;CHERCHE("bl";A1);8)

Si le commentaire contient le mot "blanc" avant le "BL******" ça va renvoyer "blanc***" d'où ma demande d'un fichier exemple.
tu peux faire :

=STXT(A1;TROUVE("BL";A1);8)

TROUVE : pour respecter la casse



@ + +

 

[benjy555]

Re : isoler une chaine de carractere dans cellule

=STXT(A1;CHERCHE("bl";A1);8)

ceci marche parfaitement

merci beaucoup !

 

[job75]

Re : isoler une chaine de carractere dans cellule

Bonjour benjy555, R@chid, djidji59430,

VBA donne beaucoup de souplesse, voyez le fichier joint et cette fonction :

Function TextePlusNchiffres$(txt$, t$, n As Byte)
Dim x%, i%
x = Len(t) + n
For i = 1 To Len(txt) - x + 1
  If Mid(txt, i, x) Like t & String(n, "#") Then _
    TextePlusNchiffres = Mid(txt, i, x): Exit Function
Next
End Function

A+