XL 2016 VBA : rechercher la même donnée dans des colonnes de feuilles différentes

Option Explicit : oblige le programmeur à déclarer les variables.

Sub Essai() .. End Sub : c'est la macro Essai().

If ActiveSheet.Name <> "TABLEAU ACOMPTE" Then Exit Sub : on doit être sur la feuille "TABLEAU ACOMPTE", sinon on quitte la sub sans rien faire.

Dim n& : idem que Dim n As Long : déclaration d'une variable n, de type Long.

n = Cells(Rows.Count, 5).End(3).Row : idem que : n = Cells(Rows.Count, "E").End(xlUp).Row : n = n° de la dernière ligne utilisée, selon la colonne E.

If n = 1 Then Exit Sub : on quitte la sub si n = 1 ; car E1 est pour l'en-tête de colonne "Col E" ; les données numériques 1 à 4 sont en dessous, à partir de E2.

Dim cel As Range, i& : déclaration de deux autres variables ; pour i, dans mon fichier précédent, j'avais oublié le caractère « & » ; donc au lieu d'être de type Long, i était déclaré sans type, donc c'est par défaut du type Variant ; j'ai édité mon post #4 pour mettre la version corrigée du fichier précédent, et j'ai aussi mis à jour le code VBA indiqué dans le post.

Application.ScreenUpdating = 0 : désactivation de la mise à jour de l'écran ➯ l'exécution de la sub est plus rapide.

For i = 2 To n .. Next i : boucle sur les lignes 2 à n ; ici 2 à 5.

With Cells(i, 5) .. End With : avec la cellule de la ligne n° i, colonne E ; donc au départ, c'est avec E2.
​

Set cel = _
  Worksheets("SYNTHESE PRR").Columns(5).Find(.Value, , -4163, 1, 1)

en colonne E de la feuille "SYNTHESE PRR", on cherche .Value qui est la valeur de la cellule du With ; donc au départ, c'est le chiffre de E2 : 1.

If Not cel Is Nothing Then .Offset(, 1) = Date : si on a trouvé la valeur cherchée, alors on écrit la date 1 colonne à droite de la cellule du With, donc en colonne F (sur la même ligne que la valeur lue) ; exemple : pour 1 qui est lu en E2, on écrit donc la date du jour en F2.​

bien sûr, si dans ton vrai fichier le nom des 2 feuilles est différent, ça sera à changer dans la sub ; j'espère qu'avec tous ces commentaires tu arriveras à adapter mon code VBA à ton fichier réel, sinon, n'hésite pas à demander des infos supplémentaires. 😉​