» Poradna » Programy

Tlačítka v Excelu po provedení makra jako bonus změní polohu a velikost

 |   |  Microsoft Windows 7 Firefox 57.0

Dobrý den.Snažím se v Excelu 2010 vytvořit tlačítka, která mne vytisknou do pdf jeden, nebo dva listy z excelu. Jedno tlačítko tiskne jeden list, druhé dva listy. Samotná funkce tisku funguje dobře. Vytiskne, uloží pdf pod (téměř) správným jménem a otevře v prohlížeči. Ale co mne dál zlobí je formátování polohy a velikosti tlačítka. Po kliknutí na tlačítko se provede makro a všechna tlačítka na daném listu se zmenší a posunou. Za různých okolností jinak. Zatím jsem zjistil následující způsoby:1) Pokud vložím jako ActiveX, pak se obě tlačítka chovají stejně. Po kliknutí obě tlačítka na listu zmenší a přesunou. Vždy stejným směrem k sloupci A.2) Pokud tlačítka vložím jako Ovládací prvek formuláře, po vložení pouze přiřadím makro a spustím bez další editace, proběhne vše v pořádku. Pokud ale tlačítko chci "Přichytit k mřížce" a umístím ho k ní, kliknu na druhé tlačítko, obě tlačítka se zmenší, ale zachovají polohu. Pokud kliknu na první tlačítko, obě tlačítka se zvětší na původní velikost a zachovají polohu.Public Sub Tisk_30_Click() Application.ScreenUpdating = False cestaadresare = ThisWorkbook.Path a = ThisWorkbook.Name soubor = cestaadresare & "\" & a & ".pdf" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ soubor, Quality:= _ xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _ OpenAfterPublish:=True End SubPublic Sub Tisk_31_Click() Application.ScreenUpdating = False cestaadresare = ThisWorkbook.Path a = ThisWorkbook.Name soubor = cestaadresare & "\" & a & ".pdf" Sheets(Array(1, 3)).Select ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ soubor, Quality:= _ xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _ OpenAfterPublish:=True Sheets(3).SelectEnd SubNapadá vás, proč makro ovlivňuje velikost a polohu tlačítka? A proč každé makro jinak? Případně, jak tomu zabránit? Případně, jak zlepšit makro? Od něj chci, aby mne vytisklo jeden, nebo dva listy, uložilo do pdf (ano vím, že aktuálně soubor ukládá stylem xxx.xlsm.pdf, umím to i opravit. Ale asi bych to opravil přes nějakou pomocnou buňku, kde bych si nechal zobrazit název souboru a vzorcem na úpravu textu v buňce bych z názvu odstranil příponu a tuto hodnotu načetl do makra. Pokud vás napadá elegantnější způsob, budu rád za rady), a po uložení otevřelo v pdf prohlížeči. Děkuji za jakékoli připomínky a rady


Související témata: PDF, Bonus, Provedení, False, Filename, Quality, Ovládací prvek, Původní velikost


Určitě si přečtěte

Výkon herního počítače za 139 Kč nebo i úplně zadarmo. Geforce Now startuje!

Výkon herního počítače za 139 Kč nebo i úplně zadarmo. Geforce Now startuje!

** Dlouhý betatest končí a nyní všichni mohou hrát přes internet ** Nemusíte žádné hry kupovat znovu. Jede to, co už máte v knihovnách na Steamu, Uplay, Battle.net a jinde ** Roční náklady odpovídají ceně jedné běžné hry

Tomáš Holčík | 53

Dnes nastal konec Windows 7. Ale nepropadejte panice, počítač vám nastartuje i zítra

Dnes nastal konec Windows 7. Ale nepropadejte panice, počítač vám nastartuje i zítra

** Dnes končí podpora Windows 7 a systém formálně umírá ** Co to ale znamená v praxi a bude mi PC fungovat i zítra? ** A mohu i v lednu 2020 zdarma přejít na Windows 10?

Jakub Čížek | 121

10 skrytých nastavení prohlížeče Google Chrome, která se můžou hodit

10 skrytých nastavení prohlížeče Google Chrome, která se můžou hodit

** Prohlížeč Google Chrome ukrývá mnoho zajímavých možností ** Našli jsme deset nejzajímavějších skrytých nastavení ** Můžete si například výrazně vylepšit práci s kartami

Karel Kilián | 18

Srovnali jsme česká města s IBM, Googlem nebo třeba Samsungem. Podívejte se, v jaké firmě „žijete“

Srovnali jsme česká města s IBM, Googlem nebo třeba Samsungem. Podívejte se, v jaké firmě „žijete“

** Nadnárodní korporace zaměstnávají stovky tisíc lidí ** Mají tedy velikost metropolí ** Srovnali jsme je s českými krajskými městy

Jakub Čížek | 15

Pojďme programovat elektroniku: Co se skrývá uvnitř běžné SD karty a jak ji oživit

Pojďme programovat elektroniku: Co se skrývá uvnitř běžné SD karty a jak ji oživit

** Máme ji v mobilech a fotoaparátech ** SD karta je dnes už standard ** A proto ji zkusíme připojit i k Arduinu

Jakub Čížek | 20

Proč byste měli rozmazávat SPZ aut na fotkách, které vystavujete na web

Proč byste měli rozmazávat SPZ aut na fotkách, které vystavujete na web

** Na fotkách aut nahraných na web je dobré rozmazat SPZ ** Značku dokáže z obrázku přečíst Google i Facebook ** SPZ může naplnit podstatu osobního údaje

Karel Kilián | 67



Aktuální číslo časopisu Computer

Velký test autokamer

Test ATX skříní

Jak surfovat pohodlně

Sportovní aplikace

Jak funguje procesor