Excel中的VBA常常要处理一些表与表之间的数据传递、交换等的工作，今天来介绍下如何用VBA将一个工作表中的数据塞到另外一个表的空白单元格中。
工具/原料
MicrosoftExcel2013
方法/步骤
1、Excel工作簿中有两个工作表，下图中左侧为表1，右侧为表2，将表1中B列的数据依次填充到表2中A列的空白单元格中。
2、按下Alt+F11打开VBA编辑界面，双击表2，弹出右侧代码编辑区，如下图所示。
3、输入代码：Sub鱼木混猪()Fori=1To10IfCel盟敢势袂ls(i,1)=""T茑霁酌绡henk=k+1Cells(i,1)=Sheets("鱼").Cells(k+1,2)EndIfNextEndSub如下图所示，代码通过循环和条件判断单元格是否为空，如果为空则填入表1的数据。
4、点击代码任意位置，然后点击上方的“运行子程序”按钮，如下图所示。
5、这样，表1的数据就塞到了表2的空白单元格中，如下图所示。
