afficher selon critères dates

[véro]

Bonjour à tous,
Un grand merci à ce forum qui m'a déjà permis de trouver des formules et macros très pratiques. Voici mon problème :
J'ai une feuille Source et une feuille Cible avec des données à reporter de l’une vers l’autre. J'essaie de reporter les noms de contrats de la colonne «A» de la Feuil1 vers les colonnes 'A','B',etc de la Feuil2.
En feuil1, j'ai les noms de contrats (colonne A) et leur date d'échéance en colonne B. En feuil2, je souhaite avoir la liste des contrats en colonne A,B,C selon le mois de la date d'échéance. (j'essaie de créer un échéancier de contrats).
J'ai essayé une fonction SI et une fonction index (dans fichier joint) mais j'ai des lignes vides et je me demandais si vous ne connaîtriez pas une formule (voire une macro) qui n'affiche pas de ligne vide entre les valeurs reportées.

Un grand merci d'avance pour vos réponses! [file name=critdates.zip size=3646]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/critdates.zip[/file]

 

[JYLL]

Bonjour Véro,
Si j'ai bien compris ton prpblème , j'ai fait une macro automatique qui devrait répondre à ton besoin. Je'ai mis le résultat sur la feuil3

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 22/04/2006 par Utilisateur
'

'
    Range('A1:B31').Select
    Selection.Copy
    Sheets('Feuil3').Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    Selection.Sort Key1:=Range('B2'), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

Bon test
Amicalement
Jean-Yves [file name=critdates_20060422121229.zip size=8314]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/critdates_20060422121229.zip[/file]

 

[Monique]

Bonjour,

Avec formule, cette fois

Petite.Valeur(si(etc et non Min(Si
pour avoir toutes les dates, même les doublons
Plages nommées ou non
Avec les plages nommées, la vitesse de recalcul est plus rapide et la formule bien plus courte

=INDEX(ColNom;PETITE.VALEUR(SI(DATE(ANNEE(Ech);MOIS(Ech);1)=J$2;LIGNE(Nom));LIGNES(J$3:J3)))
Avec, en plus :
soit une condition sur le nb de dates
soit un format conditionnel

Dans le fichier, tu as les étapes de construction de la formule [file name=CritDateVero.zip size=6306]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CritDateVero.zip[/file]

 

[pierrejean]

bonjour vèro

salut JYLL

mes hommages Monique

ma version par macro ( lors de l'activation de la feuille 2) [file name=critdates_20060422131732.zip size=10442]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/critdates_20060422131732.zip[/file]

 

[vero]

Merci et encore merci à vous 3!!

Merci de m'avoir répondu aussi vite et merci pour vos propositions. C'est exactement ce dont j'avais besoin!! Vous m'impressionnez vraiment.

Et merci car grâce à vous je passerai un bon week-end.
En espérant que je pourrai moi aussi aider d'autre personne.
Merci