这个其实固定的公式是没有的,可以用excel 2010版以后才可以有的power query功能(其中2016自带,以前版本要装插件)。
按以下操作
结果如图
下次如果要再改队名,直接只要右键点,刷新结果区域就可以
B1:D1和A2:A5分别输入ABCD:
B2 =IF(OR($A2=B$1,ROW()<COLUMN()),"",B$1&$A2)
然后拉公式填充B2:E5范围得出的结果
补充:
假如在A1输入队伍ABCD,用VBA实现在某个单元格输入队伍组队情况,操作如下(2003版测试):
(1)Alt+F11调出VBA窗口
(2)在左侧工程窗口中 右键 - 插入 - 模块,添加一个 模块1
(3)双击 模块1,复制下列代码粘贴到右边空白区域,然后保存关闭VBA窗口
Private Function 组队(队伍)
If Len(队伍) <= 1 Then
组队 = "队伍不足"
Exit Function
End If
x = Len(队伍)
For i = 1 To x
m = m + 1
If m = x Then Exit For Else
For j = m + 1 To x
组队 = 组队 & Mid(队伍, m, 1) & Mid(队伍, j, 1) & " "
Next j
Next i
End Function
(4)任意单元格输入 =组队(A1),结果显示:AB AC AD BC BD CD
如有问题可联系QQ:183818766
本文如未解决您的问题请添加抖音号:51dongshi(抖音搜索懂视),直接咨询即可。