Probleme Excel/VB

JCGL

XLDnaute Barbatruc

• 2 Septembre 2007

• #2

Re : Probleme Excel/VB

Bonjour à tous et
Bienvenue à Cremouenette 🙂

Avec le tri et les fonctions sous.total() et nb.si() cela devrait être possible.

Prends la bonne habitude de joindre un bout de fichier...

A+

 

Vote positif 0 Vote négatif

C

Catrice

XLDnaute Barbatruc

• 2 Septembre 2007

• #3

Re : Probleme Excel/VB

Bonjour,

Ci-joint un exemple macro et formule.
Je n'ai pas tenu compte de la colonnes des heures.
Peux-tu préciser ?

 

Pièces jointes

• Classeur1.xls

  23 KB · Affichages: 45
• Classeur1.xls

  23 KB · Affichages: 46
• Classeur1.xls

  23 KB · Affichages: 48

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 2 Septembre 2007

• #4

Re : Probleme Excel/VB

Bonjour à tous,

Un essai avec Filtre et NBVAL() et SOUS.TOTAL()

A+

Edition : Bonjour Catrice ;-)

 

Dernière édition: 10 Avril 2008

Vote positif 0 Vote négatif

C

Cremouenette

XLDnaute Nouveau

• 2 Septembre 2007

• #5

Re : Probleme Excel/VB

OUi!!!!!!!!!!!!!!!!!!!!

