Popravdě, zvládnul jsem jenom vyvolat náhodné číslo a ani to nefunguje.
Private Sub CommandButton1_Click()
Range("G89").Select
ActiveCell.FormulaR1C1 = "=randbetween (2,12)"
End Sub
Popravdě, zvládnul jsem jenom vyvolat náhodné číslo a ani to nefunguje.
Private Sub CommandButton1_Click()
Range("G89").Select
ActiveCell.FormulaR1C1 = "=randbetween (2,12)"
End Sub