Trouvez le mot qui est le plus répété dans un fichier
Fermé
lamuz85
Messages postés
21
Date d'inscription
samedi 20 août 2011
Statut
Membre
Dernière intervention
21 août 2013
-
20 août 2013 à 16:30
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 - 21 août 2013 à 22:15
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 - 21 août 2013 à 22:15
A voir également:
- Trouvez le mot qui est le plus répété dans un fichier
- Fichier rar - Guide
- Fichier host - Guide
- Cette action ne peut pas être réalisée car le fichier est ouvert dans system - Guide
- Fichier iso - Guide
- Comment réduire la taille d'un fichier - Guide
5 réponses
via55
Messages postés
14403
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
24 avril 2024
2 703
20 août 2013 à 18:10
20 août 2013 à 18:10
Bonjour
une piste, en rajoutant une colonne
https://www.cjoint.com/?0Husktk6ECB
Cdlmnt
une piste, en rajoutant une colonne
https://www.cjoint.com/?0Husktk6ECB
Cdlmnt
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 776
20 août 2013 à 19:02
20 août 2013 à 19:02
Bonjour,
Tu peux essayer en matriciel :
=INDEX(A1:A18;MODE(SI(ESTNA(EQUIV(A1:A18;A1:A18;0));LIGNE(A1:A18);EQUIV(A1:A18;A1:A18;0))))
à valider par Maj+Ctrl+Entrée
Tu peux essayer en matriciel :
=INDEX(A1:A18;MODE(SI(ESTNA(EQUIV(A1:A18;A1:A18;0));LIGNE(A1:A18);EQUIV(A1:A18;A1:A18;0))))
à valider par Maj+Ctrl+Entrée
Bonjour
avec une macro
deja faire le tri des noms
Sub ComptDoublon()
Range("C2:D" & Rows.Count).ClearContents
I = 1
For L = 2 To Range("A" & Rows.Count).End(xlUp).Row
Temp = Range("A" & L)
If Temp <> Range("A" & L - 1) Then
I = I + 1
Range("A" & L).Copy
Range("C" & I).PasteSpecial xlPasteValues
End If
If Range("A" & L) = Temp Then
Range("D" & I).Value = Range("D" & I).Value + 1
End If
Next
End Sub
A+
Maurice
avec une macro
deja faire le tri des noms
Sub ComptDoublon()
Range("C2:D" & Rows.Count).ClearContents
I = 1
For L = 2 To Range("A" & Rows.Count).End(xlUp).Row
Temp = Range("A" & L)
If Temp <> Range("A" & L - 1) Then
I = I + 1
Range("A" & L).Copy
Range("C" & I).PasteSpecial xlPasteValues
End If
If Range("A" & L) = Temp Then
Range("D" & I).Value = Range("D" & I).Value + 1
End If
Next
End Sub
A+
Maurice
lamuz85
Messages postés
21
Date d'inscription
samedi 20 août 2011
Statut
Membre
Dernière intervention
21 août 2013
21 août 2013 à 09:17
21 août 2013 à 09:17
Merci pour vos réponses:
via55 ta solution est elle vraiment possible dans le cas ou j'ai un tableau qui va de la colonne A à la colonne J?Avec 200 lignes et des mots et des vides partout?
*Edit je viens de tester c'est OK
Patrice33740
Merci pour ta formule mais celle-ci me met une erreur: #VALEUR
foo
Merci pour ta macro qui est sympa aussi.
Je vais mettre tout ça en application avec l'utilisateur.
via55 ta solution est elle vraiment possible dans le cas ou j'ai un tableau qui va de la colonne A à la colonne J?Avec 200 lignes et des mots et des vides partout?
*Edit je viens de tester c'est OK
Patrice33740
Merci pour ta formule mais celle-ci me met une erreur: #VALEUR
foo
Merci pour ta macro qui est sympa aussi.
Je vais mettre tout ça en application avec l'utilisateur.
via55
Messages postés
14403
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
24 avril 2024
2 703
21 août 2013 à 14:09
21 août 2013 à 14:09
Tu ne parlais que d'une colonne de données au départ !
Le nombre de ligne n'a pas d'importance mais si les données sont sur plusieurs colonnes mieux vaut utiliser la macro
Le nombre de ligne n'a pas d'importance mais si les données sont sur plusieurs colonnes mieux vaut utiliser la macro
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 776
21 août 2013 à 22:15
21 août 2013 à 22:15
Exemple :
https://www.cjoint.com/c/CHvwpcZ4ooy
https://www.cjoint.com/c/CHvwpcZ4ooy