il y a quelques temps j'ai eu cette macro qui marche trés bien qui te localise la 1er ligne libre aprés la derniére cellule occupée sur une ligne
si tu préféres si A15 est vide (OU occupé) et une cellule sur la 15eme ligne est occupée, le curseur va se mette sur A16
Range('A' & Mid(ActiveSheet.UsedRange.Address, InStrRev(ActiveSheet.UsedRange.Address, '$') + 1)).Offset(1, 0).Select
si ça peux t'aider et aprés tu fais 'coller' ton tableau 2
amicalement
chantal