How to make a program that others can run with minimum fuss for Calc?

edit

Hello,

here is your programm as a BASIC macro. Just put it into Tools -> Macros -> "Edit Macros" and you can call it from inside any cell via

=DCALC(5,10,10,2)

Here the macro:

Function DIE(uBound As Double)
    DIE=(CInt(1.0 + Rnd() * (uBound - 1.0)))
End Function

Function DCALC(num1 as Integer, num2 as Integer, num3 as Integer, num4 as Integer)
    Randomize() rem init rnd seed with system timer
    Dim damage as Integer   
    damage = 0
    For i = 0 To num1
        damage = damage + DIE(num2)
    Next
    damage = damage + (num3*num4)
    DCALC=damage
End Function

Hope that helps.

To show the community your question has been answered, click the ✓ next to the correct answer, and "upvote" by clicking on the ^ arrow of any helpful answers. These are the mechanisms for communicating the quality of the Q&A on this site. Thanks!

Have a nice day and let's (continue to) "Be excellent to each other!"