Excel: Slump og genberegning af ark

En m ulighed er at bruge en stump kode til at generere det tilfældige tal, så A2 kun indeholder et tal, ikke en formel.

Du kan fx lægge denne kode i arkets kodemodul. så genereres der et nyt tilfældigt tal i A2, når der rettes i A1, og kun, når der rettes i A1.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target = Range("a1") Then
        limit = Range("a1").Value
        Randomize
        a = Rnd()
        a = CInt(a * limit)
        If a = 0 Then
            a = 1
        Else
            a = a
        End If

        Range("a2").Value = a
    End If
End Sub

Hm... Jeg har aldrig prøvet at kode noget i excel. Men jeg tror jeg simplificerede problemet for meget i min beskrivelse hvis jeg skal bruge denne løsning.

Jeg har en kolonne (A:A) som indeholder en kolonne med strenge. I en matrix er der en oversættelse af disse strenge til tal (f.eks. 20 eller 10 etc). På baggrund af disse tal skal der i kolonne C beregnes et antal vilkårlige tal mellem 1 og tallen i den tilsvarende række i A.

Altså
A            B                C
20                            12
20                              1
10                            10

mv

Kan det lade sig gøre?

Det tror jeg godt det kan, men så kan det ikke ske automatisk som anført ovenfor. Så er du nok nødt til selv at aktivere makroen.

Læg denne makro i et modul:

Sub TilTal()
    For Each c In ActiveSheet.UsedRange.Columns("A:A").Cells
       

        l = c.Value
        Randomize
        a = Rnd()
        a = CInt(a * l)
        If a = 0 Then
            a = 1
        Else
            a = a
        End If

        c.Offset(0, 2).Value = a
    Next c
   
End Sub

Afspil makroen når du har dine tal i A-kolonnen klar. Den indsætter så et tilfældigt tal mellem 1 og værdien i An i den tilsvarende celle i C-kolonnen.