extraire des doublons d'une chaine de caractères

[finarobert]

Bonjour
J'ai une chaine de caractères qui peut être très longue de type :AZEDZEZSDAZEDZFREZQSSUAAZEDZAAAEZQSSU

je cherche un programme vba pour extraire de cette chaines les doublons (ou plus) d'au moins 5 caractères:
Par exemple dans mon exemple, j'ai 3 fois AZEDZ et 2 fois EZQSSSU
pouvez vous me donner une solution à ce problème?
merci
Boby

 

[djidji59430]

Bonjour à tous,

En VBA, je ne sais pas,mais en formulr :

 

[finarobert]

Bonjour à tous,

En VBA, je ne sais pas,mais en formulr :

MERCI, je vais tout transformer en vba

 

[finarobert]

MERCI, je vais tout transformer en vba

j'ai un problème car e n'ai pas ces fonctions _xlfn

 

[Jacky67]

j'ai un problème car e n'ai pas ces fonctions _xlfn

Bonjour,

Une proposition par vba (toute version)

Sub cinq()
    Dim i&, lig&, tmp
    lig = 1: [b:c].Clear
    For i = 1 To Len([a1])
        If Len(Mid([a1], i, 5)) = 5 Then
            tmp = Split([a1], Mid([a1], i, 5))
            If UBound(tmp) > 1 Then
                If IsError(Application.Match(Mid([a1], i, 5), [b:b], 0)) Then
                    Cells(lig, 2) = Mid([a1], i, 5): Cells(lig, 3) = UBound(tmp)
                    lig = lig + 1
               End If
            End If
        End If
    Next
End Sub

 

[mapomme]

Bonjour à tous ,

Une version VBA pour compter les séquences de caractères de taille supérieures ou égales à 5 caractères.

Cette version est erronée donc on l'efface.

 

[mapomme]

Re,

Une version v2 :

• corrigée par rapport à la v1
• qui colore le texte des doublons pour mieux les repérer (limité à 15 doublons différents)

Le code est dans module1. Cliquer sur le bouton Hop!

nota : la recherche des doublons se fait depuis les chaines de caractères les plus longues jusqu'aux chaines de caractères les plus courtes (soit 5 caractères).

Quand une chaine doublon a été trouvée, on la retire du texte source pour les recherches suivantes.

Ainsi si la chaine "123soleil" est un doublon (x 2) et qu'ensuite on recherche la chaine "soleil", on ne recherchera pas "soleil" à nouveau dans les deux occurrences déjà trouvées "123soleil".
Autrement dit les chaines composants les chaines doublons déjà trouvées ne sont plus pris en compte par les recherches suivantes.

Ainsi pour la chaine 12345soleil---12345--12345soleil-12345toto, on trouvera d'abord le doublon 12345soleil- avec une fréquence de 2 et ensuite le doublon 12345 avec une fréquence de 2 aussi.
On ne trouvera pas 12345 avec une fréquence de 4.

Voir le fichier ICI .

 

[mapomme]

Re,

Dans le précédent message, ce n'était pas le bon classeur !

Voici la version v2a.

 

[finarobert]

Re,

Une version v2 :

• corrigée par rapport à la v1
• qui colore le texte des doublons pour mieux les repérer (limité à 15 doublons différents)

Le code est dans module1. Cliquer sur le bouton Hop!

nota : la recherche des doublons se fait depuis les chaines de caractères les plus longues jusqu'aux chaines de caractères les plus courtes (soit 5 caractères).

Quand une chaine doublon a été trouvée, on la retire du texte source pour les recherches suivantes.

Ainsi si la chaine "123soleil" est un doublon (x 2) et qu'ensuite on recherche la chaine "soleil", on ne recherchera pas "soleil" à nouveau dans les deux occurrences déjà trouvées "123soleil".
Autrement dit les chaines composants les chaines doublons déjà trouvées ne sont plus pris en compte par les recherches suivantes.

Ainsi pour la chaine 12345soleil---12345--12345soleil-12345toto, on trouvera d'abord le doublon 12345soleil- avec une fréquence de 2 et ensuite le doublon 12345 avec une fréquence de 2 aussi.
On ne trouvera pas 12345 avec une fréquence de 4.

Voir le fichier ICI .

MERCI MAPOMME. Coté coloriage ça ne marche pas (indice inexstant) mais l'affichage est bon
par contre je voudrai commencer l'affichage en C3 au lieu de C1 et je ne trouve pas
encore merci!

 

[mapomme]

Bonsoir @finarobert ,

Coté coloriage ça ne marche pas (indice inexistant) mais l'affichage est bon

Peux-tu joindre le fichier qui présente l'anomalie de coloriage ? Je suis intéressé.

je voudrai commencer l'affichage en C3 au lieu de C1

Je ferai les modifs dans le fichier que tu auras transmis . Mais je vais bientôt rejoindre les bras de Morphée. On verra ça demain.

 

[finarobert]

Bonsoir @finarobert ,

Peux-tu joindre le fichier qui présente l'anomalie de coloriage ? Je suis intéressé.


Je ferai les modifs dans le fichier que tu auras transmis . Mais je vais bientôt rejoindre les bras de Morphée. On verra

 

[finarobert]

J'ai tout fermé et c'est ok ensuite. Me reste deux points à vor : j'aimeraii que les résultats n'apparaissent pas sur la ligne 1 pour conserver le code original visible et question 2 : peut on modifier le programme pour que n'apparaisses les doublons que quand ils sont au moins 5 d'affilés sot pour l'exemple :
azertazertazertazertazertyhjuiknbbsdfgqsdfgqsdfgq dans ce cas on n'aurait que azert qui sort puisqu'auu moins 5 fois de suite d'affilé.
encore 1000 fois merci!

 

[mapomme]

j'aimeraii que les résultats n'apparaissent pas sur la ligne 1 pour conserver le code original visible et question 2 :

Les résultats sont affichés à partir de C3

que n'apparaisses les doublons que quand ils sont au moins 5 d'affilés

Les doublons ne seront comptés que si :

• la séquence comprend au moins 5 caractères
• la séquence apparait 5 fois ou plus (soit à la suite soit dispersée au sein du texte source)

Voir le fichier. Les modifications ont été faites rapidement. Vérifier si cela correspond à vos souhaits.

 

[finarobert]

Les résultats sont affichés à partir de C3

Les doublons ne seront comptés que si :

• la séquence comprend au moins 5 caractères
• la séquence apparait 5 fois ou plus (soit à la suite soit dispersée au sein du texte source)

Voir le fichier. Les modifications ont été faites rapidement. Vérifier si cela correspond à vos souhaits.

Merci pour votre travail rapide. J'ai testé vos propositions. Tout est OK mais l'exemple 12345soleil donne 0 alors que je pensais trouver 2 fois 12345soleil. J'ai essayé d'enlever les - mais cela fait pareil. y a t il possibilité de faire apparaitre que si au moins 5 fois à la suite en oubliant les dispersés? Après je ne vous embete plus!
mille fois merci!

 

[mapomme]

y a t il possibilité de faire apparaitre que si au moins 5 fois à la suite en oubliant les dispersés?

je pense que ça va demander une sérieuse adaptation. On verra tout ça demain. Maintenant dodo !
Bonne-nuit .