返回列表 上一主題 發帖

[發問] 請教3位數排列組合

eric7765

帖子
79 
主題
19 
精華
0 
積分
87 
點名
0  
作業系統
win7 
軟體版本
旗艦版 
閱讀權限
20 
註冊時間
2017-3-22 
最後登錄
2024-3-12 

論壇贊助勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2019-2-20 13:15 | 顯示全部帖子

[發問] 請教3位數排列組合

想請教前輩們
是否有公式或是用vba的方式
可以讓我在A欄中填入3個數字 可以自動在D欄中排列出各種組合並把編號帶入
收藏 分享

eric7765

帖子
79 
主題
19 
精華
0 
積分
87 
點名
0  
作業系統
win7 
軟體版本
旗艦版 
閱讀權限
20 
註冊時間
2017-3-22 
最後登錄
2024-3-12 

論壇贊助勳章
2#
發表於 2019-2-22 16:23 | 顯示全部帖子
回復 3# 准提部林


    感謝大大 但有個小問題  可以排除重複的嗎?  比如 366 如果不重複 只會有3種組合 但是照這個公式 會排成6個組合

TOP

eric7765

帖子
79 
主題
19 
精華
0 
積分
87 
點名
0  
作業系統
win7 
軟體版本
旗艦版 
閱讀權限
20 
註冊時間
2017-3-22 
最後登錄
2024-3-12 

論壇贊助勳章
3#
發表於 2019-2-22 16:27 | 顯示全部帖子
回復 2# stillfish00
謝謝s大  對程式方面不熟悉 我貼上 它顯示 沒有定義sub 我附上檔案 可以麻煩 s大幫我看看嗎 感謝

3位數排列組合.rar (15.96 KB)

TOP

eric7765

帖子
79 
主題
19 
精華
0 
積分
87 
點名
0  
作業系統
win7 
軟體版本
旗艦版 
閱讀權限
20 
註冊時間
2017-3-22 
最後登錄
2024-3-12 

論壇贊助勳章
4#
發表於 2019-2-22 20:57 | 顯示全部帖子
回復 2# stillfish00


    感謝s大 您提供的答案 完全符合我需要的 非常感謝

TOP

eric7765

帖子
79 
主題
19 
精華
0 
積分
87 
點名
0  
作業系統
win7 
軟體版本
旗艦版 
閱讀權限
20 
註冊時間
2017-3-22 
最後登錄
2024-3-12 

論壇贊助勳章
5#
發表於 2019-2-27 13:29 | 顯示全部帖子
回復 2# stillfish00

s大~非常感謝您幫忙解決上次的難題   如果改成 數字後面有+號再排列  或者是 在C欄中 如果有任意字再進行排列的話  這樣可行嗎?  麻煩大神有空時能指導一下 感激不盡


排列.rar (15.7 KB)

TOP

eric7765

帖子
79 
主題
19 
精華
0 
積分
87 
點名
0  
作業系統
win7 
軟體版本
旗艦版 
閱讀權限
20 
註冊時間
2017-3-22 
最後登錄
2024-3-12 

論壇贊助勳章
6#
發表於 2019-2-27 19:10 | 顯示全部帖子
回復 8# ML089
感謝麻辣前輩的解答~已成功

TOP

eric7765

帖子
79 
主題
19 
精華
0 
積分
87 
點名
0  
作業系統
win7 
軟體版本
旗艦版 
閱讀權限
20 
註冊時間
2017-3-22 
最後登錄
2024-3-12 

論壇贊助勳章
7#
發表於 2019-3-4 14:26 | 顯示全部帖子
本帖最後由 eric7765 於 2019-3-4 14:27 編輯

回復 8# ML089
M大 抱歉 這兩周用起來發現 這程式運行 如果遇到數字裡面有"0"排列出來的組合都會缺少 能麻煩前輩幫忙看看嗎?

TOP

eric7765

帖子
79 
主題
19 
精華
0 
積分
87 
點名
0  
作業系統
win7 
軟體版本
旗艦版 
閱讀權限
20 
註冊時間
2017-3-22 
最後登錄
2024-3-12 

論壇贊助勳章
8#
發表於 2019-3-4 18:08 | 顯示全部帖子
回復 11# ML089
m大 剛剛測試的結果 只要開頭是0 ex:001 023 013 就會出現格式不符

00錯.png (87.6 KB)

00錯.png

TOP

eric7765

帖子
79 
主題
19 
精華
0 
積分
87 
點名
0  
作業系統
win7 
軟體版本
旗艦版 
閱讀權限
20 
註冊時間
2017-3-22 
最後登錄
2024-3-12 

論壇贊助勳章
9#
發表於 2019-3-4 18:16 | 顯示全部帖子
回復 11# ML089

TOP

        靜思自在 : 君子為目標，小人為目的。
返回列表 上一主題