1樓:匿名使用者
設資料在a列,
b1輸入:
=offset($a$1,int((row(a1)-1)/(17*17)),)
c1輸入:
=offset($a$1,int((row(a1)-1)/17),)d1輸入:
=offset($a$1,mod(row(a1)-1,17),)同時下拉回三個公式答
excel 8個數以3個為一組,排列組合,如何顯示其中全部 5
2樓:風正半帆
前八行是參加組合的8個資料(數字或字元)。
在表名上右擊,檢視**,將**貼入,執行。
執行後,從第20行顯示結果。
sub kk()
dim a(8)
for i = 1 to 8
a(i) = cells(i, 1).valuenext i
row = 20
for i = 1 to 6
for k = i + 1 to 7
for j = k + 1 to 8
cells(row, 1) = a(i)
cells(row, 2) = a(k)
cells(row, 3) = a(j)
row = row + 1
next
next
next
end sub
供參考,祝順利。
3樓:匿名使用者
a$8,mod(row()-1,8)+1)
下拉到第512行,一共有512個組合。
4樓:雲南新華電腦學校
用vba程式設計 很麻煩的
如果沒做過一次 只好用現成的excel**
效果如圖
excel 6個數以3個位一組,排列組合,如何顯示其中全部組合數,急用
5樓:匿名使用者
3的17次方=129140163組excel公式為:=3^17
怎麼用excel計算排列組合的個數?
6樓:匿名使用者
permut 函式返回從給定數目的物件集合中選取的若干物件的排列數。
combin 函式返回從給定數目的物件集合中提取若干物件的組合數。
語法:=permut(number,number_chosen)=permut(物件個數,每個排列中物件個數)=combin(number,number_chosen)=combin(物件的總數量,每一組合中物件的數量)舉例:=permut(6,3) 返回120 (6選3的排列數)
=combin(6,3) 返回20 (6選3的組合數)
7樓:匿名使用者
將公式寫入單元格。
如果使用變數,可以把變數所在的單元格替換公式中的常量
修改變數的值,相應的公式結果隨之變動
8樓:山桑弓
用專門的計算組合數的函式,任意單元格中輸入
=combin(10,6)
就可以了。不過這個函式如果在03版中使用,需要安裝載入項,07以上版本中可以直接使用。
9樓:末字羯聶
公式=combin(10,6)
10表示資料庫數量,6表示任選n。
求excel任意幾個個數字4個組合排列與3個一組排列組合公式
10樓:慶年工坊
function 朱科
dao技
版權(zhu as range, num as integer)r = zhu.rows.count
for c1 = 1 to r
for c2 = 1 to r
if c2 <> c1 then
for c3 = 1 to r
if c3 <> c1 and c3 <> c2 thenfor c4 = 1 to r
if c4 <> c1 and c4 <> c2 and c4 <> c3 then
rr = rr + 1
朱科技 = zhu(c1, 1) & "," & zhu(c2, 1) & "," & zhu(c3, 1) & "," & zhu(c4, 1)
if rr = num then exit functionend if
next
end if
next
end if
next
next
end function
excel如何做排列組合?
11樓:匿名使用者
用vba:
sub zuhe()
r = 1
for a = 0 to 7
for b = a + 1 to 8
for c = b + 1 to 9
cells(r, 1) = "'" & a & b & cr = r + 1
next
next
next
end sub
sub pailie()
r = 1
for a = 0 to 9
for b = 0 to 9
for c = 0 to 9
if a <> b and a <> c and b <> c then
cells(r, 2) = "'" & a & b & cr = r + 1
end if
next
next
next
end sub
12樓:匿名使用者
要用vba才行,公式做不到
新建模組
sub arrange()
dim a, b, c, d, e as integerd = 1
for a = 0 to 9
for b = 0 to 9
for c = 0 to 9
if a <> b and b <> c and a <> c then
cells(d, 1) = a & b & cd = d + 1
end if
next c
next b
next a
end sub
sub assemble()
dim a, b, c, d, e as integerd = 1
for a = 0 to 9
for b = 0 to 9
if b > a then
for c = 0 to 9
if c > b then
cells(d, 2) = a & b & cd = d + 1
end if
next c
end if
next b
next a
end sub
13樓:哀微浮柔婉
何必用巨集呢?用隨機函式,你按一下f9就會自動生成新一列數d,e,f中分別輸入
=offset(a1,int(rand()*6)-1,0)=offset(b1,int(rand()*8)-1,0)=offset(c1,int(rand()*6)-1,0)剛測試了下,不知道怎麼用rand的時候總是偶爾會出點問題,修改了下=offset(a1,int(randbetween(1,5))-1,0)
=offset(b1,int(randbetween(1,7))-1,0)
=offset(c1,int(randbetween(1,5))-1,0)
如何用excel進行數字排列組合?
14樓:江西新華祿人以
用專門的計算組合數的函式,任意單元格中輸入
=combin(10,6)
就可以了。不過這個函式如果在03版中使用,需要安裝載入項,07以上版本中可以直接使用
excel中排列組合符號c怎麼編輯
編輯要用公式編輯器,計算可以用計算器實現 第一個c 6,33 1107568,第二個c 1,16 6 這個通過特殊符號裡面的就可以設定編輯了。excel excel中排列組合符號怎麼輸入 編輯要用公式編輯器,計算可以用計算器實現 第一個c 6,33 1107568,第二個c 1,16 6 excel...
排列組合的計算方法,排列組合的公式
組合用符號c n,m 表示,m n。公式是 c n,m a n,m m 或 c n,m c n,n m 例如 c 5,3 a 5,3 3 x 5 3 1x2x3x4x5 2x 1x2x3 10.排列用符號a n,m 表示,m n。計算公式是 a n,m n n 1 n 2 n m 1 n n m 此...
排列組合路燈,排列組合 與路燈相似的問題
第一題不明白你的意思,也比較難 第二題還真不好用排列做,因為連續這個問題很少用到排列組合,排列組合都是隨機抽取的,隨機性比較大,你說的3槍連續命中是很特別的情況,所以只能一步步列出來,我把我想的跟你說一下,希望對你有一定的幫助 1 當前3槍命中,則第4槍不能命中,所以只能在第5.6.7.8槍中命中一...