• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Opgelost Tekst vastzetten na random naamvolgorde

Dit topic is als opgelost gemarkeerd

Robocops

Gebruiker
Lid geworden
9 sep 2025
Berichten
6
Goedemiddag,
Voor een biljartcompetitie wil ik graag het eea automatisch uit laten voeren door excel. Ik heb hiervoor 4 namen in kolom A gezet en daarnaast in kolom B de volgende formule gezet: =SORTEREN.OP(A5:A8;ASELECT.MATRIX(AANTALARG(A5:A8)))
Elke keer als ik iets uitvoer zet hij dan de vier namen van kolom A in willekeurige volgorde in kolom B. Tot zover alles goed. Nu wil ik elders in het werkblad in een bepaalde cel een speeldatum invoeren, waarna de vier willekeurig gekozen namen ernaast komen te staan als speelvolgorde. Dit doe ik met de opdracht:
=ALS(C12="";"";B5)
Als het datumvak dus leeg is, zijn de vier vakken ernaast ook leeg. Zodra een datum wordt ingevuld worden de vier namen uit kolom B dus weergegeven rechts van de datum. Hoe kan ik er nu voor zorgen dat deze namen daarna niet meer mee veranderen met de nieuwe namen in kolom B na een invoer, maar bij een nieuwe datum eronder wel weer vier willekeurige namen komen te staan? Ik hoop dat jullie mijn vraag begrijpen, anders hoor ik het graag. Alvast bedankt voor het antwoorden.
 
Dat zal via VBA moeten want de aselect functie doet bij elke invoer een nieuwe berekening en dat wil je niet.
Dit laat ik graag over aan onze VBA specialisten.
 
Plaats je geanonimiseerde voorbeeld eens hier.
 
Dank voor je antwoord Popipipo. Ik weet niet wat VBA inhoudt, maar ik zal het eens opzoeken. Hoop dat er ook andere oplossingen voor zijn te bedenken....
Bericht automatisch samengevoegd:

@ AHulpje:
 

Bijlagen

Laatst bewerkt:
Met een macro (=VBA). Als in kolom C iets wordt ingetikt en kolom D in dezelfde rij is nog niet gevuld dan worden D t/m G gevuld en wijzigen daarna niet meer.
 

Bijlagen

Of even evalueren.
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
    With Target
        If .Count = 1 Then
            If .Column = 3 And .Offset(, 1) = "" Then .Offset(, 1).Resize(, 4) = [transpose(sortby(bron,randarray(counta(bron))))]
        End If
    End With
End Sub

Of i.p.v. [transpose] → [torow]
 
Laatst bewerkt:
Met een macro (=VBA). Als in kolom C iets wordt ingetikt en kolom D in dezelfde rij is nog niet gevuld dan worden D t/m G gevuld en wijzigen daarna niet meer.
Hier kan ik wel iets mee denk ik, dankjewel!!! Op mijn windows PC werkt dit goed, maar mijn Ipad Pro geeft aan dat in de versie die ik heb van Excel geen VBA-macro's kunnen worden uitgevoerd. Weet je misschien hoe ik dit wel op de Ipad werkend kan krijgen? Bij voorbaat dank alweer.
 
Helaas, dat werkt inderdaad niet op een ipad.
Je zou met de hand de namen die door
Code:
=SORTEREN.OP(A5:A8;ASELECT.MATRIX(AANTALARG(A5:A8)))
worden gegenereerd als waarden over zichzelf heen kunnen plakken.
 
Dat ziet er imposant uit, maar gaat ver boven mijn kennis op dit moment. Toch bedankt, is altijd interessant.
Bericht automatisch samengevoegd:

Helaas, dat werkt inderdaad niet op een ipad.
Je zou met de hand de namen die door
Code:
=SORTEREN.OP(A5:A8;ASELECT.MATRIX(AANTALARG(A5:A8)))
worden gegenereerd als waarden over zichzelf heen kunnen plakken.
Helder, nogmaals dank.
 
Terug
Bovenaan Onderaan