1樓：k丶我愛內酷
用公式複雜，執行會慢一些，用vba簡單，如果資料太多，可用陣列加快速度。見附件 for a1 = 1 to 4 for a2 = 1 to 4 if a...
excel 6個數以3個位一組，排列組合，如何顯示其中全部組合數，急用
2樓：匿名使用者
3的17次方=129140163組excel公式為：=3^17
excel 8個數以3個為一組，排列組合，如何顯示其中全部 5
3樓：風正半帆
前八行是參加組合的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
供參考，祝順利。
4樓：匿名使用者
a$8,mod(row()-1,8)+1)
下拉到第512行，一共有512個組合。
5樓：雲南新華電腦學校
用vba程式設計 很麻煩的
如果沒做過一次 只好用現成的excel**
效果如圖
excel排列組合的函式？ 如：有1.2.3.4.5.6這6個數，取其中任意2個數為一組，一共可以有多少種排列方式？
6樓：大大才鳥
在excel裡使用函式拉表即可。
比如a列填了總數量，b列填了要取的數量，那麼在c1格輸入「=combin(a1, b1)」，然後向下拉取**即可。 如下圖：
7樓：匿名使用者
計算從給定數目的物件集合中提取若干物件的組合數。利用函式 combin 可以確定一組物件所有可能的組合數。
語法combin(number, number_chosen)combin 函式語法具有下列引數
number 必需。專案的數量。
number_chosen 必需。每一組合中專案的數量。
例：28 = combin(8,2) 8個種類，兩兩組合，有28種組合方式
8樓：匿名使用者
生成兩位數（三位數可以再加乙個迴圈）
sub sumcombine()
a = array(1, 2, 3, 4, 5, 6)rr = 1
for i = 0 to 4
for j = i + 1 to 5
cells(rr, 1) = a(i) & a(j)rr = rr + 1
next
next
end sub
如何在excel裡從0到10任選2個數,然後2個數一組進行排列組合所有的組合,請高手幫忙
9樓：匿名使用者
excell的功能沒有那麼強大，你就得自己編輯公式了，用排列組合的公式，寫在編輯區試試看，本人認為不可能
excel怎麼列出所有的排列組合？
10樓：明佳妙明
excel怎樣從資料集選r個資料排列組合列表（一）
11樓：羊舌芙同巳
這個排列組合經常要用到，託您的問題，我學習了一下，做了乙個排列組合的**。只當拋磚引玉，希望有高手批評指正。（這個程式是將10個數字，按每條4個數字進行組合）
sub組合()
dimarr_s(1
to10)
dimarr_o
dimi,
j,k1,
k2,k3,
k4as
integeri=
sheet1.range("a65536").end(xlup).row
'arr_s
這個執行時出錯
forj=1
toi-1
'給原始序列陣列賦值
arr_s(j)
=cells(j+1,
1)nextji
=i-1
'原始資料的個數j=
i*(i-
1)*(i-
2)*(i-
3)/(1*
2*3*
4)'按4列組合，計算目標陣列的個數
redim
arr_o(1
toj,1to
4)j=1
fork1=1
toi-3
fork2=k1
+1toi
-2fork3=k2
+1toi
-1fork4=k3
+1toi
arr_o(j,1)=
arr_s(k1)
arr_o(j,2)=
arr_s(k2)
arr_o(j,3)=
arr_s(k3)
arr_o(j,4)=
arr_s(k4)j=
j+1next
k4next
k3next
k2next
k1fori=
1toj-
1cells(i+1,
3)=arr_o(i,
1)cells(i+1,
4)=arr_o(i,
2)cells(i+1,
5)=arr_o(i,
3)cells(i+1,
6)=arr_o(i,
4)next
iend
sub執行結果如圖所示：
12樓：匿名使用者
結合你之後的追問，其實你要問的不是排列，而是「不重複的組合」。所以只需要在b1單元格輸入=replace($a$1&$a$2&$a$3&$a$4,row(a1),1,"")下拉就可以了。不過這個得到的是文字型的，如果你要得到數字型的，就在「=」後加上「--」就可以。
"4個取3個" 對應的就是 「4個扣掉1個」
13樓：慈梓維建癸
'你這個用excel函式比較麻煩，但用vba**就比較簡單。'如果你的四個環節名分別放在a1：d1，第一環節的四種情況分別在a2：a4，……，則在excel
vba裡執行下面的**就可以在a6:p21區域中得出你要的256中組合sub
四環節組合()dim
i%,j%,
k%,l%,
m%,n%fori=
2to5step
1forj=
2to5step1m
=m+1
n=0fork=
2to5step
1forl=
2to5step1n
=n+1
cells(m+5,
n)=cells(i,1)&
cells(j,2)&
cells(k,3)&
cells(l,
4)next
next
nextnextendsub
14樓：匿名使用者
要用excel的**。
15樓：匿名使用者
可以用下面的**：
sub test()
for i =1 to 4
s=「」
for j=0 to 2
s=s & cells(i +j,1)
next
celks(i,2)=s
next
end sub
16樓：假笑秋田
sub abc
range(」
b1」)=range(」a1」) & range(」a2」) & range(」a3」)
range(」b2」)=range(」a1」) & range(」a2」) & range(」a4」)
range(」b3」)=range(」a1」) & range(」a3」) & range(」d4」)
range(」b4」)=range(」a2」) & range(」a3」) & range(」a4」)
17樓：擲骰的無色瞳
不用巨集的方法：規則一樣的話（4取3），可以先窮舉一列，然後用公式替換a列寫：12
34b列貼上：
123124
132134
142143
234231
243241
213214
341342
314312
324321
412413
421423
431432
c列:abc
dd1寫入公式：=substitute(substitute(substitute(substitute(b1,a$1,c$1),a$2,c$2),a$3,c$3),a$4,c$4)
下拉後面可以迴圈使用
18樓：微讯
可以實現，需要程式設計來解決，
不知道你的資料有什麼要求？
一道數學排列組合題請教一道小學數學排列組合題，求解題思路和答案，謝謝！
6個人排有a6 6種，6人排好後包括兩端共有7個 間隔 可以插入空位 1 空位不相鄰相當於將4個空位安插在上述個 間隔 中，有c7 4 35種插法，故空位不相鄰的坐法有a6 6 c7 4 25200種 2 4個空位至少有2個相鄰的情況有三類 4個空位各不相鄰有c7 4種坐法 4個空位2個相鄰，另有2...
如何編寫排列組合問題的MATLAB程式一般式，n和m是待附值的
c n,m prod n 1 n m 1 prod 1 1 m c 5,2 ans 10 matlab中排列組合問題，新手救急！謝謝！雙擊matlab軟體的快捷鍵，進入matlab的工作介面 matlab 排列組合問題 2將命令列視窗取消停靠 這樣便於輸入 按ctrl shift u取消停靠 mat...
一道高中數學排列組合題，用數字01234組成沒有重複
2 3 3 2 36解釋下,首先看個位,因為是奇數,所以在1和3中選1個,顯然有2種可能.再選首位,因為個位選定了,加上0也不能做首位,因此首位只能從其餘3個數中選,因此有3種可能.然後百位和十位就無所謂先後了乙個從剩餘的3個數中選,另乙個就只能從剩餘的2個中選,因此有後面的3 2.綜合起來就是上式...