1樓:匿名使用者
給你vba**吧
因為一共有54740個結果
可能等一下才看到結果
的電腦用了1分半時間
dim r as long
function pmtsb(byval s as string, byval t as string, byval n as integer) as string
const k = 2
if n < 0 or len(s) < n * k then exit function
if n = 0 then
r = r + 1
cells(r, 4) = "a" & left(t, 2) & "b" & mid(t, 3, 2) & "c" & mid(t, 5, 2)
exit function
end if
p = ""
for i = 1 to len(s) step k
p = p & pmtsb(left(s, i - 1) & mid(s, i + k), t & mid(s, i, k), n - 1)
next
pmtsb = p
end function
sub p70_3() 『執行這個子程式
s = ""
for i = 1 to 70
s = s & left(i & " ", 2)
next
pmtsb s, "", 3
end sub
2樓:匿名使用者
sub a()
p = 1
for i = 1 to 70
for j = i to 70
cells(p, 4) = cells(i, 1) & cells(j, 2)
p = p + 1
next
next
p = 1
for i = 1 to 70
for j = i to 2485
cells(p, 5) = cells(j, 4) & cells(i, 3)
p = p + 1
next
next
columns(4).delete
end sub
3樓:悉邁楚高卓
excel中有排列組合函式。排列函式為permut函式,組合函式為***bin函式。
1.permut函式:
返回從給定數目的物件集合中選取的若干物件的排列數。排列為有內部順序的物件或事件的任意集合或子集。排列與組合不同,組合的內部順序無意義。此函式可用於概率計算。
語法permut(number,number_chosen)number
必需。表示物件個數的正整數。
number_chosen
必需。表示每個排列中物件個數的正整數。
示例=permut(10,3),輸出結果為7202.***bin函式:
***bin函式,計算從給定數目的物件集合中提取若干物件的組合數。利用函式***bin可以確定一組物件所有可能的組合數。
***bin(number,number_chosen)number
必需。表示物件個數的正整數。
number_chosen
必需。表示每個組合中物件個數的正整數。
示例:=***bin(10,3),輸出結果為120
excel 排列組合公式?
4樓:有錢哥哥
excel有排列組合公式,permut為排列函式,***bin為組合函式。
1、電腦開啟excel**,輸入組合函式=***bin(50,3)。
2、回車就會得到19600。
3、輸入排列公式=permut(50,3)/permut(3,3)。
4、回車就可以了。
5樓:匿名使用者
=***bin(50,3)
6樓:匿名使用者
permut(50,3)
7樓:
=permut(50,3)/permut(3,3)
..........
查一下幫助吧,只找到了排列的,沒找到組合的
8樓:終清韻毛霽
如果a列的1在a1,c1輸入公式:
下拉填充8個單元格即可按照提問者要求排列。
9樓:沈田談安順
private
sub***mandbutton1_click()
dimarr
range("a1:q65536").clearcontents
arr=
[a1:q65536]l=
1m=1
fori1=1
to28
fori2=i1
+1to29
fori3=i2
+1to30
fori4=i3
+1to31
fori5=i4
+1to32
fori6=i5
+1to33
arr(l,m)=
i1&""
&i2&"
"&i3&
""&i4
&""&
i5&""
&i6l=
l+1if
l=65537
thenm=
m+1l
=1endif
next
i6next
i5next
i4next
i3next
i2next
i1forl=
1to10form=
1to17cells(l,m)=
arr(l,
m)next
mnext
l'[a1:q65536]
=arr
endsub
(33*32*31*30*29*28)/(6*5*4*3*2*1)=1107568
所以共有1107568個不同數字的組合。
我在計算時,把每個組合的6個不相同的數字,各用一個空格符分隔,存放在一個單元格中。
實際運算時間僅10秒鐘即可完成,主要時間將花費在填充單元格上,全部填滿約半小時。
因為1107568=65536*16+58992
所以全部填滿後a-p會全部填滿,q列填到第58992行。
[a1:q65536]
=arr語句用來填充單元格,因執行時費時較多,我暫時把它註釋掉了。代之以如下語句用來顯示前10行資料,作示範。
forl=1
to10
form=1
to17
cells(l,m)=
arr(l,
m)next
mnextl
10樓:香睿力亦玉
這個是從全部隨機選5個數字的公式:
=index($a$1:$e$7,choose(rand()*7+1,1,2,3,4,5,6,7),choose(int(rand()*10/2)+1,1,2,3,4,5))
希望對你有幫助~~
11樓:法哲瀚麻娥
=offset($a$2,int((row()-2)/3),0,,)&"-"
註明:-2是因為我公式從第二行開始,你根據自己的更改。兩處。
$a$2、$b$2是1所在的位置,列向的。如果橫向,offset裡的逗號位置更改。
&"-"
連結符號,你可以刪去。
怎樣用excel函式做排列組合?
12樓:陽光上的橋
d1公式
bai:
duzhi
=offset($a$1,int((row()-1)/counta(b:b)/counta(c:c)),)
如下dao圖內:容
13樓:姓王的
用公式很難,改用巨集**吧
14樓:溫暖了此生
問問老師和會的同學哦
怎麼用excel計算排列組合的個數?
15樓:匿名使用者
permut 函式返回從給定數目的物件集合中選取的若干物件的排列數。
***bin 函式返回從給定數目的物件集合中提取若干物件的組合數。
語法:=permut(number,number_chosen)=permut(物件個數,每個排列中物件個數)=***bin(number,number_chosen)=***bin(物件的總數量,每一組合中物件的數量)舉例:=permut(6,3) 返回120 (6選3的排列數)
=***bin(6,3) 返回20 (6選3的組合數)
16樓:匿名使用者
將公式寫入單元格。
如果使用變數,可以把變數所在的單元格替換公式中的常量
修改變數的值,相應的公式結果隨之變動
17樓:山桑弓
用專門的計算組合數的函式,任意單元格中輸入
=***bin(10,6)
就可以了。不過這個函式如果在03版中使用,需要安裝載入項,07以上版本中可以直接使用。
18樓:末字羯聶
公式=***bin(10,6)
10表示資料庫數量,6表示任選n。
EXCEl排列組合,excel 排列組合公式
詳見附件,雙擊h1即可。記得要啟用巨集喲 按附圖組織資料,然後分別輸入以下公式,然後向下填充公式版 offset a 1,int row a1 1 6 5 5 5 offset b 1,mod int row b1 1 5 5 5 6 offset c 1,mod int row c1 1 5 5 ...
求Excel排列組合的函式?M 1到11數 N數在分別在A,B,C,D,E列,要求數字不重複且a be
a4 int rand b 2 c 2 column 1 a 2 b4 int rand b 2 c 2 column 1 a4 a4 a 2 拖動b4填充剩餘單元 最大值及最小值 和總數 可修改 組合問題 11取5的組合數為462個,需要用到三個公式1.先在b2手工輸入1 圖中紅色部分 2.c2公...
如何用EXCEL進行數字排列組合
用專門的計算組合數的函式,任意單元格中輸入 combin 10,6 就可以了。不過這個函式如果在03版中使用,需要安裝載入項,07以上版本中可以直接使用 怎麼用excel計算排列組合的個數?permut 函式返回從給定數目的物件集合中選取的若干物件的排列數。combin 函式返回從給定數目的物件集合...