• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

verticaal zoeken naar lege regel

Status
Niet open voor verdere reacties.

jong.braster

Gebruiker
Lid geworden
15 feb 2003
Berichten
203
Ik heb een werkblad met 1000 regels die voor een deel ingevuld zijn. Als ik nieuwe informatie hierop wil invullen moet ik scrollen naar de eerstvolgende lege regel.
Is het mogelijk om, met behulp van een knop, direct de cursor naar de eerstvolgende lege regel te brengen.
 
End, cursor naar beneden.
Dan kom je op de laatste ingevoerde veld daaronder staat het eerstvolgende lege cel.
Zo sorteren niet iets zijn zodat de lege zellen er tussen uit zijn.
 
CTRL END is voor het einde van het document niet de eerstvolgende lege cel ;)
 
Sorry, ik zal wat duidelijker zijn.
Het werkblad bestaat uit meerdere kolommen. Sommige kolommen zijn geheel ingevuld.
Ik wil dus in een bepaalde kolom (altijd de zelfde kolom) naar de eerst volgende lege cel.

groetjes
 
Sorry, ik zal wat duidelijker zijn.
Het werkblad bestaat uit meerdere kolommen. Sommige kolommen zijn geheel ingevuld.
Ik wil dus in een bepaalde kolom (altijd de zelfde kolom) naar de eerst volgende lege cel.

groetjes

Ctrl-cursor naar beneden.

Wigi
 
Het kan ook met een code

Sheets("Blad1").Select
Range("A65535").End(xlUp).Offset(1, 1).Select

Hierbij zoekt hij automatisch naar de eerste lege cel in de kolom, werkt altijd:D
 
Hierbij zoekt hij automatisch naar de eerste lege cel in de kolom, werkt altijd:D

Hier moet ik je tegenspreken, dit werkt niet altijd.

In Excel 2007 zal je meer dan 65536 rijen kunnen hebben...

Iemand die dan veel rijen gebruikt kan dan een verkeerde cel selecteren.

BTW,

Code:
Sheets("Blad1").Select

kan weg als je al in Blad1 bent.

Wigi
 
Just for making the post more accurate.

Iets meer voor de toekomst:
Code:
Range("A" & Rows.Count).End(xlUp).Offset(1,0).Select

Groet,
Ferenc

ps,
Range("A65535").End(xlUp).Offset(1, 0).Select geeft de cel in dezelfde kolom, bij Japsur gaan we nog een kolom naar rechts :)
 
Laatst bewerkt:
Ik ben blij dat jullie hierover een discussie voeren.Leerzaam voor mij.
Als ik deze formule in een macro plaatst, worden alle "gevulde"cellen in een kolom geselecteerd, maar de cursor gaat niet naar beneden.
Wat doe ik fout?

Sub Macro1()
'
' Macro1 Macro
' De macro is opgenomen op 5-12-2006 door .
'
' Sneltoets: CTRL+a
' Range("A" & Rows.Count).End(xlUp).Offset(1,0).Select
End Sub
 
Ik ben blij dat jullie hierover een discussie voeren.Leerzaam voor mij.
Als ik deze formule in een macro plaatst, worden alle "gevulde"cellen in een kolom geselecteerd, maar de cursor gaat niet naar beneden.
Wat doe ik fout?

Sub Macro1()
'
' Macro1 Macro
' De macro is opgenomen op 5-12-2006 door .
'
' Sneltoets: CTRL+a
' Range("A" & Rows.Count).End(xlUp).Offset(1,0).Select
End Sub

Selecteer je misschien al cellen voordat je de macro laat uitvoeren?
 
jong.braster

Ctrl+ a is voorbehouden aan windows voor 'Select all'.
Het is beter om een ander combi te verzinnen om verwarring te voorkomen.

Groet,
Ferenc
 
jong.braster

Ctrl+ a is voorbehouden aan windows voor 'Select all'.
Het is beter om een ander combi te verzinnen om verwarring te voorkomen.

Groet,
Ferenc

Dan nog, hebben de zelf gemaakte macro's geen voorrang qua uitvoering? Al is het niet slim om Ctrl-P, A, O of N te nemen, ik dacht wel dat dat mogelijk was.
 
Wigi,

Je hebt gelijk. De zelfgemaakt macro's zullen voorrang krijgen.
Maar, bij mij werken deze sneltoetsen alleen als ik deze mbv de recorder heb opgenomen en daarna de juiste code eraan heb gehangen.

Misschien zit hier de fout in bij jong.braster.

@jong.braster
Heb jij wel deze sneltoetsen mbv de recorder gemaakt of met de hand ingevoerd?


Groet,
Ferenc
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan