Hoe maakt u van een opdrachtknop in Excel een hyperlink naar een URL-adres?
In Excel is het misschien eenvoudig om een hyperlink toe te voegen aan een vormknop, maar heeft u ooit geprobeerd een hyperlink te koppelen aan een opdrachtknop? Klikt u erop, dan gaat u direct naar de gewenste website. In dit artikel deel ik een paar snelle en eenvoudige trucs om dit in Excel voor elkaar te krijgen.
Een hyperlink maken van een opdrachtknop naar een URL-adres met VBA-code
Een hyperlink maken van een opdrachtknop naar een URL-adres met VBA-code
Volg de volgende stappen om een hyperlink te maken van een opdrachtknop:
1. Klik op Ontwikkelaar > Invoegen > Opdrachtknop (ActiveX-besturingselement) en teken vervolgens een knop zoals in de volgende schermafbeelding wordt weergegeven:
2. Nadat u de opdrachtknop hebt ingevoegd, klikt u er met de rechtermuisknop op en kiest u Eigenschappen in het contextmenu. Klik in het dialoogvenster Eigenschappen op het tabblad Gecategoriseerd en voer het volledige webadres dat u wilt koppelen in het tekstvak Bijschrift. Zie de schermafbeelding:
3. Sluit vervolgens het dialoogvenster en klik met de rechtermuisknop op het werkbladtabblad waarop de opdrachtknop staat. Selecteer Code weergeven in het contextmenu. Kopieer en plak de volgende code in het geopende venster van Microsoft Visual Basic for Applications in de lege module:
VBA-code: hyperlink naar een opdrachtknop:
Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:=CommandButton1.Caption
End Sub
Opmerking: In de bovenstaande code is CommandButton1 de naam van de gemaakte opdrachtknop; pas deze aan naar wens.
4. Sla de code op en sluit vervolgens de Ontwerpmodus. Vanaf nu gaat u bij een klik op de opdrachtknop direct naar de desbetreffende webpagina.
Tips: Als het bijschrift in de opdrachtknop niet het URL-adres is, maar slechts een tekstreeks zoals in de volgende schermafbeelding wordt weergegeven:
Dan kunt u de onderstaande VBA-code gebruiken om dit te realiseren:
VBA-code: hyperlink naar een opdrachtknop:
Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:="https://www.extendoffice.com"
End Sub
Opmerking: In de bovenstaande code is CommandButton1 de naam van de gemaakte opdrachtknop. Vervang het webadres https://www.extendoffice.com door uw eigen URL-adres.
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins