Copier selon la date du jour

Bonjour,

Je vous sollicite encore une fois pour un problème qui est le suivant:

J'aimerais copier chaque jour la recette, les dépenses et le total correspond dans une feuille recap "Mois"à partir d'une autre feuille "Listing".

Mais je pense qu'un fichier exemple mieux qu'un long discours.

Merci infiniment et par avance pour votre aide si précieuse.

8exemple.xlsm (13.88 Ko)

bonjour

ta feuille listing n'est pas un "listing" juste quelques cellules de saisie

la feuille Mois n'est pas une feuille par mois, mais une liste des jours avec les valeurs.

mon conseil : faire la saisie de ces quelques informations directement dans la feuille Mois

de même si tu saisi 20 recettes et 50 dépenses par jour, il suffit de saisir toutes ces 70 lignes dans ta feuille Mois

ensuite tu feras des TCD pour avoir des récap par jour, mois etc.

Merci jmd pour ta réponse.

Au fait les cellules (recettes, dépenses )de la feuille "Listing" sont déjà le total de plusieurs lignes de recette et dépense.

Je voudrai donc que ce total journalier par poste soit reporté sur une feuille de récapitulation "Mois".

Merci pour votre aide

Re bonsoir

La remarque de jmd n’était pas une solution mais juste un point de vue.

J'attend toujours l'aide de la communauté pour mon problème.

je rejoins le fichier exemple.

Bien cordialement

14exemple.xlsm (13.88 Ko)

Bonsoir

apres recherche voici une macro qui pourra aider eventuellement d'autres personnes

Sub Maj()

Dim i As Integer
Sheets("Listing").Select
    Range("H2").Select
    Selection.Copy
    Sheets("Mois").Select
    i = Application.WorksheetFunction.Match(Sheets("Listing").Range("D2"), Sheets("Mois").Range("D:D"), 0)
    Range("D" & i).Offset(0, 1).Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
        ActiveCell.Select
    Application.CutCopyMode = False

End Sub

Cordialement

Rechercher des sujets similaires à "copier date jour"