Exraction de ligne en colonne
Résolu
jack2125
Messages postés
486
Date d'inscription
Statut
Membre
Dernière intervention
-
jack2125 Messages postés 486 Date d'inscription Statut Membre Dernière intervention -
jack2125 Messages postés 486 Date d'inscription Statut Membre Dernière intervention -
https://www.cjoint.com/c/LExqJ0x6IVMnjour a tous
les instructions sont dans le tableau joint
https://www.cjoint.com/c/LExqJ0x6IVM
c'est assez compliqué a expliquer sans le tableau
--
vous êtes super!
merci à tous
les instructions sont dans le tableau joint
https://www.cjoint.com/c/LExqJ0x6IVM
c'est assez compliqué a expliquer sans le tableau
--
vous êtes super!
merci à tous
10 réponses
-
Bonjour
Même avec le tableau, ça reste extrêmement compliqué à comprendre ...
"C4:Q4 représente le nombre de fois que la ligne supérieure est égale en quantité exemple pour 1 c'est 7 fois pour 6 c'est 3 fois" : ça veut dire quoi ?
-
bonjour Raymond
comment ca les Antilles..
le nombre 1 est présent 7 fois
le nombre 6 est présent 3 fois
est ce plus compréhensible?
au plaisir de te lire
-
Bonsoir
Coucou Raymond , je crois avoir compris le n° 1 est sorti 7 fois, le 2 est sorti 9 fois etc (données rentrées par l'utilisateur qui veut ensuite ressortir tous les n°s sortis 7 fois etc )
Jack, voir si cela te convient, en passant par un tableau intermédiaire en colonne R et suivantes qui peuvent être masquées au besoin :
https://www.cjoint.com/c/LExupeFSZTe
Cdlmnt
Via
-
-
je n avais pas vu a ca beugue a un certain niveau
j ai reporté exactement a l'identique du tableau que j'utilise et a un moment ca ne compte plus
peux tu me dire l(erreur
merci
https://www.cjoint.com/c/LEyjwLjFMBM
-
-
Curieux ! Moi, en ligne 3 j'ai compté 8 fois le chiffre 1, et une seule fois le chiffre 6 ...
-
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
Bonjour Raymond
Comment compte-tu ? Mes NB.SI en ligne 12 donnent bien les bons comptes
-
Bonjour à tous
Un essai avec macro
https://www.cjoint.com/c/LEymIgXVeAB
Cdlmnt
Attention. Lien modifié-
bonsoir j'ai trouvé ta macro bien tard...
je l'ai adapté a mon fichier qui est en
BN122:CB130
et ma macro provoque une ligne ininterrompue en ligne 131 a gauche
c'est quoi mon erreur?
encore merci bcp
Public Sub ok()
Dim plage As Range, cel As Range
Dim k As Long, i As Long, nmax
Dim dico As Object, cle, valeur, cles, valeurs, nbcles, TA
' def plage
Set plage = Union(Range("bn123:cb123"), Range("bn125:cb126"), Range("bn127:cb127"), Range("bn129:cb129"))
' nb max apparitions
nmax = Application.WorksheetFunction.Max(plage)
' nb apparitions - liste numéros
Set dico = CreateObject("scripting.dictionary")
For k = 0 To nmax
dico.Add k, ""
For Each cel In plage
If cel.Value = k Then dico(k) = dico(k) & ";" & cel.Offset(-1, 0)
Next cel
Next k
nbcles = dico.Count
cles = dico.keys
valeurs = dico.items
Application.ScreenUpdating = False
' affichage
For k = 0 To nmax
Range("ca131").Offset(0, -k).Value = cles(k)
valeur = valeurs(k)
If valeur = "" Then
Range("ca131").Offset(1, -k).Value = ""
Else
valeur = Right(valeur, Len(valeur) - 1)
TA = Split(valeur, ";")
Range("ca131").Offset(1, -k) = UBound(TA) + 1
Range("ca131").Offset(2, -k).Resize(1 + UBound(TA)) = Application.Transpose(TA)
End If
Next k
End Sub
-
-
Non tu n'as pas reporté à l'identique dans ta feuille 2 à laquelle je ne comprends d'ailleurs rien car elle comporte plusieurs tableaux mais aucun ne comporte les colonne rajoutées et les formules de mon exemple
C'est un fouillis cette feuille 2! , épure là ou reporte ton tableau utile dans une autre feuille pour un travail efficace
par contre s'il existait un algo pourquoi pas qu'appelle-tu un algo ? un algorithme ? que recouvre ce terme pour toi car dans excel on va trouver des fonctions, des formules, des macros...
-
Bonjour le fil,
Salut Via, sans vouloir marcher sur tes plates-bandes, je pense que le demandeur jack2125 a relancer la suite de cette discussion sur le lien ci-dessous
https://forums.commentcamarche.net/forum/affich-37601974-qui-peut-m-expliquer-pourquoi-le-calcul-ne-s-effectue-pas#p37602171
Cordialement-
Merci Mike, je n'avais pas vu et pas de souci pour les plates-bandes
Mais bon le demandeur est un peu inconséquent, il demande une macro alors que CCM81 lui en avait proposé une !
Cdlmnt- Désolé jack mon intention n'était pas de te rabaisser, je trouvais simplement bizarre que tu ne lises pas toutes les réponses qu'on te donnait et que tu partais sur une autre discussion pour le même sujet, inconséquent n'est peut être pas le mot juste !
Je t'ai renvoyé sur l'autre fil ton fichier corrigé avec les explications pourquoi cela ne fonctionnait pas
quand à la macro de CCM81 elle est ici plus haut au post 8
Cdlmnt
Via
-
-
pourquoi a 85% tout marche et les 15% ne fonctionnent pas
j y passe des plombes a essayer de comprendre mais ne trouve aucune explication...
j'ai essayer de changer le format des cellules qui ne fonctionnent pas, de les écrire manuellement, de les croiser ....rien n'y fait
je ne vois aucune raison plausible qui provoque le non fonctionnement
je suis sans doute bête!
-
Re,
Regarde plus haut post 8
