» Poradna » Programy

Excel - Odeslání emailu pomocí tlačítka

 |   |  Microsoft Windows 10 Chrome 44.0.2403.155

Dobrý den, prosím Vás, zvládl by mi někdo upravit zdroják ve kterém bych potřeboval aby se mi pomocí tlačítka (kliknutí) odeslal email?Mám jedinný problém když mám zamknutý list ale buňky A4 a A5 (v buňkách je text Echo) odemčené tak mi to pořád píše, že chce odeslat ale brání mu v tom ten zamknutý list přitom sem zúžil rozsah jen na tyhle 2 buňky z aktivního listu které zůstávají odemčené. nevím prostě jak obejít to heslo na listu, to tam prostě být musí.Mám tohle:Sub Send_Range()' Select the range of cells on the active worksheet.ActiveSheet.Range("A4:A5").Select' Show the envelope on the ActiveWorkbook.ActiveWorkbook.EnvelopeVisible = True' Set the optional introduction field thats adds' some header text to the email body. It also sets' the To and Subject lines. Finally the message' is sent.With ActiveSheet.MailEnvelope.Introduction = "Přijď.".Item.To = "email@email.cz".Item.Subject = "Přijď :)".Item.SendEnd WithEnd SubNeví někdo jak to obejít aby mi to odeslalo i přes zamknutý list?Děkuji za rady


Související témata: Item, Sets, Lines, Field




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

Jak dopadl velký den Applu s náloží novinek: Sledujte, co letos připravil

Jak dopadl velký den Applu s náloží novinek: Sledujte, co letos připravil

** Apple večer představil novinky ** Ukáže nové operační systémy, ale čekala se i nová zařízení ** Začíná vývojářská konference Applu WWDC 2018

Karel Javůrek | 87

Porno insider: Jak virtuální realita vstupuje do filmů pro dospělé

Porno insider: Jak virtuální realita vstupuje do filmů pro dospělé

** Pornografie údajně představuje třetinu internetové obsahu a je technologický tahounem ** Do erotického obsahu postupně zasahuje i virtuální realita ** Kromě vizuálního vjemu se pracuje také na virtuálním uspokojení toho hmatového

Jan Dudek | 28

Sex a rozmnožování při mezihvězdné cestě: Kolik lidí je potřeba pro let k Proximě Centauri?

Sex a rozmnožování při mezihvězdné cestě: Kolik lidí je potřeba pro let k Proximě Centauri?

** Vědci spočítali, jak velká by musela být posádka pro vícegenerační let k nejbližší hvězdné soustavě ** Proxima Centauri se nachází 4,3 světelných let od nás ** Za současných technologií bychom k ní letěli 6300 let

Petr Kubala | 53

Rekordy počasí: V Česku to ještě jde, skutečné extrémy zažívají jinde

Rekordy počasí: V Česku to ještě jde, skutečné extrémy zažívají jinde

** Teplotní extrémy dokážou překvapit. Seznamte se s rekordy v Česku i ve světě ** Rekordní hodnoty jsou mnohdy až k neuvěření ** Zjistěte, kdy ke bylo největší horko, zima, déšť či vítr

Karel Kilián | 7

Šmírovačka kamerami Googlu: Koukněte se, co nového zachytily na Street View

Šmírovačka kamerami Googlu: Koukněte se, co nového zachytily na Street View

Google stále fotí celý svět do své služby Street View. A novodobou zábavou je hledat v mapách Googlu vtipné záběry. Podívejte se na výběr nejlepších!

redakce | 44


Aktuální číslo časopisu Computer

Velký test 18 bezdrátových sluchátek

Vše o přechodu na DVB-T2

Procesory AMD opět porážejí Intel

7 NVMe M.2 SSD v přímém souboji