Excel请问如何用三个字母c、o、s，排列组合六位数，有多少种组合

Question

请帮我解答，非常感谢

Answer 1

Excel怎样从数据集选r个数据排列组合列表（一）

Answer 2

使用vba实现
自动排列组合，生成排列组合的列数，手动输入
然后从第二行第一列开始生成每列数据，每列数据数字不重复，数量随机。
实现代码如下：
Sub 按钮1_Click()
    Application.ScreenUpdating = False
    ActiveSheet.UsedRange.ClearContents '清空表格
    a = InputBox("请输入产生序列的列数") '提示输入列数
    Set d = CreateObject("scripting.dictionary") '字典去重
    If VBA.IsNumeric(a) Then '判断输入的是否是数值，不是则跳出程序
        Randomize '初始化随机数
        
        For j = 1 To Int(a) '生成输入列数的随机数
            b = Int(Rnd * 99999) Mod 10 + 1 ' 每列产生随机数的数量
            d.RemoveAll
l2:
            If d.Count <> b Then '生成随机数
                d(Int(Rnd * 99999) Mod 10) = ""
                GoTo l2
            End If
            Cells(2, j).Resize(d.Count) = WorksheetFunction.Transpose(d.keys) '将随机数存入相应列里
        Next j
    Else
        MsgBox "请输入数值"
        GoTo l1
    End If
l1:
    Application.ScreenUpdating = True
End Sub

程序执行效果：

追问

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(MOD(ROUNDUP(ROW(A163)/81,),3)+1&MOD(ROUNDUP(ROW(A55)/27,),3)+1&MOD(ROUNDUP(ROW(A19)/9,),3)+1&MOD(ROUNDUP(ROW(A7)/3,),3)+1&MOD(ROW(A3),3)+1,"1","C"),"2","O"),"3","S")
我要类似这样的公式，简单点的，这个是五位数，我现在想要六位数

本回答被网友采纳

Answer 3

3的6次方= 729 种组合。

Answer 4

如果你是计算数量那有现成的公式PERMUT
如果你是想要所有的排列结果，那要用VBA写一个递归函数就能搞定。
如果你只是想要一个结果，不在乎过程，我给你也行。追问

我要类似这样的，这里是五位数，但我现在需要六位数的随机组合

Answer 5

3个字母，排列组合六位数？每个字母用两次？还是每个字母最多可以用六次？