• 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.

VBA ten opzichte van huidige cel meerdere cellen selecteren

Status
Niet open voor verdere reacties.

PeterCorn

Gebruiker
Lid geworden
13 dec 2015
Berichten
16
Hoi,

Graag wil ik dat er een aantal cellen geselecteerd wordt vanaf de huidige positie (cel).
de code: ActiveCell.Offset(2, 9).Range("A1").Select verspringt naar rechts (9x), en omlaag (2x).
Ik wil graag dat de code dit hele gebied selecteert.

Hoe doe ik dit?

ps ik ben niet thuis in VBA, en na 2 uur zoeken plaats ik dus maar weer een vraag bij jullie.
 
Test dit eens:
ActiveCell.Resize(2, 9).Select

Maar wat moet er gebeuren met dat gebied?
Misschien heb je de .Select niet eens nodig.
 
Laatst bewerkt:
Beste Edmoor,
bedankt voor je reactie.
Ik denk dat de selectie wel nodig is, hoewel ik niet eens weet waarvoor het staat.
Maar de originele code is:

Sub cellenverwijderen()
Range("B17:J18").Select
Selection.Delete Shift:=xlUp
End Sub

In plaats van de range-line heb ik jouw code ingevoerd. Werkt Prima !!

Bedankt !!
 
Ok. Maar dan is die .Select dus inderdaad niet nodig. Doe het maar eens zo:
Range("B17:J18").Resize(2, 9).Delete Shift:=xlUp

Het advies is altijd om .Select en .Activate zoveel mogelijk te vermijden.
Vandaar mijn opmerking erover.
 
Laatst bewerkt:
Beste edmoor,

jouw oplossing werkte al helemaal goed, maar als het netter kan, ga ik ervoor.
Daarom heb ik de code Range("B17:J18").Resize(2, 9).Delete Shift:=xlUp getest, en dat ging niet goed.
Deze verwijdert alle cellen in B17-J18, terwijl dit juist niet de bedoeling is.
vandaar mijn (eerste) vraag; vanaf de huidige positie (de B17-J18 verandert elke keer weer).

Ik houd het voorlopig op jouw eerste antwoord.
 
Dan kan je in Range("B17:J18").Resize(2, 9).Delete Shift:=xlUp die Range("B17:J18") dus variabel maken, waarbij waarschijnlijk 1 cel al voldoende is.
 
Tja,

dat is dus het verschil tussen een pro (jij) en een beginner (ik). Ik heb geen idee hoe ik dat voor elkaar krijg.
het begin cel (in dit geval B17), kan ook B25, B27, of lager zijn. Dat is afhankelijk hoe vaak ik een selectie ergens wil wissen.
De selectie wissen verschilt ook per keer (meerdere rijhoogten), maar daarvoor gebruikt ik dan meerdere macro's. En dat werkt prima.
 
De info is bedoeld om je ook richting "pro" te helpen :)
 
Ha ha ha, je hebt helemaal gelijk. Dank voor al je reacties.
Nou, ik zal er weer eens in gaan duiken!

Bedankt en nog een fijne avond.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan