Excel中的VBA常常要处理一些表与表之间的数据传递、交换等的工作，今天来介绍下如何用VBA将一个工作表中的数据塞到另外一个表的空白单元格中。工具/原料moreMicrosoft Excel 2013方法/步骤1/5分步阅读

Excel工作簿中有两个工作表，下图中左侧为表1，右侧为表2，将表1中B列的数据依次填充到表2中A列的空白单元格中。

2/5

按下Alt+F11打开VBA编辑界面，双击表2，弹出右侧代码编辑区，如下图所示。

3/5

输入代码：

Sub 鱼木混猪()For i = 1 To 10If Cells(i, 1) = Thenk = k + 1Cells(i, 1) = Sheets(鱼).Cells(k + 1, 2)End IfNextEnd Sub如下图所示，代码通过循环和条件判断单元格是否为空，如果为空则填入表1的数据。

4/5

点击代码任意位置，然后点击上方的“运行子程序”按钮，如下图所示。

5/5

这样，表1的数据就塞到了表2的空白单元格中，如下图所示。

总结：1/1

1.打开Excel数据表；

2.按下Alt+F11，双击目的工作表；

3.输入代码，核心代码：

For i = 1 To 10If Cells(i, 1) = TheCells(i, 1) = Sheets(鱼).Cells(k + 1, 2)

4.点击“运行子程序”；

5.表1的数据就塞到了表2中的空白单元格中。

注意事项

关注以往和今后的经验文章，了解更多软件应用技巧，感谢点赞和关注

VBA处理数据