这是我在这里发表的第一篇文章，但我过去经常访问过这些帖子。
我正在寻找一个宏，根据集合中的项目数减1，在每个条目之间插入特定的数字行，然后插入每个组合。
我会尽力举一个例子。
假设每个集合中有大量集合是一个独特的项目。我想与该集合中的每个项目建立一对一的关系。因此，如果我的集合Red包含项1，2和3以及集合Blue，其中包含项A，{{1} }，B，C和D。
我的工作簿中有3列。
E我的目标是在Collection, Primary Item, Relationship Item
Row 1 = Red, 1.
Row 2 = Red, 2.
Row 3 = Red, 3.
Row 4 = Blue, A.
Row 5 = Blue, B.
Row 6 = Blue, C.
Row 7 = Blue, D.
Row 8 = Blue, E.
集合中的每一行之间插入2行，并在Red集合中的每行之间插入4行。然后复制新空白列中的每个集合和目标项以及关系项中的每个相关项。
然后会这样读：
Blue等等。
这将需要多次使用，其中包含不同数量的集合和项目。
我希望自己有足够的描述性，如果您对如何简化我的解释有任何疑问或建议，请告诉我。
答案 0 :(得分：0)
我建议你输出到单独的工作表而不是插入现有的工作表。 这将使您的参数文件保持独立，以便进行校对并简化循环。
接下来，您需要一个嵌套循环机制来创建所有可能的组合。 尝试使用此链接进行循环。 Creating a list of all possible unique combinations from an array (using VBA)