Excel 获取3x3表中的随机数或更大的随机数

请广告和支持读者

我有一个编号为1-9的3x3表格，如附件所示

现在我如何得到E1列中所示的表中的随机数

---

还有一点升级（对我自己来说），例如：E1随机单元B2-即6（根据他的图片）-总是用相同的墨水B2

---

您可以使用以下代码作为随机数生成器，并在单元格E1上打印结果

Sub random_num()

'Initialize the random number generator
Randomize

Dim wk As Worksheet
Set wk = ThisWorkbook.Sheets("x")

'Random whole number between 1 and 9 :
random_number = Int(9 * Rnd) + 1

wk.Cells(1, "E").Value = random_number

End Sub

---

若要从表中实际获取随机值，可以在E1中使用此公式，该表可能并不总是包含数字1到9

=索引（$A$1:$C$3，randtween（1,3），randtween（1,3））

对于不同大小的表，可以使用此通用公式

=索引（表，randtween（1，行（表）），randtween（1，列（表）））

您可以使用条件格式突出显示拾取的数字

选择范围

A1:C3

，并使用此公式应用条件格式

=A1=$E$1

---

格式按要求

“始终使用相同的墨水B”-什么？？？

Int（（9-1+1）*Rnd+1）

1-9之间的随机数