Pokud by nebylo potřeba v msgboxu zobrazit "závadný znak", dal by se využít regulární výraz.
Něco k inspiraci: https://www.mrexcel.com/board/threads/date-input-mask-applying-a-watermark-to-textbox.1231537/
https://wall.cz/index.php?m=topic&id=54219#post-54244
Obávám se, že manuálnímu vykopírování dat do nového souboru se nevyhneš, pokud tedy není možné obnovit soubor ze zálohy.
Můj osobní tajný tip je, že ten soubor je poškozený.
Fce SVYHLEDAT
Problémem je to, že na některých PC se tisk z jednoho listu roztáhne do dvou a cca. 1,5 cm údajů je na druhém listu.
Předpokládám, že na těch "některých PC" je nainstalována jiná tiskárna.
Stačí si zvolit zobrazení "Zobrazit konce stránek" a myší potahat za okraje.
Prosím o vysvětlení, jak se vybrala oblast cílové tabulky (B4:D27) ?
Nijak, vše se řídí sloupcem B.
Proměnná MaxRadek ... ?
Ve sloupci B se najde první volný řádek, tedy proměnná MaxRadek obsahuje hodnotu např. 20
Při zápisu hodnot do tabulky se tedy vezme buňka B20 [Cells(MaxRadek, 2)], pomocí resize se výběr zvětší o počet zapisovaných výsledků (4) => výsledky se tedy zapíší do oblasti B20:E20
Asi by to makro nešlo ještě nějak zjednodušit.
Naopak pokud budeš přidávat další podmínky viz omezený počet řádků protokolu, bude kód přibývat.
Např.
Tak si ta makra odblokuj viz: https://wall.cz/index.php?m=topic&id=54219#post-54244
Povol makra!
Pravé tl. myši - > Vlastnosti- Zabezpečení -> odblokovat
Přikládám svůj pokus, není to kompletní. Chybí řazení na listě reklamace a vymazání listu souhrn. Nevím zda odstranit celý list, nebo jen data bez hlavičky, nebo i hlavičku.
No pokud nebudu brát sloučené řádky v potaz, tak je makro smaže.
Každopádně něco sem zkusil, výsledek v příloze. Netuším jak bude ovšem probíhat další zpracování. Jednotlivá data jsou "rozházená" do několika sloupců.
Slučuji několik PDF a následně je převádím na excel.
Takže dokážeš ovlivnit strukturu dat?
Protože od řádku 195 po 236 je sloupec A tvořen sloučenými buňkami, jiné řádky takto postiženy nejsou.
Pokud se buňka rozdělí, ve sloupci A má poté hodnotu např. "38 Kunštát" což neprojde testem na "číslo".
V tom zadání Ti nějak haprujou sloupce, tak sem vzorec zapsal mimo tabulku.
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.