Kód: Vybrat vše
wsSkupiny.Range("A1:C2").Copy wsSestava.Range("A1:C2")
Tento kod z listu Skupiny kopíruje obsah buněk na list Sestava, a to funguje.
Kód: Vybrat vše
wsSkupiny.Range(Cells(1, 1), Cells(3, 2)).Copy wsSestava.Range(Cells(1, 1), Cells(3, 2))
Jenže tento kod s použitím Cells dává tuto chybu:
Run-time error '1004ˇ:
Method 'Range' of object '_Worksheet' failed.
Víte někdo jak to kopírování rozchodit přes Cells?