Heren & Dames,
Ik wil graag een macro maken met een random nummer in de cellen.
enkel mag deze alleen toegevoegd worden als er waardes in cellen staan op een rij.
Deze moet stoppen bij de laatste rij welke is ingevuld.
Ik heb al een stukje code welke ik wil gebruiken maar krijg het niet goed in deze macro.
Wie kan mij helpen!
Ik wil graag een macro maken met een random nummer in de cellen.
enkel mag deze alleen toegevoegd worden als er waardes in cellen staan op een rij.
Deze moet stoppen bij de laatste rij welke is ingevuld.
Ik heb al een stukje code welke ik wil gebruiken maar krijg het niet goed in deze macro.
Code:
Range("B7:AJ" & Range("C" & Rows.Count).End(xlUp).Row).Select
Selection.SpecialCells(xlCellTypeVisible).Select
Code:
Sub RandomNR()
Dim r As Range
Set r = Range("C7:C5000")
With r
.Formula = "=randbetween(0,10000)"
.Copy
.PasteSpecial (xlPasteValues)
End With
End Sub
Wie kan mij helpen!
Laatst bewerkt: