VBA宏即根据第一列的内容和第二列的数字，按照数字数量生成对应内容并依次放在第三列、第四列等

1. 打开你的 Excel 工作表。
2. 按下 Alt + F11 组合键，打开 VBA 编辑器。
3. 在 VBA 编辑器中，点击 插入 -> 模块。
4. 在模块窗口中，输入以下 VBA 代码：

Sub GenerateItems()Dim lastRow As LongDim i As Long, j As LongDim item As StringDim count As LongDim col As LonglastRow = Cells(Rows.Count, 1).End(xlUp).Row '获取数据的最后一行For i = 1 To lastRowitem = Cells(i, 1).Value '获取第一项（第一列）的内容count = Cells(i, 2).Value '获取第二项（第二列）的数字col = 3 '从第三列开始放置生成的内容For j = 1 To countCells(i, col).Value = item & "_" & jcol = col + 1 '移动到下一列Next jNext i
End Sub

1. 输入完代码后，关闭 VBA 编辑器。
2. 按下 Alt + F8 组合键，在弹出的对话框中选择 GenerateItems 宏，然后点击 运行 按钮。

请注意：

• 上述代码假设你的数据从第一行开始且没有表头。如果数据有表头或者从其他行开始，需要相应调整代码中的行号参数。
• 如果生成的列数较多，可能会超出当前已显示的列范围，你可以通过拖动列标来查看完整的结果。