Sådan hyperlinkes en kommandoknap til en URL-adresse i Excel?
I Excel kan det være let for os at oprette et hyperlink til en formknap, men har du nogensinde prøvet at oprette et hyperlink til en kommandoknap? Når du klikker på kommandoknappen, går den til det angivne webadresse efter behov. Denne artikel vil jeg introducere nogle hurtige og nemme tricks til at håndtere denne opgave i Excel.
Hyperlink en kommandoknap til en URL-adresse med VBA-kode
Hyperlink en kommandoknap til en URL-adresse med VBA-kode
For at hyperlinke en kommandoknap skal du gøre følgende:
1. Klik Udvikler > indsatte > Kommando-knap (ActiveX-kontrol), og træk derefter en knap som vist på følgende skærmbillede:
2. Når du har indsat kommandoknappen, skal du højreklikke på den og vælge Ejendomme fra genvejsmenuen i Ejendomme dialogboksen, klik kategoriseret fanen, og indtast den komplette webadresse, du vil linke til Caption tekstboks, se skærmbillede:
3. Luk derefter dialogen, og højreklik på arkfanen, der indeholder kommandoknappen, og vælg Vis kode fra genvejsmenuen og i det åbnede Microsoft Visual Basic til applikationer vindue, kopier og indsæt følgende kode i det tomme modul:
VBA-kode: hyperlink til en kommandoknap:
Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:=CommandButton1.Caption
End Sub
Bemærk: I ovenstående kode, KommandoKnap1 er navnet på den oprettede kommandoknap, skal du ændre den til dit behov.
4. Og gem derefter koden, og afslut Design Mode, nu, når du klikker på kommandoknappen, går den til den specifikke webside.
Tips: Hvis billedteksten i kommandoknappen ikke er URL-adressen, er det kun tekststreng som vist på følgende skærmbillede:
Du kan anvende nedenstående VBA-kode for at opnå det:
VBA-kode: hyperlink til en kommandoknap:
Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:="https://www.extendoffice.com"
End Sub
Bemærk: I ovenstående kode, KommandoKnap1 er navnet på den oprettede kommandoknap, og du skal erstatte webstedets adresse https://www.extendoffice.com til din egen URL-adresse.
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!