- 帖子
- 678
- 主題
- 147
- 精華
- 0
- 積分
- 799
- 點名
- 0
- 作業系統
- win 8
- 軟體版本
- MS 2003
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2016-2-9
- 最後登錄
- 2022-1-20
|
產生檔案及工作表的語法
本帖最後由 ziv976688 於 2016-2-9 21:16 編輯
煩請各位高手指教!謝謝!
根據各InputBox填入的數字，產生各檔案及工作表
檔案名稱= FTC_" & UpRng & "_"& StrRng & "-" & mthcount & "期.xls"
各檔案內的工作表
工作表名稱= mthcount & "-" & mthcount - i
(For i = 1 To UpRng︰ Next)
最後在右邊再續增加一個名稱="機率表"的工作表
工作表的內容︰
A1︰H1=DATA!標題(期數 一 二 三 四 五 六 特)；I1︰P1= DATA!標題
I2︰P& mthcount- StrRng +2= DATA!A&StrRng+1︰DATA!H& mthcount +1
"機率表"工作表內容
A1︰F1=
預測號碼 出現期數 出現次數 預測號碼個數 中獎號碼 中獎比率
EX︰
StrRng = "2,10"
Nrange = "100,200"
UpRng = "4,8"
產生如附件
 製作.rar (72.27 KB)
|
|
發表於 2016-2-9 21:14
| 
