Hyperlink

[Speedsurfer]

Beste.

Is het mogelijk om met een hyperlink het resultaat mee te nemen naar een ander tabblad.?

Uitleg: Ik heb een adressenbestand (Klantenlijst), en elke persoon heeft een nummer, het nummer wil ik koppelen aan een hyperlink.
Zodra je op dit nummer drukt moet dit nummer op een ander tabblad (Klantenkaart) verschijnen.?

Ik hoop dat iemand mij kan helpen.
Thx

 

[SjonR]

Plaats even een voorbeeldbestandje met wat je wilt

 

[Speedsurfer]

Moest even het een en ander voorbereiden en zoeken waar ik het voorbeeldbestand moest plaatsen.
In tabje "Klantenlijst" staan in kolom B een aantal klantnummers met een hyperlink.
Deze link stuurt je door naar tabje "Klantenkaart" in cel D4.
Alwaar aangekomen zou ik graag het nummer willen zien wat ik aangeklikt hebt.
En dus in dit geval automatisch de bij behorende adres gegevens.
Sta ik reeds in tabjes "Klantenkaart" dan kan ik wel direct het nummer handmatig invoeren en komen de gegevens ook te voorschijn.
Maar wil graag dit geautomatiseerd hebben.

 

[DigiCafee]

Zet dit even in VB-blad van de sheet 'Klantenkaart' :

Private Sub Worksheet_Change(ByVal Target As Range)
    ActiveSheet.UsedRange.Columns("A:G").Calculate
End Sub

Dat lost alvast het manueel intikken op - nog niet de sprong van lijst naar kaart ... ik bekijk het nog verder

 

[JEC.]

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
    ActiveCell.Value = Target.Parent.Value
End Sub

Deze in tabje klantenlijst

 

[Speedsurfer]

Hé dat werkt prima.
Thxs.
Mag/kan ik deze code ook voor andere tabjes gebruiken in de zelfde werkmap, of moet ik dan de code aanpassen.?

 

[JEC.]

Dan kopieer je de code naar het gewenste tabje

 

[Speedsurfer]

Verder uitgetest, leek goed te gaan.
Op tabje "Klantenlijst" vanaf regel 7 - Klantnr. 11 en verder naar boven reageert de verwerking afwijkend.
En geeft dan de bovenste regel weer.

 

[HSV]

Dit lijkt beter te gaan.

 

[Speedsurfer]

Klopt inderdaad.
Lijkt beter te gaan.
Komt dit door de opmaak in de cel.?
Lettertype - Vet oid.?

 

[HSV]

Ik heb alle hyperlinks verwijderd in klantenlijst.
Door een nieuwe nummer toe te voegen in blad klanten worden er weer hyperlinks van gemaakt.

Je mag ze best vet maken en een kleurtje geven.

 

[Speedsurfer]

Dank voor de geboden hulp tot dusver.

Ik dacht, ik kopieer de code naar andere tabs om zo een soort,
heen en weer te creëren tussen de verschillende Hyperlinks op de verschillende tabs.
maar helaas dit gaat kennelijk niet ongestraft.

Is dit mogelijk.

 

[HSV]

Er is van alles mogelijk als je aangeeft met hoe of wat.

 

[Speedsurfer]

In de klantenlijst staan hyperlinks die nu werken, en verwijzen naar tab Klantenkaart.
op die klantenkaart staan wederom hyperlinks die weer door moeten verwijzen naar een artikelkaart.

 

[HSV]

Het spijt me, ik zie noch een hyperlink in Klantenkaart noch een artikelkaart.