Hvordan genererer jeg 7 tilfældige værdier i 7 celler baseret på værdierne 1-7

Her er en VBA kode, som du kan bruge til at lave 7 forskellige tal.

Sub Generertal()
    Dim Numbers(1 To 7) As Integer
    Dim i As Integer, j As Integer, Temp As Integer
   
    'Array med tal fra 1 til 7
    For i = 1 To 7
        Numbers(i) = i
    Next i
   
    'Her blandes array'et, for at generere tilfældige tal uden gentagelser
    For i = 7 To 2 Step -1
        j = Application.WorksheetFunction.RandBetween(1, i)
        Temp = Numbers(i)
        Numbers(i) = Numbers(j)
        Numbers(j) = Temp
    Next i
   
    'Placering af de tilfældige tal i cellerne A1 til A7 (kan ændres)
    For i = 1 To 7
        Cells(i, 1).Value = Numbers(i) 'Skift tallet i "Cells(i, 1)" til ønsket kolonne nr.
    Next i
End Sub

Din sidste er en nogenlunde fin metode, jeg tror dog du skal i to forskellige kolonner for at få det til at virke.
Udfordringen er hvis du vil have unikke værdier, så skal du i en lidt anden metode - her er et eksempel:
=SORTBY(SEQUENCE(7);RANDARRAY(7))
Den danner 7 rækker nedaf med 1-7 i forskellig rækkefølge.

Jeg følger lige lidt med på sidelinien, da jeg engang i mellem har behov for næsten samme system.

Jeg har prøvet at lave den dansk :

=SORTER.EFTER(SEKVENS(7);SLUMPMATRIX(7))

og det virker!

Nå jeg så skal skifte numre sletter jeg bare de nederste 6 linier og - vupti! - 7 nye tal i tilfældig orden dukker op.

@jernrosen
Eller tryk på F9.

Tak for indspark til jer alle..
Jeg testede og fandt jernrosen3's forslag perfekt og ligetil..

Mvh martens

Godt du fik den oversat ;-)

@ Kim1a : Det var vist jernrosen3, der gjorde det 😀