26和字母每3个字母组合用excel字母做出来?比如aaa、abc、bac、bac、acb、cab、aab、bab、ba
26和字母每3个字母组合用excel字母做出来?比如aaa、abc、bac、bac、acb、cab、aab、bab、baa、不重复就可以,一次做出来用手动容易出错,而且费时间请大侠指点
最佳回答
用宏做:1。新建excel 文件2。按 ALT+F11 打开VBA编辑窗口3。在VBA编辑窗口中 插入--模板 会出现空白窗口。4。把下面代码复制,粘贴到空白窗口里,再按F5 即可。Sub aa()Dim yy(1 To 26)Dim zz(1 To 26)Dim xx(1 To 26)For i = 1 To 26yy(i) = Chr(i + 96)Next iFor i = 1 To 26g = 0For j = 1 To 26For k = 1 To 26g = g + 1Cells(g,i) = yy(k) & yy(j) & yy(i)Next kNext jNext iEnd Sub 再问: 如果把多排的合并成一排!合并成竖的一排 再答: 那好办,把g = 0 删除,再把Cells(g, i) 改为Cells(g, 1)
最新回答共有2条回答
-
2026-04-01 08:40:12懵懂的柜子
回复用宏做:1。新建excel 文件2。按 ALT+F11 打开VBA编辑窗口3。在VBA编辑窗口中 插入--模板 会出现空白窗口。4。把下面代码复制,粘贴到空白窗口里,再按F5 即可。Sub aa()Dim yy(1 To 26)Dim zz(1 To 26)Dim xx(1 To 26)For i = 1 To 26yy(i) = Chr(i + 96)Next iFor i = 1 To 26g = 0For j = 1 To 26For k = 1 To 26g = g + 1Cells(g,i) = yy(k) & yy(j) & yy(i)Next kNext jNext iEnd Sub 再问: 如果把多排的合并成一排!合并成竖的一排 再答: 那好办,把g = 0 删除,再把Cells(g, i) 改为Cells(g, 1)
热门文章
- 康达学院专转本五年制
- 高考一个考场分ab卷吗
- not only but also用法
- 某物体做自由落体运动,从释放开始计时,则物体在前2s内的平均速度为______m/s,物体下落2m时的速度大小为______m/s.
- 三角函数公式大全表格
- 地理中考必背知识点2022
- 2013-2014学年小学六年级科学上学期期末考试试卷及答案
- 人教版2014-2015学年小学五年级英语第二学期期中教学质量检测试卷及答案
- 【Linux驱动开发】设备树详解(二)设备树语法详解
- 别跟客户扯细节
- 在别的城市买房子能落户吗
- 卖房前要把装修贷还完吗
- 高中政治教学提高教学效果的方法探究
- “互联网+”背景下的初中英语课堂教学改革与创新策略研究
- 2022年终止合同范本
- 租房合同范本范文
- 如何挑选土豆
- 如何挑选土鸡
