Herminator
Nieuwe gebruiker
- Lid geworden
- 22 apr 2018
- Berichten
- 1
hoi,
Ik heb onderstaande VBA code gevonden op het internet, dit probeer ik nu aan te passen en daar loop ik op vast.
Sub waardes()
'
' waardes Macro
'
Range("A1").Select
While Not IsEmpty(ActiveCell.Value)
Range("C1").Value = ActiveCell.Value
For i = 1 To 10000000
Next
ActiveCell.Offset(1, 0).Select
Wend
End Sub
Wat ik graag wil is dat tevens B2 geselecteerd wordt. Dat zou dan middels Range("A1:B1").Select kunnen, en dat in cel D1 de laatst gekozen waarde van rij B komt te staan. Voor Rij A werkt dit wel goed, hier komt steeds de laatst gekozen waarde in cel C1 te staan.
Misschien dat dit ook niet de manier is om meerdere kolommen af te gaan maar ik kom er even niet uit.
Groet Herman
Ik heb onderstaande VBA code gevonden op het internet, dit probeer ik nu aan te passen en daar loop ik op vast.
Sub waardes()
'
' waardes Macro
'
Range("A1").Select
While Not IsEmpty(ActiveCell.Value)
Range("C1").Value = ActiveCell.Value
For i = 1 To 10000000
Next
ActiveCell.Offset(1, 0).Select
Wend
End Sub
Wat ik graag wil is dat tevens B2 geselecteerd wordt. Dat zou dan middels Range("A1:B1").Select kunnen, en dat in cel D1 de laatst gekozen waarde van rij B komt te staan. Voor Rij A werkt dit wel goed, hier komt steeds de laatst gekozen waarde in cel C1 te staan.
Misschien dat dit ook niet de manier is om meerdere kolommen af te gaan maar ik kom er even niet uit.
Groet Herman
Laatst bewerkt: