MERCI BEAUCOUP A VOUS TOUS,
BugBunny, avec ton nom, tu m'as bien aidé : en plus, je viens d'apprendre à définir correctement mes variables avec "Option Explicit" (pour ceux qui ne connaissent pas, rdv sur <A HREF=http://www.excel-downloads.com/html/French/forum/messages/1_48849_48830.htm>ancien post</A>
et enfin tu m'as corrigé ma façon d'écrire qui était archaïque (je n'avais pas compris la suppression de la sélection de la feuille COMBINEE à la ligne suivante)
ex: dern_val = Sheets("data").Range("D3").End(xlDown)
bonne nuit à tous !
Papa6