XL 2016 Trouver toutes les probabilités possible des mots en doublons dans une série de phrases

C

cd95

XLDnaute Occasionnel

• 27 Avril 2020

• #2

Bonjour,

Quelqu'un peut-il rajouter SVP un bout de code pour l'une des solutions inclues dans ce fichier pour avoir le résultat demandé dans l'onglet "Détail N°2".

En fait je cherche d’aller plus loin avec ce fichier en conservant la même idée et le même fonctionnement du code mais rajouter une variable qui permet de faire une boucle sur tous les mots de la chaîne pour s'attaquer au deuxième mot de la phrase en ignorant le premier et ainsi de suite jusqu'à arriver aux 2 derniers mots de la chaîne comme l’illustre l’exemple de l’onglet « Détail N°2 » dans le fichier ci-joint.

 

Pièces jointes

• Décomposer une chaîne V1.1 .xlsm

  42.5 KB · Affichages: 6

Dernière édition: 27 Avril 2020

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 27 Avril 2020

• #3

Bonjour,

ma version.
Je ne fais pas comme toi, beaucoup plus simple. 3 boucles sans dico...
Du coup ce n'est plus dans le même ordre, ça ne devrait pas être gênant je pense.
Comme j'ai vu que tu savais faire pour les couleurs j'ai juste mis une MFC.
Regarde si ça te va
eric

 

Pièces jointes

• Les probabilités des mots en doublons.xlsm

  31.3 KB · Affichages: 6

Dernière édition: 27 Avril 2020

Vote positif 0 Vote négatif

Solution

C

cd95

XLDnaute Occasionnel

• 28 Avril 2020

• #4

Bonjour,

Merci beaucoup pour ta réponse effectivement l’ordre ce n’est pas trop gênant mais je suis en train de trouver une solution pour qu’il ne met pas chaque fois la phrase entière comme doublon alors qu’elle ne l’ait pas (quand je supprime les points de terminaison) et aussi je suis en train de trouver une solution à la lenteur étrange car j’ai une liste qui fait 6500 lignes. Sinon ta solution et l’idée sont bonnes et encore merci beaucoup.

 

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 28 Avril 2020

• #5

Bonjour,

Rien de tout ça dans ma proposition.
Mais continue sur la tienne si tu préfères.
eric

 

Vote positif 0 Vote négatif

C

cd95

XLDnaute Occasionnel

• 28 Avril 2020

• #6

Re,

En fait je suis en train d’utiliser ton code juste j’ai désactivé « [E2].Resize(nb).FormulaR1C1 = "=COUNTIF(R1C3:RC[-1],RC[-1])" » et la remplacer par une autre procédure. Et encore mille mercis à toi Eric

 

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 28 Avril 2020

• #7

Et c'est sur la mienne que tu as eu des lenteurs ?

 

Vote positif 0 Vote négatif

C

cd95

XLDnaute Occasionnel

• 28 Avril 2020

• #8

En fait il fonctionne à merveille suaf que [E2].Resize(nb).FormulaR1C1 = "=COUNTIF(R1C3:RC[-1],RC[-1])" ralenti un peu l'exécution (les 6500 lignes de ma liste se dispatchent dans 1008357 lignes après l'exécution de la macro donc c'est un peu normal que ça ralentit un peu). Vraiment merci à toi (une épine en moins)

 

Dernière édition: 28 Avril 2020

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 28 Avril 2020

• #9

Ah quand même...
Oui, tu as intérêt à compter les occurrences de tmp2 dans un dico partout où je l'inscris dans Result.
J'avais mis 3 colonnes dans cet optique que j'ai abandonnée en cours de route

 

Vote positif 0 Vote négatif