1、可以使用自動生成指定範圍數值的RANDBETWEEN函式做到。首先開啟Excel，在單元格中輸入“=RANDBETWEEN()”的公式：

2、然後在公式中新增引數，該函式的引數是生成隨機數的範圍值，比如生成23到98之間的隨機數，就輸入“=RANDBETWEEN(23,98)”後回車就會出現一個隨機數了：

3、最後點選這個生成的隨機數，將滑鼠移動到單元格邊緣，拖動單元格向下，就能生成一列隨機數了：

E1公式=RAND()，拉到G6，用於生成18個隨機數

I1公式=RANDBETWEEN(0,1)，拉到K6，生成隨機的1或0

A1公式=IF(RANK(E1,$E$1:$G$6)<=6,1,IF(I1=0,2,3))，拉到C6，判斷對應的E1:G6區域中對應單元格在E1:G6區域中的排名，如果排在前6，生成1，如果不在前6，根據I1:K6的對應值生成2或3

按F9可以重新整理

VBA也能做，不需要輔助列。可我看不出你這個問題有什麼意義，不想浪費時間。