Ik heb een sheet met daarin een aantal macros die ik aanroep met knoppen en dat werkt allemaal uitstekend. Maar die knoppen wil ik vervangen door hyperlinks. Op internet heb ik diverse antwoorden gevonden die ik geen van alle werkend krijg. Waarschijnlijk gaat het mis bij het vertalen van de algemene instructie naar mijn specifieke omgeving die ik hieronder beschrijf.
In VBAproject Module 1 heb ik een macro "M02_reset_beheer".
In cel J22 van het tabblad "start" heb ik een hyperlink koppeling getiteld "reset beheer" aangemaakt verwijzend naar zichzelf, dus cel J22.
In VBAproject Microsoft Excel -objecten blad 14 (start) heb ik de volgende code geplaatst:
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
If Target.Range.Address = "$J$22" Then
Run "M02_reset_beheer"
Exit Sub
End If
End Sub
Iets als ongeveer dit zou moeten werken maar dat doet het niet. Ergens is de syntaxis niet goed en ik vraag me ook af hoe de hyperlink naar blad 14(start) in de objectenlijst wordt gestuurd. (start).
De syntaxis [Run "M02_reset_beheer"] zonder de haken is juist want in een andere macro gebruik ik die en dat werkt.
Wie helpt.
In VBAproject Module 1 heb ik een macro "M02_reset_beheer".
In cel J22 van het tabblad "start" heb ik een hyperlink koppeling getiteld "reset beheer" aangemaakt verwijzend naar zichzelf, dus cel J22.
In VBAproject Microsoft Excel -objecten blad 14 (start) heb ik de volgende code geplaatst:
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
If Target.Range.Address = "$J$22" Then
Run "M02_reset_beheer"
Exit Sub
End If
End Sub
Iets als ongeveer dit zou moeten werken maar dat doet het niet. Ergens is de syntaxis niet goed en ik vraag me ook af hoe de hyperlink naar blad 14(start) in de objectenlijst wordt gestuurd. (start).
De syntaxis [Run "M02_reset_beheer"] zonder de haken is juist want in een andere macro gebruik ik die en dat werkt.
Wie helpt.