将excel函数更改为vba代码

时间:2014-01-03 11:50:27

标签: vba

在单元格G12中输入数据时,我编写了2个Excel函数来将数据复制到单元格F12

=IF(ISBLANK(F12)," ",(F12))

如果从单元格G12中删除的数据被复制到H12

=IF(ISBLANK(G12),(F12)," ") 

这些工作完美但我想知道在动态范围内是否可以在vba中执行相同的过程,因为我想继续添加行

1 个答案:

答案 0 :(得分:0)

为了满足您的要求,您可以将范围格式设置为表格中的主页>格式。现在,假设您的表分别为两列,分别命名为“name”和“non blank name”,您可以在第二列的第二个单元格中输入以下公式:

=IF(ISBLANK([@Name])," ",[@Name])

在向表中添加行时,公式将自动复制到新行。