Salut Domdom, mutzik,
Vérifie la syntaxe y doit manquer un espace.
Tu peux aussi remplacer le nom de la feuille par son nom. Je m'explique:
Sheets('Tirage Final').Range('B2') par Feuilx.Range('B2') ou x est le n° de la feuille (regarde les propriétés).
Bon courage