C etait la forume qui me manquait le nb.si (desfoi je me demande vraiment si j ai toute ma tete :lol🙂

merci!!

voila ce que donne ma formule finale :

=(NB.SI(C2:C16;1))/(NBVAL(C2:C16))*100


Je reste sur ce forum vu que je suis entrain de passer une certif excel expert 😉

 

Vote positif 0 Vote négatif

C

Catrice

XLDnaute Barbatruc

• 2 Septembre 2007

• #6

Re : Probleme Excel/VB

Cremouenette à dit:

OUi!!!!!!!!!!!!!!!!!!!!

C etait la forume qui me manquait le nb.si (desfoi je me demande vraiment si j ai toute ma tete :lol🙂

merci!!

voila ce que donne ma formule finale :

=(NB.SI(C2:C16;1))/(NBVAL(C2:C16))*100


Je reste sur ce forum vu que je suis entrain de passer une certif excel expert 😉

Cliquez pour agrandir...

Cette formule =NB.SI(C2:C16;1))/(NBVAL(C2:C16) suffit si tu appliques un format cellule % à ta cellule.
Cf. fichier que j'ai joint précédemment

 

Vote positif 0 Vote négatif

CB60

XLDnaute Barbatruc

• 2 Septembre 2007

• #7

Re : Probleme Excel/VB

Bonjour à tous
Pour avoir encore plus de choix avec sommeprod😉

40,00%=SOMMEPROD((Code=1)*Code)/NBVAL(Code)

avec une zone nommée " code"

Code=DECALER(Feuil1!$B$2;;;NBVAL(Feuil1!$B:$B)-1)


Edit avec un petit fichier qui permet de choisir l'heure de début et l'heure de fin dans sommeprod

 

Pièces jointes

• Essai_Cremou avec choix colonne A.zip

  5.4 KB · Affichages: 13

Dernière édition: 2 Septembre 2007

Vote positif 0 Vote négatif

jeanpierre

Nous a quitté

Repose en paix

• 2 Septembre 2007

• #8

Re : Probleme Excel/VB

Bonjour à tous,

Sur le sujet depuis plus d'une demi-heure, je tentais d'écrire une macro qui avait plus de 10 lignes....

Lorsque je vois la réponse de Catrice, en une ligne.... Chapeau... Elle répond bien à la question.... qui est : "En faite mon bosse voudrait pouvoir selectionner la plage désiré, cliker sur un bouton, et que lui donne le pourcentage de 1 sur sa selection!"

Ce que ne font pas, désolé les amis, les solutions de JCGL et CB60....

Bon dimanche à toutes et tous,

Jean-Pierre

 

Vote positif 0 Vote négatif

C

Cremouenette

XLDnaute Nouveau

• 2 Septembre 2007

• #9

Re : Probleme Excel/VB

Voila comment j ai fait,

J ai mis ds mon fichier excel cette formule :
=(NB.SI(lala;1))/(NBVAL(lala))

et j ai mis un bouton renvoyant a cette formule

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 02/09/2007 par CREMOUENETTE
'

ActiveWorkbook.Names("lala").Delete

ActiveWorkbook.Names.Add Name:="lala", RefersToR1C1:=Selection
MsgBox ("a Qui dois je envoyer la facture?")
End Sub


Ainsi ca marche :d

 

Vote positif 0 Vote négatif

C

Cremouenette

XLDnaute Nouveau

• 2 Septembre 2007

• #10

Re : Probleme Excel/VB

Catrice, je n avais pas vu ton fichier, et effectivement c est excellent 😉*

merci a vous tous!

 

Vote positif 0 Vote négatif

CB60

XLDnaute Barbatruc

• 2 Septembre 2007

• #11

Re : Probleme Excel/VB

Re
Et si Jean pierre avec le sommeprod qui permet de faire le choix de l'heure de départ et de fin

Cela n'enléve rien à la qualité de réponse de Catrice

Et en plus je pense que mon résultat est faux car je reprend l'ensemble des données (/NBVAL(Code))

la formule qui me semble plus cohérante
=SOMMEPROD((heures>=D10)*(heures<=E10)*(Code=1)*Code)/SOMMEPROD((heures>=D10)*(heures<=E10))

 

Dernière édition: 2 Septembre 2007

Vote positif 0 Vote négatif

jeanpierre

Nous a quitté

Repose en paix

• 2 Septembre 2007

• #12

Re : Probleme Excel/VB

Re tous, Bruno,

Désolé, je n'avais pas ta réédition et le fichier joint.....

Ceci dit, n'ayant que peu d'éléments.... Si les heures, tous les jours sont les mêmes (cas rencontrés sur des imports de données), cela risque d'être périlleux...

Bon dimanche

Jean-Pierre

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 2 Septembre 2007

• #13

Re : Probleme Excel/VB

Re,
Salut Bruno🙂,
Salut JP🙂,

JP : encore une fois nous avons, et j'inclus les copains, fait sans fichier joint...

Mais si nous avons répondu à l'attente de Cremouenette, ou lui avoir donné des pistes : tant mieux.

Je me répète mais "Merci de joindre un bout de fichier..."

Bravo à ceux qui ont proposé "dans le vague"

A+

 

Vote positif 0 Vote négatif

jeanpierre

Nous a quitté

Repose en paix

• 2 Septembre 2007

• #14

Re : Probleme Excel/VB

Re Jean-Claude,

En première lecture, j'étais parti sur un SommeProd, je n'avais même pas pensé au filtre....

Et, pour le reste, nous sommes d'accord : "Ceci dit, n'ayant que peu d'éléments"

Souvent, j'occulte un mot ou plusieurs, en lecture rapide, diagonale) ce qui fait que je peux être à côté.... Pour une fois que j'ai bien lu....

Ce n'était pas une critique, mais mon sentiment de l'instant, d'autant qu'il semblait bien que l'exemple de Catrice était passé aux oubliettes au vu des réponses de Cremouenette....... Cela n'enlève en rien à vos propositions qui resteront, de toutes façon, sans doute bien employées par ailleurs..

Par ailleurs, si j'ai nommé JCGL et CB60 sur le post (plutôt que Jean-Claude et Bruno), c'est que notre amie est toute nouvelle et que je ne voulais pas lui laissé penser que je m'étais planté de fil...

Je ne peux envoyer de Soleil, y'en à pas...

Mes amitiés à foison et bon dimanche.

Jean-Pierre

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 2 Septembre 2007

• #15

Re : Probleme Excel/VB

Re,

Mon bon ami Jean-Pierre ou JP ou jeanpierre, je n'ai jamais pensé à une critique négative (car une critique peut être positive). Je souhaitais juste faire remarquer que de plus en plus souvent, nous "travaillons" à l'aveugle, à l'intuition...

Euh, pour le soleil, tu en veux combien ???

A+ mon bon JP 🙂

Bonne journée à tous

 

Vote positif 0 Vote négatif