1樓：匿名使用者
如果你只是需要結果的話，可以用函式=combin(20,8)直接求的結果，如果真是要用vba實現的話按照 tat蘿蔔說的做就行了，**完善如下：
sub zuhe()
dim times as double
for i1 = 1 to 13
for i2 = i1 + 1 to 14for i3 = i2 + 1 to 15for i4 = i3 + 1 to 16for i5 = i4 + 1 to 17for i6 = i5 + 1 to 18for i7 = i6 + 1 to 19for i8 = i7 + 1 to 20times = times + 1
next
next
next
next
next
next
next
next
end sub
2樓：tat蘿蔔
迴圈唄。
for i1=1 to 13
for i2=i1+1 to 14
...i8=i7+1 to 20
j=j+1
c(j)=i1 & i2 & ... & i8next...
請問如何用VBA將EXCEL檔案中的資料複製到別EXCEL檔案相同的位置
sheet1的區域a1 c3拷貝到sheet2的區域a1 c3 sheet1.range a1 c3 copy sheet2.range a1 c3 丙雅弘雨凝 sub aaa dim sh1 as worksheet dim sh2 as worksheet set sh1 workbooks 1...
如何用VBA關閉EXCEL的列印預覽
這個問題只能用send key 來解決了 但是 在列印預覽視窗出現了之後，任何 都無法執行，這個問題不知道怎麼破，都不能執行了 只能手動退出了，誒，最簡單的做法就是使用 錄製巨集 功能，再去檢視巨集 具體就好了 這個問題我今天也遇到了 當然了現在已經是2020年了 我的解決辦法就是繞過這個列印預覽對...
excel中如何用vba將工作表sheet1重新命名，因為要重
20時13分14秒 sub rename mydate format date,409 dd mmm yy 得到美式的日期格式 mymonth split mydate,split此日期格式，找到當前的月份的英語簡寫 myname ucase mymonth 1 ucase mymonth 0 ye...