Prinútiť svojich klientov, aby povolili makrá Excelu

Ak chcete použiť akékoľvek makro v Exceli, vaši používatelia musia makrá povoliť. To znamená, že musia dať Excelu povolenie na spúšťanie makier v ich prostredí. Ak chcete povoliť makrá, používatelia kliknú na tlačidlo Povoliť obsah v bezpečnostnom upozornení, ktoré sa zobrazí nad riadkom vzorcov.

Prinútiť svojich klientov, aby povolili makrá Excelu

Pointa je, že môžete písať všetky fantastické makrá na svete, ale nikdy sa nespustia, pokiaľ vaši používatelia makrá nepovolia. To vyvoláva otázku; Môžete prinútiť používateľov, aby povolili makrá? Odpoveď je áno – s trochou triku.

Myšlienka je pomerne jednoduchá. Vytvoríte hárok s názvom povedzme ŠTART. Tento hárok obsahuje iba jednoduché upozornenie, že makrá musia byť povolené. Potom skryjete všetky hárky v zošite okrem hárku ŠTART. Nakoniec napíšete jednoduché makro, ktoré po otvorení zošita odkryje všetky hárky.

Prinútiť svojich klientov, aby povolili makrá Excelu

V tomto bode, keď je zošit otvorený, Excel požiada používateľa, aby povolil makrá. Používatelia budú nútení tak urobiť, pretože všetko, čo uvidia, je váš úvodný hárok. Ostatné listy budú skryté!

Aby táto technika fungovala, potrebujete dve makrá: Jedno makro skryje všetky okrem hárka ŠTART, keď sa zošit zatvorí, a ďalšie makro, ktoré odkryje všetky okrem hárka ŠTART, keď sa zošit otvorí.

Najprv sa riaďte akciami, ktoré je potrebné vykonať po zatvorení zošita. :

Aktivujte Editor jazyka Visual Basic stlačením ALT+F11 na klávesnici

V okne Projekt nájdite názov projektu/zošita a kliknutím na znamienko plus vedľa neho zobrazte všetky hárky.

Kliknite na Tento zošit.

V rozbaľovacom poli Udalosť vyberte udalosť BeforeClose.

Prinútiť svojich klientov, aby povolili makrá Excelu

Zadajte alebo prilepte nasledujúci kód:

Súkromný podriadený zošit_pred zatvorením (zrušiť ako boolovský)
'Krok 1: Deklarujte svoje premenné
  Dim ws As Worksheet
Krok 2: Odkryte úvodný hárok
  Sheets("START").Visible = xlSheetVisible
'Krok 3: Začnite prechádzať všetky pracovné hárky
  Pre každé ws In ThisWorkbook.Worksheets
'Krok 4: Skontrolujte názov každého pracovného hárka
  Ak ws.Name <> "ŠTART" Potom
„Krok 5: Skryte hárok
  ws.Visible = xlVeryHidden
  Koniec Ak
Krok 6: Prejdite na ďalší pracovný hárok
  Ďalšie ws
„Krok 7: Uložte zošit
  ActiveWorkbook.Save
End Sub

V kroku 1 deklarujete objekt s názvom ws na vytvorenie pamäťového kontajnera pre každý pracovný hárok, cez ktorý budete prechádzať.

V kroku 2 sa ubezpečíte, že hárok ŠTART je viditeľný.

V kroku 3 spustíte cyklovanie a oznámite Excelu, že chcete vyhodnotiť všetky pracovné hárky v tomto zošite.

V kroku 4 jednoducho porovnáte názov ŠTART s hárkom, ktorý je momentálne v slučke. Tento krok zabezpečí, že nasledujúce akcie sa použijú na všetky hárky okrem hárka ŠTART.

Ak sa názvy hárkov líšia, v kroku 5 hárok skryjete pomocou vlastnosti xlVeryHidden. Táto vlastnosť nielenže skryje hárok, ale tiež zabráni používateľovi, aby ho manuálne odkryl pomocou používateľského rozhrania.

Prejdete späť a získate ďalší hárok v kroku 6.

V kroku 7, po vyhodnotení všetkých hárkov, makro uloží zošit a skončí.

Teraz musíte napísať makro na spracovanie všetkých akcií, ktoré sa musia vykonať pri otvorení zošita:

Aktivujte Editor jazyka Visual Basic stlačením ALT+F11.

V okne Projekt nájdite názov projektu/zošita a kliknutím na znamienko plus vedľa neho zobrazte všetky hárky.

Kliknite na Tento zošit.

V rozbaľovacom poli Udalosť vyberte možnosť Otvoriť udalosť.

Prinútiť svojich klientov, aby povolili makrá Excelu

Zadajte alebo prilepte nasledujúci kód:

Private Sub Workbook_Open()
'Krok 1: Deklarujte svoje premenné
  Dim ws As Worksheet
