Ešte ma napadla jedna skratka, miesto výberu listu, kopírovanie, výberu iného listu a vloženia môžeš použiť skrátenú formu v podobe odkial.Copy kam
Takže miesto napr.
Sheets("Vloznoveho").Select
Cells(i, 1).Copy
Sheets("Vzor (2)").Select
Cells(2, 5).Select
ActiveSheet.Paste
môžeš použiť
Sheets("Vloznoveho").Cells(i, 1).Copy Sheets("Vzor (2)").Cells(2, 5)
Je to trocha elegantnejšie riešenie, ako šaškovať s označovaním a ručným kopírovaním