根治性颈清扫术随机函数

根治性颈清扫术的随机函数是一个简短的代码段显示了如何有效根治性颈清扫术的随机函数的VBA宏的工作。

解释

该方案在随机变化,在细胞colorindex的Excel工作表,单元也是随机选择一个随机选择的列,并在预定的范围内随机行。

在Excel的文件都可以下载可在此网页底部!

Sub Random_FunctionRND()

For lups = 1 To 10000
    Randomize
    Color2 = Int((50 * Rnd) + 1)
    Row = Int((25 * Rnd) + 1)
    Column = Int((25 * Rnd) + 1)
    Range("G2").Offset(Row - 1, Column - 1).Interior.ColorIndex = Color2
Next

End Sub

 

 

 

下载Excel文件!Random_Function_Rnd.xls

 

Add your comment

Your name:
Subject:
Comment: