XL 2019 copie/coller

[frederio]

bonjour a tous
Tu vous connais comment faire ?
Si tu veux être d’accord avec moi ??? vous m’aidez a expliqué comme Excel Merci

Comment faire plus rapide

Sur la 1 ère feuille " CALENDRIER SAISON" copie =D4

Sur la 2 ère feuille "DERNIER RESULTS" coller =D3

 

[sylvanu]

Bonjour Frederio,
Un essai en PJ avec :

Sub MAJdates()
Application.ScreenUpdating = False
With Sheets("DERNIER RESULTS")
    DL = .Range("B65500").End(xlUp).Row
    f = "=SIERREUR(SI(B3<=17;RECHERCHEV(B3;'CALENDRIER SAISON'!$B$4:$D$20;3);RECHERCHEV(B3;'CALENDRIER SAISON'!$E$4:$G$20;3));"""")"
    .Range("D3:D" & DL).FormulaLocal = f
    .Range("D3:D" & DL) = .Range("D3:D" & DL).Value
End With
End Sub

Mai si la mise à jour doit être faite en permanence alors on peut le faire par formule avec en D3 :

=SIERREUR(SI(B3<=17;RECHERCHEV(B3;'CALENDRIER SAISON'!$B$4:$D$20;3);RECHERCHEV(B3;'CALENDRIER SAISON'!$E$4:$G$20;3));"")

 

[sylvanu]

Au cas où, voici le fichier avec uniquement les formules, sans VBA.