Cel selecteren en betreffende regel bovenaan het blad plaatsen

Status
Niet open voor verdere reacties.

Robert Smidt

Gebruiker
Lid geworden
26 mei 2009
Berichten
947
Beste Forumleden,

Na lang op dit forum te hebben gezocht, stel ik toch maar de volgende vraag:

Ik heb in Excel een werkblad waar de eerste 17 regels geblokkeerd staan, verder bestaat het blad uit een honderden regels. Nu wil ik graag snel, via een vba-code, de betreffende cel selecteren en dat deze niet, zoals nu, in het midden van het scherm zichtbaar wordt, maar in de bovenste positie geplaatst wordt, dus direct onder de geblokkeerde regel 17.
Code:
Sub selecteren()
[A611].Select
End Sub

Een antwoord zie ik met veel belangstelling tegemoet,

Alvast super bedankt.

Robert
 
Code:
Sub selecteren()
application.goto [A611],true
End Sub
 
Of bedoel je rij 611 te verplaatsen naar rij 18?
Code:
Sub selecteren()
    Range("A611").EntireRow.Cut
    Rows("18:18").Insert Shift:=xlDown
End Sub
 
Niet overdrijven @Ed, een 18 is ook genoeg.:p
 
Voor de zekerheid ;)
 
Heren,

Op de eerste plaats heel hartelijk bedankt voor jullie bijdrage.

De oplossing van Harry is hetgeen ik bedoelde en werkt perfect. De andere oplossing neem ik zeker mee wanneer ik in een dergelijke situatie terecht kom.

Allen, nogmaals heel hartelijk dank.
 
@Robert, je mag jouw vraag nu als opgelost kenbaar maken. Dus rood vraagteken wordt dan een groen vinkje.
Zo houden we het forum overzichtelijk wanneer het om onopgeloste vragen zou gaan.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan