Työkirjasta paivystykset.xlsm pitäisi kopioida tyoajanseuranta.xlsm sarake- ja rivinumeroilla tai vaihtoehtoisesti soluissa määritetty alue työkirjaan tyoajanseuranta.xlsm
Tässä nauhoitettu makro toimenpiteestä. Range("XY10:ZC10") pitäisi korvata dynaamisesti tyoajanseuranta.xlsm työkirjassa olevien solujen tiedoilla
Sub tietojen_kopiointi_toiseen_tyokirjaan() ' ' tietojen_kopiointi_toiseen_tyokirjaan Makro ' ' Windows("paivystykset.xlsm").Activate Range("XY10:ZC10").Select Selection.Copy Windows("tyoajanseuranta.xlsm").Activate Range("H15").Select Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True Range("I15").Select End Sub
Linkki "selventävään" kuvaan asiasta
Mod. lisäsi kooditagit!
Aihe on jo aika vanha, joten et voi enää vastata siihen.