Filte date dans colonne avec calendrier excel

zeb -  
 zeb -
Bonjour,

avec votre aide j'ai réussi à créer un filtre sur des dates avec 2 calendriers d'excel,le probléme c'est qu'à partir du 13 du mois le filtre ne fonctionne plus

ci joint ma macro

merci pour votre aide

Private Sub Calendrier_fin_total_Click()
Sheets("fait").Select

Dim ddebuttotalfait As Date
Dim dfintotalfait As Date

ddebuttotalfait = Calendrier_debut_total.Value
dfintotalfait = Calendrier_fin_total.Value

ddebuttotalfait = Format(ddebuttotalfait, "mm/dd/yyyy")
dfintotalfait = Format(dfintotalfait, "mm/dd/yyyy")

Selection.AutoFilter Field:=1, Criteria1:=">=" & ddebuttotalfait, Criteria2:="<=" & dfintotalfait, Operator:=xlAnd

End Sub
Configuration: Windows Vista Internet Explorer 7.0

5 réponses

  1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Bonjour

    tu dis le 13 du mois?
    Ca ressemble à une inversion mm/dd/yyyy et dd/mm/yyyy

    si tu travailles sur un XL francais tes dates dans ta liste sont généralement au format jour/mos/année et ta macro les mets en mois:jour:année
    c'est juste une suggestion: regarde le format donné par défaut d'un calendrier MS
    0
    1. zeb
       
      j ai essaye ,mais rien à faire
      0
  2. gbinforme Messages postés 14930 Date d'inscription   Statut Contributeur Dernière intervention   4 744
     
    bonjour

    Pourquoi utilises-tu "mm/dd/yyyy" et non "dd/mm/yyyy" ?

    edit : bonjour Michel tu es premier !
    0
  3. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Et Bing, une bosse!
    bonjour, Gbinforme, ça va? ;-)
    0
  4. zeb
     
    avec votre aide j'ai réussi à créer un filtre sur des dates avec 2 calendriers d'excel,le probléme c'est qu'à partir du 13 du mois le filtre ne fonctionne plus

    j ai essayé aussi "dd/mm/yyyy" à la place "mm/dd/yyyy" mais rien

    ci joint ma macro

    merci pour votre aide

    Private Sub Calendrier_fin_total_Click()
    Sheets("fait").Select

    Dim ddebuttotalfait As Date
    Dim dfintotalfait As Date

    ddebuttotalfait = Calendrier_debut_total.Value
    dfintotalfait = Calendrier_fin_total.Value

    ddebuttotalfait = Format(ddebuttotalfait, "mm/dd/yyyy")
    dfintotalfait = Format(dfintotalfait, "mm/dd/yyyy")

    Selection.AutoFilter Field:=1, Criteria1:=">=" & ddebuttotalfait, Criteria2:="<=" & dfintotalfait, Operator:=xlAnd

    End Sub
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonsoir,

    Tu crois que faire des copier/coller de ta demande au lieu de répondre aux questions fera avancer la résolution ?
    Et faire des doublons non plus...
    http://www.commentcamarche.net/forum/affich 12894843 filtre date excel avec calendrier
    eric
    0
    1. zeb
       
      bonsoir

      je ne voulais pas faire de doublons ,mais je ne retrouver pas ma demande
      je viens de creer un raccourci

      merci
      0