Toon posts:

plant nummering maken aan de hand van een cijfer in cel

Pagina: 1
Acties:

Onderwerpen

Vraag


Acties:
  • 0 Henk 'm!

Verwijderd

Topicstarter
ik heb 200 rassen en deze zaai ik uit
vervolgens wil ik excel plant labels maken
van ras 1 heb ik 12 planten
van ras 2 heb ik 14 planten
nu wil ik een lijst hebben met
ras1-1
ras1-2
t/m
ras1-12
en
ras2-1
ras2-2
t/m
ras2-14
is dit op een simple manier te doen?

Alle reacties


Acties:
  • 0 Henk 'm!

  • MAX3400
  • Registratie: Mei 2003
  • Laatst online: 27-09 22:07

MAX3400

XBL: OctagonQontrol

Klinkt vergelijkbaar als de vraagstelling in ID genereren met Excel.

Maar als je de eerste 2 regels handmatig intikt, kan je daarna toch beide cellen selecteren, naar beneden doorslepen en een beetje Excel telt dan zelf door?

Het kan ook zijn dat ik iets mis in de vraagstelling maar mogelijk dat je het dan iets wil verduidelijken of uitwerken waar je nu precies naar op zoek bent?

Mijn advertenties!!! | Mijn antwoorden zijn vaak niet snowflake-proof


  • Jester-NL
  • Registratie: Januari 2003
  • Niet online

Jester-NL

... pakt een botte bijl

Met ^^ @MAX3400
Eigenlijk zijn alle andere handelingen meer werk (zeker als je de kennis niet hebt) dan gewoon de basisfunctionaliteiten van Excel gebruiken

The sky above the port was the color of television, turned to a dead channel
me @ last.fm


  • breew
  • Registratie: April 2014
  • Laatst online: 20:55
vba to the rescue :)

In del A1:B2 staan de brongegevens.. Vanaf D1 wordt de inhoud automatisch door de macro gegenereerd.

Afbeeldingslocatie: https://tweakers.net/ext/f/HClbHrwh64zldbUQSXA4TG8i/full.png

Hieronder het proof-of-concept...
Uiteraard kun je dit nog vele malen mooier/dynamischer maken, maar het idee moge duidelijk zijn.

Visual Basic:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Option Explicit

Sub maakId()

  Dim rngID As Range, c As Range
  Dim lonAantal As Long, i As Long, j As Long
  
  Set rngID = ActiveSheet.Range("A1:A2")
  
  For Each c In rngID
    For i = 1 To c.Offset(0, 1).Value
      c.Offset(j, 3).Value = "'" & c.Value & "-" & i
      j = j + 1
    Next i
  Next c

End Sub

[ Voor 3% gewijzigd door breew op 06-09-2018 09:07 ]


  • heuveltje
  • Registratie: Februari 2000
  • Laatst online: 19:59

heuveltje

KoelkastFilosoof

MAX3400 schreef op woensdag 5 september 2018 @ 21:04:
Klinkt vergelijkbaar als de vraagstelling in ID genereren met Excel.

Maar als je de eerste 2 regels handmatig intikt, kan je daarna toch beide cellen selecteren, naar beneden doorslepen en een beetje Excel telt dan zelf door?

Het kan ook zijn dat ik iets mis in de vraagstelling maar mogelijk dat je het dan iets wil verduidelijken of uitwerken waar je nu precies naar op zoek bent?
Dat kan, maar voor 2000 rassen, x 10 rijen word dat vrij bewerkzaam :)
Overigens zou ik zowiezo al voor een andere indeling gaan, want 3000 rijen in excel is niet erg overzichtelijk meer. ............

Heuveltjes CPU geschiedenis door de jaren heen : AMD 486dx4 100, Cyrix PR166+, Intel P233MMX, Intel Celeron 366Mhz, AMD K6-450, AMD duron 600, AMD Thunderbird 1200mhz, AMD Athlon 64 x2 5600, AMD Phenom X3 720, Intel i5 4460, AMD Ryzen 5 3600 5800x3d