excel中怎么能把许多项未合并单元格中的内容复制到许多合并的单元格中？谢谢！

比如，我的一个表格里面有许多行（假设是一列）内容，都是没有合并过的单元格；现在因某种需要，我又设计了一个表格，有一列都是两行两行合并的单元格，我想将先前说的那个许多行内容复制到这个新表格里面，必须这么做，怎么办？请高手帮助，谢谢！

将数据复制后粘贴到新表格的空白列，在前面输入系号，设数据如图：

将公式

=VLOOKUP((ROW()+1)/2,C:D,2,0)

复制后粘贴到“A1”单元格，对准右下角，光标成“+”状时，按住左键拖下去，效果如图：

如果第一行为项目名称，则公式为：

=VLOOKUP(ROW()/2,C:D,2,0)

效果如图：

'VBA

Option Explicit Sub a() Dim i As Long For i = 1 To Sheets("sheet1").Range("a65536").End(xlUp).Row 'sheet1有数据的A列 Sheets("sheet2").Cells(2 * i - 1, 1) = Sheets("sheet1").Cells(i, 1) '假设sheet2 A列2行一合并 Next End Sub

行不通的