hyperlink en layout

[Lampje3]

Ik werk met een behoorlijk groot excel-bestand (meerdere tabbladen en veel pagina's onder elkaar) waarin ik dus een index heb gecreerd om zo via hyperlinks snel dat deel van het document op te zoeken wat je nodig hebt. Als je een hyperlink uit mijn index volgt, dan springt hij keurig naar de juiste plaats (de namen zijn gedefinieerd) maar hij plaatst die wel helemaal onderin het beeldscherm en dat staat niet mooi. Aangezien het document ook door klanten gebruikt wordt, wil ik graag dat hij hem bovenin wegzet, maar ik kan in Excel niet vinden hoe ik daar invloed op heb.
Ik moet bekennen dat ik een beginner ben, maar ik heb al wel heel wat tijd gestoken naar het zoeken naar een oplossing. Ik heb al geprobeerd om i.p.v. alleen de naam te definieren een bereik te definieren, maar het blijft er wat knullig uitzien, want de onderste regel van het bereik valt dan nog steeds aan de onderkant van het document.
Van macro's weet ik niks af helaas.
Kan iemand mij hiermee helpen of moet ik gewoon accepteren dat dit in Excel niet netjes geregeld is?

Met vriendelijke groet,
Ceciel

 

[danny147]

Beste Lampje3

Zonder bestandje is het moeilijk, maar ga eens met de RMK op de link staan ga dan naar Hyperlink bewerken en bij adres zet je achteraan 30 regels bij Vb. #Blad1!A31 wordt dan #Blad1!A61, dit hangt af hoe hoog je rijen zijn.

Groetjes Danny. :thumb:

 

[Lampje3]

Dank je voor je reactie.
Het nadeel hiervan (en het voordeel van namen definiëren) is dat je geen regels meer kunt tussenvoegen/verwijderen zonder dat de layout weer scheef gaat.

Met vriendelijke groet,
Ceciel

 

[Lampje3]

Door dit forum eens op alfabeth te bekijken en dan alle vragen over hyperlinks na te lopen, ontdekte ik dat iemand al eens eerder tegen dit probleem is aangelopen. Daar stond dus ook mijn oplossing en die wil ik hier ook nog even kwijt:

Op de tab van je werkblad gaan staan en met de rechtermuisknop kiezen voor programmacode weergeven. Dan opent een Microsoft Visual Basic venster.

Kies voor FollowHyperlink in het rechter uitrolmenuutje en voeg onderstaande code toe:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
With ActiveWindow
.ScrollRow = ActiveCell.Row
.ScrollColumn = ActiveCell.Column
End With
End Sub

Het werkt perfect en ik had het nooit zelf kunnen verzinnen.

Met vriendelijke groet,
Ceciel

 

[Ginger]

Zo zie je maar weer wat een schat aan kostbare informatie er in opgeloste vragen is opgeslagen!

@Lampje3, Goed gedaan! En nog bedankt voor je reactie! :thumb:

Groet, Leo

 

[Lampje3]

Nog een kleine toevoeging:
Ik ontdekte nog wel dat je in Excel wel de macrobeveiliging op laag moet hebben staan, want anders werkt het dus niet.
Dus of het straks bij klanten wel of niet werkt gaat van hun eigen instellingen afhangen.

Met vriendelijke groet,
Ceciel