Hyperlink in Listbox Userform linken aan cel in ander tabblad.

[Speedsurfer]

Beste.
Is het mogelijk om een hyperlink te maken in "Userform" "Klantenlijst" die zodra je op het klantnummer drukt, links of rechts in de tabel,
doorgestuurd wordt naar de "klantenkaart" cel D4 en daar de het klantnummer laat zien.

De formule zou ik graag in "Module 1" willen hebben.

Heb van alles uitgeprobeerd en getest in "Userform - Klantenlijst - Listbox3"

Zie me wederom genoodzaakt de vraag te stellen op dit forum

Bijgevoegd een testbestand.

Als iemand een suggestie weet, heel graag.

 

[HSV]

Zet de eigenschap van het formulier op showmodal = false.

het laatste stukje van listbox3_click()

Next mycontrol
TextBox17.Text = ListBox3.Column(6) 'Postcode
TextBox20.Text = ListBox3.Column(1) 'Klant-ID
TextBox23.Text = ListBox3.Column(2) 'Titel
[COLOR=#ff0000]With Sheets("klantenkaart")[/COLOR]
[COLOR=#ff0000] .Range("d4") = ListBox3.Column(1)[/COLOR]
[COLOR=#ff0000] Application.Goto .Range("d4"), -1[/COLOR]
[COLOR=#ff0000]End With[/COLOR]
End Sub

 

[edmoor]

Geen idee wat je bedoelt met een hyperlink in een Userform.
In een Userform kan je gewoon het Click event van een object gebruiken.

Als je in dit document in het Userform Klantenlijst op een klant in de lijst klikt, verschijnt het ID er van op het blad Klantenkaart, cel D4.
Is dat de bedoeling?
Bekijk bijlage Kopie van Testbestand 24-05-2020.xlsb

 

[Jack Nouws]

Nog een voorbeeldje

[FONT=Verdana,Arial,Tahoma,Calibri,Geneva,sans-serif]If ListBox3.ListIndex > 0 Then Sheets("Klantenkaart").Range("D4") = ListBox3.Column(1)
[/FONT]

 

[Speedsurfer]

Dank weer Harry voor de oplossing.
Heb hem weer ingevoerd.
Bij gebruik lijkt het praktischer om de link in de rechter tabel bij "Klant ID"te activeren.
Kan je me nog een suggestie doen.?
Waarschijnlijk verplaatsen, maar waar naartoe.
Hij werkt in de linkertabel prima.

Moet nog wel het nodige opschonen merk ik,
want bij het terugkeren naar het hoofdmenu in het originele bestand zie ik een heleboel flitsen voorbij komen.
Het waarschijnlijk te maken met je eerdere opmerking vorige week dat er veel vuiligheid in zit.

 

[HSV]

Ik zie aan de rechterkant alleen maar textboxes.

 

[Speedsurfer]

Sorry bedoel ik ook.

 

[HSV]

Tja, zolang ik in de listbox niets doe gebeurt er met de textboxes niets.
Wat zou ik moeten doen om ergens een code voor te schrijven.
Ergens op klikken?

 

[Speedsurfer]

Ja. heb je gelijk in.
Ik dacht te simpel.
Heb in die textboxen onderin, informatie staan die ik eerst zou willen bekijken.
Maar hij schiet zoals gevraagd meteen door naar de ""Klantenkaart"
Heb door middel van Hide wel de Zoek actie van het "userform uit gezet, zodat de info van de "Klantenkaart" over het hele scherm zichtbaar wordt.
Zal ik eerst moeten overdenken wat ik daar mee wil.
Ik kom er op terug.
Hoop je weer te zien.
Dank aan de overige adviseurs.
Ben al weer een end verder gekomen, en kan weer vooruit.