Helpmij.nl
Helpmij.nl
Helpmij.nl
Steun Helpmij.nl! Klik hier     Computerprobleem? Klik hier!

Quote

Weergeven resultaten 1 tot 8 van 8

Onderwerp: Automatisch opnummering

  1. #1
    Junior Member
    Geregistreerd
    7 januari 2016
    Vraag is opgelost

    Automatisch opnummering

    Ik heb een heel simpele vraag, maar ik kom er zelf niet helemaal uit. Ik ben bezig met het opzetten van een artikelenbestand in Excel. Heel simpel gezegd "Kolom A" = artikelnummer en "Kolom B" = Artikelomschrijving.
    Nu wil ik het zo laten werken dat als je iets typt in kolom B en je drukt op Enter dat Kolom A dan automatisch wordt gevuld met het laatste getal +1. Beter gezegd met het hoogste getal dat voor komt in Kolom A +1, omdat ik ook de mogelijkheid wil hebben om rijen toe te voegen (invoegen) op den duur en niet heel de nummering door elkaar gaat. Dus eenmaal een nummer gekregen kan deze niet meer wijzigen.

    Hopelijk ben ik zo een beetje duidelijk.

    Gr. Rogier
    Laatst aangepast door Rombo4 : 16 mei 2019 om 14:58

  2. #2
    Giga Honourable Senior Member
    Geregistreerd
    2 maart 2013
    Code:
    Private Sub Worksheet_Change(ByVal Target As Range)
      If Target.Column = 2 And Target.Count = 1 Then
        Target.Offset(, -1) = IIf(Target.Offset(, -1) = "", Application.Max(Columns(1)) + 1, Target.Offset(, -1))
      End If
    End Sub
    Je kan een paard naar het water leiden, maar je kan het niet dwingen te drinken.

  3. #3
    Junior Member
    Geregistreerd
    7 januari 2016
    nog een dom vraagje waar vul ik die code in?

  4. #4
    Giga Honourable Senior Member
    Geregistreerd
    2 maart 2013
    In het niet geplaatste bestand? In de module van de tab waar dit van toepassing moet zijn.
    Je kan een paard naar het water leiden, maar je kan het niet dwingen te drinken.

  5. #5
    Junior Member
    Geregistreerd
    7 januari 2016

    bestand

    Sorry hierbij het bestand.
    Bijgevoegde bestanden Bijgevoegde bestanden

  6. #6
    Giga Honourable Senior Member
    Geregistreerd
    2 maart 2013
    Dat kan je er zelf toch wel even inzetten? Zal in het linkje wel uitgelegd staan. https://www.dummies.com/programming/...s-cheat-sheet/
    Je kan een paard naar het water leiden, maar je kan het niet dwingen te drinken.

  7. #7
    Senior Member
    Geregistreerd
    1 juli 2016
    Locatie
    Rotterdam
    Afstand tot server
    ±151 km
    Ok hierbij een helpende hand met de code van VenA
    Bijgevoegde bestanden Bijgevoegde bestanden
    Met vriendelijke groet,
    Willem

  8. #8
    Junior Member
    Geregistreerd
    7 januari 2016
    Dank u Loek010 en VenA. Ik kan er mee verder nu

Berichtenregels

  • U mag geen nieuwe vragen starten.
  • U mag niet reageren op berichten.
  • U mag geen bijlagen versturen.
  • U mag uw berichten niet bewerken.
  •  
Helpmij.nl
Helpmij.nl

Helpmij.nl en business

Partners
Sponsoren