Příspěvky uživatele
< návrat zpět
Sub TiskDoPDF()
ActiveSheet.Select
CestaAdresare = ThisWorkbook.Path
zakazka = Range("G1").Text
soubor = CestaAdresare & "\" & "Tisk" & "\" & zakazka & ".pdf"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=soubor, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
End Sub
Sub TiskDoPDF()
ActiveSheet.Select
CestaAdresare = ThisWorkbook.Path
zakazka = Range("G1").text
soubor = CestaAdresare & "\" & zakazka & ".pdf"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=soubor, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
End Sub
Netiskne se přes PDFCreator, ale nevím, jestli je to problém...
Neúmyslně možná ano, ale to bude moje blbost a budu vědět, kde je chyba. Logicky v těchto buňkách musí být jen čísla.
Nebudu Vás s tím dál zaměstnávat, jsem rád, že jste mi pomohl s tímto funkčním řešením! :-)
Děkuji.
Vždy tam budou čísla, takže není potřeba ošetřovat proti textu. Už jsem si upravil pro svoje sloupce a funguje parádně! ;-)
Co tam není ošetřené je, že když zadám typ, tak se vypíše chyba, doplním řadu a nic se nestane, musím smazat typ a znovu ho zapsat, ale to vůbec nevadí, neřešil bych!
Díky moc za ochotu! :-)
Omlouvám se, teď už se správnou přílohou. ;-)
Díky, ale potřeboval bych ještě menší úpravu.
Do tabulky přibyl sloupeček typ, který potřebuji také zohlednit v řadě dokladů.
Pořadové číslo vzniká tak, že
9140015
9 = typ dokladu
140015 = pořadové číslo
Potřeboval bych tedy makro upravit tak, aby při zapsání řady se nic nedělo a po zadání typu se ze sloupce "D" v dané řadě a v daném typu dokladu našlo poslední číslo a přičetlo +1.
Vždy je typ dokladu číslo mezi 1-9 a je první zleva.
Děkuji za ochotu.
Věděl by mi někdo poradit jak na makro:
Na aktivním řádku na kterém stojím se podívej do sloupce "B" o jakou řadu se jedná a v této řadě ve sloupci "D" vyhledej poslední číslo z řady ze sloupce "B" a přičti k tomuto číslu 1?
Makro by se spouštělo při změně buňky ve slopci "B".
Děkuji.
Nějaký tip na makro
Při změně buňky (zapsání řady - 100; 101; 200) vyhledej poslední hodnotu ve sloupci "D" a přičti +1?
Děkuji.
Napevno jsou tam vložené, protože je to vytvořené jako příklad. 66 tisíc řádků nikdy nebude, byl to příklad toho, že řádků bude větší množství než 7 (nebo-li dopředu neurčené množství a vzorec musí fungovat v jakémkoliv řádku)
Jinak s čísly máte pravdu, mělo by to tak být, čísla jsem tam měla vložena náhodně, abych otestoval vzorec.
¨
Omlouvám se za zmatečné zadání.. :-/
Vzorec, který jsi přidal funguje stejně jako ten můj.
Řádku bude takové množství, kolik bude za rok objednávek, to dopředu nikdy nevím.
Proto potřebuji vzorec rozšířit na oblast například =MAX(D$2:D65536*(B$2:B65536=B8))+1, aby když přidám nový řádek (objednávku), tak se mi opět našlo nejvyšší číslo a přičetla 1.
Je pravda, že kdyby zde byl vzorec, tak se všechny řádky budou pořád aktualizovat s přidáním nového řádku (objednávky).
Asi budu muset vyřešit makrem.
Při změně buňky (zapsání řady - 100; 101; 200) vyhledej poslední hodnotu a přičti +1.
To by asi možné bylo..?
Ahoj,
mám tabulku, kde v jednom sloupci mám řadu dokladu a v druhém pořadové číslo v dané řadě. Čísla neustále přibývají, proto nemohu použít vzorec, který mám teď =MAX(KDYŽ(B2:B7=B8;D2:D7)).
Potřeboval bych ho upravit nějak, aby nevznikaly cyklické odkazy. Asi přes nepřímý odkaz, ale nevím přesně jak.
Potřebuji, aby oblast byla dynamická a vždy, když zadám řadu dokladu, tak se mi vyplní poslední nalezené číslo v dané řadě +1.
Více napoví příloha.
Nějaké tipy?
Děkuji.
Díky, dát tam sumu mě nenapadlo :/
Ahoj,
mám jednu hodnotu, kterou potřebuji najít ve třech sloupcích, ale i různých řádkách.
Hodnota může být v jednom z těch tří sloupců a řádky postupně přibývají. Vždy se ale hledaná hodnota nachází na stejném řádku jako kritérium podle, kterého hledám.
Zkoušel jsem INDEX a POZVYHLEDAT, ale tam jsou potřeba 2 kritéria..
Příloha napoví více.
Děkuji.
http://office.lasakovi.com/excel/formatovani/ms-excel-podminene-formatovani-priklady/
Druhá možnost, pokud máš Excel 2013:
=KDYŽ(DAYS(A1;A2)>=4;1;0)
podmíněné formátován stejně jako lubo
Uživatelské menu
\nMenu
On-line nástroje
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
RSS nejnovější články