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

rijen overslaan en automatisch nummeren

Status
Niet open voor verdere reacties.
J

Jongbloedvos

Gebruiker
Lid geworden
30 dec 2019
Berichten
9
Goedemorgen,

kan iemand me helpen met het volgende?
Ik zoek een formule of VBA code waarmee excel automatisch een aantal rijen overslaat en dan een aantal keer hetzelfde nummer invoert;

in de cel A3:A11 komt een 1 te staan, vervolgens wil ik 7 rijen overslaan
En dan in A19:A27 een 2

Dan weer 7 rijen overslaan en dan in A35:A43

Zoals in het voorbeeld, ik heb zelf t/m nummer 7 al ingevuld (handmatig uiteraard).
De bedoeling is dat de formule/code dit nummert t/m nummer 300.

Alle hulp is welkom!

Grt Rudolf
 

Bijlagen

  • rijen overslaan en doornummeren.xlsx
    11,5 KB · Weergaven: 20
Een lange code heb je daar niet voor nodig:
Code: 
Sub auto_nummeren()
For i = 1 To 300
    Cells((((i - 1) * 16) + 3), 2).Resize(9) = i
Next i
End Sub
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan