Přenos dat mezi sešity Excel - dodací listy

[d1amond]

Zdravím,
programátor ve VB nejsem, to říkám rovnou. Proto se obracím na zkušenější. Už delší dobu si pohrávám s myšlenkou ulehčení práce (od doby co jsem začal pracovat). Mám šablonu pro dodací list (předem definovaný sešit), do které by se stiskem tlačítka kopírovaly data ze zdrojového sešitu. Neznám možnosti VB a proto se raději ptám, jak moc velká vymyšlenost to je - přikládám "ZdrojData" a "Sablona", kde je na List2 i úkazkové naplnění daty, příznak 5698.
Zdrojový soubor "ZdrojDATA" obsahuje na listech řádky s údaji(1 údaj = 1 řádek), které se mají přenášet - určující je příznak. Přenášet se mají vždy data se stejným příznakem. Může být více řádků na listu a na více listech, ale vždy je jeden shodný příznak.
Pokud se vyskytne více řádků na listu se stejným "Popis", jejich počet se sečte a přenese jako jedna položka + "SN" se přenáší každé zvlášť. Dále se přenáší "ZAR", "Kód" a buňka A1.
Po úspěšném přenosu se druhým tlačítkem naplní ve ZdrojData položka "DL" - všude, kde je shodný příznak.

Díky

ZdrojData.xls

(24 KiB) Staženo 429 x

Šablona.xls

(37.5 KiB) Staženo 487 x

[Reklama]

[navstevnik]

Na listu Priklad v sesitu Sablona.xls komentare v bunkach B4 a D4 odkazuji na nespravne bunky, ma bytv B4 odkaz na prvni list B3 a v D4 odkaz na prvni list J3?
Data prenest v poradi listu MBG, MBMSI, MEM v sesitu ZdrojData.xls?
Nutne musi byt jako tlacitka na listu sablona pouzity automaticke tvary namisto ovladacich prvku ActiveX - tlacitka?
Je nejaky duvod k oddeleni prikazu na nacteni dat a doplneni cisla dodaciho listu? Vhodnejsi je vykonat neoddelene.
Data doplnovat na list sablona (na sablonu je to trochu hubene)? List bude vzdy obsahovat jen radky 1 a 3 a tlacitko(a)?
Predpokladas, ze bude sesit obsahovat procedury VBA? Predpokladam, ze budou jednotlive sesity ukladany, je zbytecne, aby obsahovaly procedury VBA, takze pouzit reseni, kdy budou pouze data prenesena do sesitu Sablona?

[d1amond]

Detaily

► Zobrazit spoiler

Na listu Priklad v sesitu Sablona.xls komentare v bunkach B4 a D4 odkazuji na nespravne bunky, ma bytv B4 odkaz na prvni list B3 a v D4 odkaz na prvni list J3?

Ano, přepsal jsem se v řádku.

Data prenest v poradi listu MBG, MBMSI, MEM v sesitu ZdrojData.xls?

Ano, listy jsem nadhodil jako příklad, reálně jich bude více a názvy také jiné. Nebylo by jednodušší udělat na prvním listu seznam listů, které se mají procházet? A ktomu přihodit ta tlačítka (mohl by zde být i název souboru sablony a číslo DL)

Nutne musi byt jako tlacitka na listu sablona pouzity automaticke tvary namisto ovladacich prvku ActiveX - tlacitka?

Ne, opět jen pro ilustraci.

Je nejaky duvod k oddeleni prikazu na nacteni dat a doplneni cisla dodaciho listu? Vhodnejsi je vykonat neoddelene.

Pro kontrolu. Pokud vše projde v pořádku, tak potom teprve doplnit číslo DL. Ale nevím, co to obnáší za proceduru?

Data by se mohla začít plnit např. od řádku 15, bez ohledu na to, co je nad. Vzhledem k tomu, že se bude sešit ukládat, tak by asi bylo vhodné pouštět procedury ze ZdrojData, směrem na sablonu.

[navstevnik]

V proloze je pracovni verze (nejsou osetreny nektere chybove stavy) a sablona. Na listu Start prilozeneho souboru uprav cesty, nazvy, seznam listu. Sesity ZdrojDat a Dodlistxxxx jsou na konci procedury ulozeny a uzavreny.

Pro kontrolu. Pokud vše projde v pořádku, tak potom teprve doplnit číslo DL. Ale nevím, co to obnáší za proceduru?

Procedura data vlozi do dodaciho listu spravne, kontrola by mela probehnout ve fazi vkladani priznaku do sesitu ZdrojDat.
V procedure je potreba oznacit prenesene polozky shodne popisem (sloupec B:B) pro zadany priznak; k tomu se hodi prave vlozeni cisla dodaciho listu. Vlozene cislo dodaciho listu jiz neumozni opakovat vygenerovani dodaciho listu pro tentyz priznak. Pokud by toto reseni bylo nepruchodne, bude potrebna uprava.

[d1amond]

Pokorně se skláním. Je to přesně tak jak to má být!
Jdu se tím prokousat a dám vědět. 10e6 Díky:)

//Do šablony se vkládá i příznak, to by nemuselo být. Má tam nějakou fci? // oprava, využiju to.
//ještě jsem to neověřil, ale pokud data přesáhnou velikost papíru, pokračují dále svisle?

[navstevnik]

...pokud data přesáhnou velikost papíru, pokračují dále svisle?

Pokud mas na mysli zalomeni textu v bunce, tak to zatim neni ostreno, nyni je pouzito autoformatovani. Ma byt nastavena pevna sirka sloupcu a pripadne zalamovat text? Asi bude vhodne nastavit zalamovani v sablone a nepouzit autoformat, navrhni tedy sablonu i se slucovanymi sloupci, zvlaste kdyz predpokladas na prvnich radcich vkladat fakturacni udaje. Podle tohoto navrhu pak bude potreba upravit vkladani dat.
V priloze je sesit (stale to je pracovni verze) s doplnenym osetrenim dalsich moznych chybovych stavu (neseoulad nazvu listu v seznamu se zdrojovym sesitem), opraveno vyhledavani polozek se shodnym popisem prislusejicich temuz priznaku.

[d1amond]

Funguje vše perfektně, teď to akorát poskládám do nějaké podoby. Tím pokračováním jsem měl namysli, kam bude pokračovat seznam položek, když se dojde na konec stránky. Pravděpodobně to pokračuje normálně po řádcích dále.
S tím zalamováním, to bych neřešil, spíš bych nechal všechna pole na konkrétní, pevnou šířku (aby to vyšlo rovnoměrně do kraje stránky). Víc položek na šířku nebude a pokud se text nevejde, tak se uřízne.

Největší obavy jsem měl z toho sloučení stejných popisů a přiřazení SN, ale je to dokonalé. Těch ošetřujících vyjímek bych si ani nevšimnul

[navstevnik]

V proloze je sesit po zaverecnych upravach, list Start je uzamknut bez hesla, mimo bunky pro vlozeni dat, z duvodu potlaceni nechtene zmeny.
Sablona ma upravene sirky sloupcu, automaticka uprava sirky sloupcu je deaktivovana, lze v procedure pripadne aktivovat.