我有一个包含这4列的Excel表格:
FROM_YEAR | TO_YEAR | MAKE |型号
所以这四个列都已填充,现在我想添加三个额外的列,它可以在同一张表的右侧 - 图像 - 或在新表中...
让我说我有:
2000,2003,本田,文娱
我想像2000年到2003年那样重复MAKE和MODEL:
2000,本田,文娱
2001,本田,文娱
2002,本田,文娱
2003,本田,文娱
在右边或新的工作表中,作为参考从左边的列...我可以用PHP和MySQL数据库这样做但我想在Excel中这样做因为我想学习是否可能。
您可以看到我在谷歌上传的测试表供参考: https://docs.google.com/spreadsheets/d/1YLY4Dc0NJZ8BW86CTEVPuF_EIOzks591ENU_vEyy5Bw/edit?usp=sharing
让我知道!
答案 0 :(得分:2)
如下所示?
Dim lLastRow As Long
Dim i, a, j As Integer
Sub Button1_Click()
lLastRow = Worksheets("Sheet1").Cells(1, 1).End(xlDown).Row
a = 1
For i = 1 To lLastRow
n = Worksheets("Sheet1").Cells(i, 2).Value - Worksheets("Sheet1").Cells(i, 1).Value + 1
For j = 1 To n
Worksheets("Sheet1").Cells(a, 6) = Worksheets("Sheet1").Cells(i, 1).Value + j - 1
Worksheets("Sheet1").Cells(a, 7) = Worksheets("Sheet1").Cells(i, 3)
Worksheets("Sheet1").Cells(a, 8) = Worksheets("Sheet1").Cells(i, 4)
a = a + 1
Next
Next
End Sub