
ako skopirovat viac (dva) harkov do ineho zosita VBA ?
mam makro, ktore mi asi zo 4 harkov spracuje udaje, a zapisujem ich do samostatneho harka, ten si potom ulozim na disk ako samostatny zosit. Problem je, ze teraz sa ma ukladat k tomu jedenmu harku este jeden, tiez sa bude vyrabat tym makrom, teda novo ulozeny zosit by mal mat dva harky. Ten jeden ukladam nejak takto
Sheets("vzor").Activate
ActiveSheet.Copy
ActiveWorkbook.SaveAs filename:=Left(xls_hotovo, Len(xls_hotovo) - 4), FileFormat:=xlXMLSpreadsheet, ReadOnlyRecommended:=False, CreateBackup:=False
Ako to co najjednoduchsie spravit?
To, co si uviedol, je riadny chaos, ale aj popis problemu je nezrozumitelny...
Ak som dobre pochopil, odporucam mat vytvoreny nejaky pevny vysledkovy zosit (= subor), ktory bude mat dva harky a zdrojove subory nie "ulozit ako" (= save as) ale kopirovat vysledkove harky zdrojovych suborov do prislusnych harkov vysledkoveho suboru.
Len tak mimochodom, da sa to riesit aj jednoduchymi odkazmi na bunky zdrojovych harkov, t.j. bez makier, ale potom samozrejme ostanu zosity previazane...