重复单元每年 - Excel中

Question

我有一个Excel工作表与这4列：

FROM_YEAR | TO_YEAR |设为|型号

所以这四列装满，现在我想添加三个额外的列，它可能是相同的 - 见纸的图像 - 或在新的工作表的权利......

比方说，我有：

2000,2003，本田，思域

我想重复品牌和型号二〇〇〇年至2003年是这样的：

2000年，本田，思域

2001年，本田，思域

2002年，本田，思域

2003年，本田，思域

到正确或在新的工作表，其作为参考，从左边的列...我能做到这一点的Wi th PHP和MySQL数据库，但我想在Excel中做这个cuz我想了解它是否可能。

你可以看到测试表我谷歌已经上传以供参考： https://docs.google.com/spreadsheets/d/1YLY4Dc0NJZ8BW86CTEVPuF_EIOzks591ENU_vEyy5Bw/edit?usp=sharing

让我知道！

Answer 1

像下面这样的东西？

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