'Krok 2: Začnite prechádzať všetky pracovné hárky
  Pre každé ws In ThisWorkbook.Worksheets
'Krok 3: Zobrazte všetky pracovné hárky
  ws.Visible = xlSheetVisible
„Krok 4: Prejdite na ďalší pracovný hárok
  Ďalšie ws
'Krok 5: Skryte úvodný hárok
  Sheets("START").Viditeľné = xlVeryHidden
End Sub

V kroku 1 deklarujete objekt s názvom ws na vytvorenie pamäťového kontajnera pre každý pracovný hárok, cez ktorý prechádzate.

V kroku 2 spustíte cyklovanie a oznámite Excelu, že chcete vyhodnotiť všetky pracovné hárky v tomto zošite.

V kroku 3 odkryjete hárok, ktorý je momentálne v slučke. Tento krok efektívne odkryje všetky pracovné hárky, pretože každý hárok je viditeľný.

Prejdete späť a získate ďalší hárok v kroku 4.

Keď sú všetky hárky viditeľné, krok 5 skryje hárok ŠTART. Opäť použijete vlastnosť xlVeryHidden, takže používateľ nebude môcť manuálne odkryť hárok pomocou používateľského rozhrania.

Po implementácii oboch makier budete mať zošit, ktorý bude fungovať iba vtedy, ak používateľ povolí makrá!

Leave a Comment

Ako zmeniť pozadie v PowerPointe 2019

Ako zmeniť pozadie v PowerPointe 2019

Naučte sa, ako jednoducho zmeniť pozadie v PowerPointe 2019, aby vaše prezentácie pôsobili pútavo a profesionálne. Získajte tipy na plnú farbu, prechod, obrázky a vzory.

Ako používať štatistické funkcie v Exceli na počítanie položiek v množine údajov

Ako používať štatistické funkcie v Exceli na počítanie položiek v množine údajov

Excel poskytuje štyri užitočné štatistické funkcie na počítanie buniek v hárku alebo zozname: COUNT, COUNTA, COUNTBLANK a COUNTIF. Pre viac informácií o Excel funkciách, pokračujte.

Klávesové skratky pre bežné príkazy zobrazenia Excel 2013

Klávesové skratky pre bežné príkazy zobrazenia Excel 2013

Objavte efektívne klávesové skratky v Exceli 2013 pre zobrazenie, ktoré vám pomôžu zlepšiť produktivitu. Všetky skratky sú začiatkom s Alt+W.

Ako nastaviť okraje stránky v programe Word 2013

Ako nastaviť okraje stránky v programe Word 2013

Naučte sa, ako nastaviť okraje v programe Word 2013 s naším jednoduchým sprievodcom. Tento článok obsahuje užitočné tipy a predvoľby okrajov pre váš projekt.

Ako používať štatistické funkcie na výpočet priemerov, režimov a mediánov v Exceli

Ako používať štatistické funkcie na výpočet priemerov, režimov a mediánov v Exceli

Excel vám poskytuje niekoľko štatistických funkcií na výpočet priemerov, režimov a mediánov. Pozrite si podrobnosti a príklady ich použitia.

Ako zistiť a opraviť chyby vzorcov v Exceli 2016

Ako zistiť a opraviť chyby vzorcov v Exceli 2016

Excel 2016 ponúka niekoľko efektívnych spôsobov, ako opraviť chyby vo vzorcoch. Opravy môžete vykonávať po jednom, spustiť kontrolu chýb a sledovať odkazy na bunky.

Archivácia priečinkov programu Outlook

Archivácia priečinkov programu Outlook

V niektorých prípadoch Outlook ukladá e-mailové správy, úlohy a plánované činnosti staršie ako šesť mesiacov do priečinka Archív – špeciálneho priečinka pre zastarané položky. Učte sa, ako efektívne archivovať vaše položky v Outlooku.

Vytváranie a formátovanie tabuliek v programe Word 2019

Vytváranie a formátovanie tabuliek v programe Word 2019

Word vám umožňuje robiť rôzne zábavné veci s tabuľkami. Učte sa o vytváraní a formátovaní tabuliek vo Worde 2019. Tabuľky sú skvelé na organizáciu informácií.

Výber rozsahu Excel VBA

Výber rozsahu Excel VBA

V článku sa dozviete, ako umožniť používateľovi vybrať rozsah v Excel VBA pomocou dialógového okna. Získajte praktické tipy a príklady na zlepšenie práce s rozsahom Excel VBA.

Výpočet percentuálneho rozptylu so zápornými hodnotami v Exceli

Výpočet percentuálneho rozptylu so zápornými hodnotami v Exceli

Vzorec na výpočet percentuálnej odchýlky v Exceli s funkciou ABS pre správne výsledky aj so zápornými hodnotami.