excell random invullen

[mattheijer]

Vraag:
Ik heb in een excell op D3 tm D47 de getallen van 1 tm 45 staan.
Nu zou ik deze getallen door elkaar heen gehusseld willen hebben dus bijvoorbeeld op d3 nr 40.
Ik heb echt geen idee waar te beginnen en of het uberhaupt mogelijk is.

Hoop dat iemand hier de oplossing heeft.

 

[edmoor]

Deze functie:
=ASELECTTUSSEN(1;45)

 

[mattheijer]

maar dan kan het gebeuren dat er in die reeks een getal dubbel komt te staan toch ?

 

[VenA]

Gebruik een extra kolom met daarin =RAND() en sorteer er vervolgens op.

 

[mattheijer]

Gebruik een extra kolom met daarin =RAND() en sorteer er vervolgens op.

en dan ?

 

[VenA]

Dan heb je de getallen in een willekeurige volgorde staan.

 

[snb]

Sub M_snb()
   [D3:D47]="=rand()"
   [D3:D47]=[index(rank(D3:D47,D3:D47),)]
End Sub

 

[mattheijer]

Sub M_snb()
   [D3:D47]="=rand()"
   [D3:D47]=[index(rank(D3:D47,D3:D47),)]
End Sub

Wow deze is ook handig.
Bedankt ik ben eruit

 

[gast0660]

Hier heb je er nog een.
Wij als helpers houden ervan om GEEN vbtje te krijgen, dan kunnen we alles er zelf in kloppen.:evil:
Druk op het knopje tot uw vingers pijn doen.

 

[mattheijer]

Hier heb je er nog een.
Wij als helpers houden ervan om GEEN vbtje te krijgen, dan kunnen we alles er zelf in kloppen.:evil:
Druk op het knopje tot uw vingers pijn doen.

ik snap u even niet maar dat zal aan mij liggen ?

 

[gast0660]

@snb, deze komt ook van de" tussen de oren winkel" neem ik aan.

 

[gast0660]

@ matthh....

Druk op het knopje tot uw vingers pijn doen.

Hiermee bedoel ik iedere keer dat je op het knopje drukt de cijfers door elkaar worden gegooid. (geen probleem)
Echter met deze:

Wij als helpers houden ervan om GEEN vbtje te krijgen, dan kunnen we alles er zelf in kloppen.

We moeten gewoon dagelijks vragen waar is een gelijkend vb bestandje. (soms ben ik het gewoon moe)
Dus een tip bij uw volgende vraag, post een gelijkend vb bestandje dan wordt je sneller en gerichter geholpen.

 

[snb]

@dotch

Ja, het was gelukkig koopzondag...

 

[harrydlk]

Code is ook voor mij zeer interessant
Is het mogelijk getal 47 te vervangen door een variabele of de waarde van een cel?

 

[snb]

Sub M_snb()
   y=214
   cells(1).resize(y).name="snb"
   [snb]="=rand()"
   [snb]=[index(rank(snb,snb),)]
End Sub

PS. Net voor sluitingstijd....

 

[harrydlk]

Sub M_snb()
   y=214
   cells(1).resize(y).name="snb"
   [snb]="=rand()"
   [snb]=[index(rank(snb,snb),)]
End Sub

PS. Net voor sluitingstijd....

Geweldig net wat ik zocht, bedankt
Een dag niets geleerd, is een dag niet geleefd.