一行变多行的代码生成器(非常好用)

 众所周知,在各种语言的编程中,经常遇到从1行已有的代码,加工成与之有关的多行代码。

例如下面的一行代码,实际工作中可能需要把里面的数字或部分字母递增或递减变化,并且批量生成多行(生成的效果见 图5)。

Application.Workbooks(1).Worksheets("Jan").Range("B12").Value = Workbooks("名单.xlsx").Range("B12").Text & Cells(5, "D").Formula

我用Excel VBA制作的这个工具,可以完美解决这个问题。简单介绍使用步骤:

第1步:在工具的Sheet1的A3单元格输入原始代码,并且把想改变的部分设置红色字体(图1)。

点击按钮后,会在Sheet2的第3行提取出所有可变部分(图2)。

第2步:在第4行以下,你可以输入任何内容,有规律没规律均可(图3)。

输入完毕后,点击生成按钮。

第3步:Sheet3中可以看到生成结果(图4)。

第4步:从Excel复制代码到记事本(图5)。

工具优势:

用户要做的是上述第1步和第2步,标红是为了让工具识别到哪些部分需要变换,填充是为了让工具识别到扩展到多少行。

因此用户手工操作的部分很少,其他环节都是工具自动完成,非常省脑,只需要具备Excel基本操作的能力就可以使用该工具。

速度快。

用户不需要思考代码逻辑。

注意:被加工的代码可以是任何字符串,Python、C#等等各种代码都可使用该工具。

 图 1 把变化部分字体标红,然后点击快速访问工具栏中的 红色方块按钮

  图 2 在Sheet2的第3行提出所有变化的部分

  图 3 第4行以下由用户手工填充,填充完毕后点击快速访问工具栏中的 生成按钮

  图 4 在工作表Sheet3出现生成结果,选中后按下Ctrl+C

  图 5 粘贴到记事本中

原文地址:https://www.cnblogs.com/ryueifu-VBA/p/12182130.html