Jak hypertextový odkaz na příkazové tlačítko na adresu URL v aplikaci Excel?
V aplikaci Excel může být pro nás snadné vytvořit hypertextový odkaz na tlačítko tvaru, ale zkusili jste někdy vytvořit hypertextový odkaz na příkazové tlačítko? Když kliknete na příkazové tlačítko, přejde podle potřeby na zadaný web URL. V tomto článku představím několik rychlých a snadných triků, jak zvládnout tento úkol v aplikaci Excel.
Vytvořte hypertextový odkaz na příkazové tlačítko na adresu URL s kódem VBA
Vytvořte hypertextový odkaz na příkazové tlačítko na adresu URL s kódem VBA
Chcete-li vytvořit hypertextový odkaz na příkazové tlačítko, proveďte následující kroky:
1, klikněte Vývojka > Vložit > Příkazové tlačítko (ovládání ActiveX)a potom nakreslete tlačítko podle následujícího obrázku obrazovky:
2. Po vložení příkazového tlačítka na něj klikněte pravým tlačítkem a vyberte Nemovitosti z kontextové nabídky v Nemovitosti , klepněte na tlačítko OK kategorizovány na kartu a zadejte úplnou adresu webu, který chcete propojit Titulek textové pole, viz screenshot:
3. Poté zavřete dialog, klikněte pravým tlačítkem na kartu listu, která obsahuje příkazové tlačítko, a vyberte Zobrazit kód z kontextového menu a v otevřeném Microsoft Visual Basic pro aplikace okno, zkopírujte a vložte následující kód do prázdného modulu:
Kód VBA: hypertextový odkaz na příkazové tlačítko:
Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:=CommandButton1.Caption
End Sub
Poznámka: Ve výše uvedeném kódu, CommandButton 1 je název vytvořeného příkazového tlačítka, změňte jej prosím podle svých potřeb.
4. A poté uložte kód a ukončete Režim návrhu, nyní, když kliknete na příkazové tlačítko, přejde na konkrétní webovou stránku.
Tipy: Pokud titulek v příkazovém tlačítku není adresa URL, je to pouze textový řetězec, jak ukazuje následující snímek obrazovky:
K dosažení tohoto cíle můžete použít níže uvedený kód VBA:
Kód VBA: hypertextový odkaz na příkazové tlačítko:
Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:="https://www.extendoffice.com"
End Sub
Poznámka: Ve výše uvedeném kódu, CommandButton 1 je název vytvořeného příkazového tlačítka a měli byste nahradit webovou adresu https://www.extendoffice.com na vaši vlastní adresu URL.
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
