Excel:comparateur de date

Résolu
marrrrrr -  
 ionesco -
Bonjour,

Une fois encore je vous appel a laide. Dans la premiere colonne de ma sheet3 jai une serie de date. La premiere est saisie automatiquement, la suivante correspond au lendemain et ainsi de suite jour apres jour. J'ai donc dans les cellules la formule suivante:
A4=DATE(YEAR(Results!$A3),MONTH(Results!$A3),DAY(Results!$A3)+1)

jusque la tout va bien, le probleme est que je veux que date saffiche seulement si cette date est presente sur ma sheet 1 qui contient des listes de date toutes les deux colonnes... le tout si possible sans macro... J'ai bien teste des vlookup et des match mais je naboutie pas...

Merci de votre aide

cordialement

2 réponses

  1. marrrrrr
     
    c'est bon jai trouve:

    =IF(IF(ISNA(VLOOKUP(DATE(YEAR(Results!$A3),MONTH(Results!$A3),DAY(Results!$A3)+1),datearea,2,FALSE)),"not KNOW",VLOOKUP(DATE(YEAR(Results!$A3),MONTH(Results!$A3),DAY(Results!$A3)+1),datearea,2,FALSE))<>"not KNOW",DATE(YEAR(Results!$A3),MONTH(Results!$A3),DAY((Results!$A3)+1)),IF(IF(ISNA(VLOOKUP(DATE(YEAR(Results!$A3),MONTH(Results!$A3),DAY((Results!$A3)+2)),datearea,2,FALSE)),"not KNOW",VLOOKUP(DATE(YEAR(Results!$A3),MONTH(Results!$A3),DAY(Results!$A3)+2),datearea,2,FALSE))<>"not KNOW",DATE(YEAR(Results!$A3),MONTH(Results!$A3),DAY((Results!$A3)+2)),DATE(YEAR(Results!$A3),MONTH(Results!$A3),DAY((Results!$A3)+3))))
    0
    1. marrrrrr
       
      en fait ca ne marche pas, le vlookup ne look que la premiere colonne de ma plage datearea
      0
  2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

    Tu devrais déposer un classeur exemple sur cijoint.fr et coller ici le lien fourni.

    Tu peux peut-être utiliser nb.si()
    =Si(NB.SI(A1:C17;ta_date)>0;...;...)
    à condition qu'il n'y ait pas de valeur pouvant être des dates correctes entre tes colonnes.

    Sinon, en A4 tu peux mettre: =Results!$A3+1 , restons simples.... ;-)

    eric
    0
    1. ionesco
       
      jai finalememt fait une macro
      Sub move_date1()

      Dim i As Integer
      Dim n As Integer
      Dim first_date As Date
      Dim r As Integer

      Worksheets("Inputs").Select

      first_date = Cells(4, 3)

      i = 5
      n = 1
      r = 1

      Worksheets("Results").Select

      Cells(3, 1) = first_date

      While first_date <= Date

      Worksheets("Data").Select

      While first_date > Cells(3, n)

      n = n + 2

      Wend


      While Cells(i, n) <> "" And Cells(i, n) < first_date

      i = i + 1

      Wend

      While Cells(i + 1, n) <> ""

      first_date = Cells(i + 1, n)

      Worksheets("results").Select
      Cells(r + 3, 1) = first_date
      Worksheets("data").Select
      r = r + 1
      i = i + 1
      Wend

      i = 5
      n = n + 2


      Wend

      End Sub


      merci quand meme

      crdlt
      0