Pb recherche

[Anthony]

Bonjour,

J'ai crée une base de donnée, avec les colonnes n°horodateur, Date, montant recette. Sur une 2éme feuille, j'aimerai afficher en selectionnant le jour, la recette total de tout les horodateurs collecté ce jour.

Le top du top,c qu' il faudrai quand selectionnant la date apparaissent les horodateur collecté dans une colonne, puis le montant dans une autre et que la recette total du jour ce calcule en bas de la colonne montant reccette.

Merci pour votre aide

 

[vincent]

Salut,
Voila une macro qui devrais faire l'affaire (un peu de mise en page reste a faire modifie les colonnes ou rangs en fonction des besoins)


Sub recette()
rang = 1
Sheets(2).Range("a:a").ClearContents
With Sheets(1)
For i = 1 To .Range("a1").End(xlDown).Row
If Format(.Cells(i, 2), "dd/mm/yy") = Format(Sheets(2).Cells(2, 5), "dd/mm/yy") Then
Sheets(2).Cells(rang, 1) = .Cells(i, 3)
somme = somme + .Cells(i, 3)
rang = rang + 1
End If
Next
Sheets(2).Cells(rang, 1) = somme
End With
End Sub

Ensuite creer un bouton pour execute la macro ou colle dans la feuille de calcul ceci :

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = Range("e2").Address Then recette
End Sub

si tu as des questions demande.

 

[Monique]

Bonjour,

Avec formules, maintenant

 

[vincent]

desole je ne sais pas faire uniquement avec des formules excel.

 

[Monique]

Et je ne sais pas faire la moitié d'un quart de macro

 

[vincent]

ok pas grave je fais ma petite sauce et je te renvois le fichier complet

 

[vincent]

Voila rentre la date en e2 et le calcul se lance tout seul.

Si probleme je reste dans les parages.

 

[Monique]

Merci, Vincent,

aucun problème, ça marche tout seul

 

[vincent]

De rien.