recherche de texte dans un classeur excel

Question

Bonjour, voici mon problème, j'aimerais rechercher du texte dans une colonne excel qui commence par < et qui finit par > et qui m'affiche tout ce qu'il a trouvé dans une autre colonne. Par exemple dans ma colonne A j'ai : blablablalbal pouetblabla leoeoeoeo kekeekpouetete Dans ma colonne B j'aurais donc: Merci de votre aide

swan94 · Answer

Salut,

ne me souvenant plus exactement du vba excel je vais te donner un algo (surement pas le plus optimisés)
   
Sub Lecture()
     Pour i de 0 à nombreDeLignes -1
           on error resume next
            Cellule.offset(0,1)=extractUnknownPartFile(cellule(i).texte, "<", ">")
    i suivant
End sub

Private Function ExtractUnknownPartFile(sPath, sLeft, sRight) As String

  
    Dim FF As Integer, sBuffer As String, lPosL As Long, lPosR As Long
    
    FF = FreeFile
    On Error Resume Next
    Open sPath For Input As #FF
        sBuffer = Input(LOF(FF), #FF)
    Close #FF
    On Error GoTo 0

    If LenB(sBuffer) Then
        lPosL = InStr(1, sBuffer, sLeft)
        lPosR = InStr(lPosL + 1, sBuffer, sRight)
        If lPosL > 0 And lPosR > 0 Then ExtractUnknownPartFile =  Mid$(sBuffer, lPosL +  Len(sLeft), lPosR - lPosL  - Len(sLeft))
    End If
End Function

La fonction a été récupérée sur le forum. Il te faudra peut être l'adapter au VBA.

J'espère que ca t'aidera a avancer.

Swan94

paupiau · Answer

Finalement j'ai changé de stratégie, je suis passer par du VBS, mais merci je vais essayer quand même sur excel :)

Recherche de texte dans un classeur excel

2 réponses

Votre réponse

Discussions similaires