Vba 尝试在excel中将宏组合在一起,以创建一个完成所有宏的大宏

Vba 尝试在excel中将宏组合在一起,以创建一个完成所有宏的大宏,vba,excel,Vba,Excel,我基本上有一组宏按钮,通过查看另一个电子表格并查看数据停止的位置,将公式填充到确定的行数: Range("A4:A" & Sheets("Core Data2").Range("A" & Rows.Count).End(xlUp).Row).Formula = "=IF(EXACT('Core Data2'!E4,'Core Data '!E4),""True"",""Difference in Pre-Population Information"")" 想象一下其中的20个

我基本上有一组宏按钮,通过查看另一个电子表格并查看数据停止的位置,将公式填充到确定的行数:

Range("A4:A" & Sheets("Core Data2").Range("A" & Rows.Count).End(xlUp).Row).Formula = "=IF(EXACT('Core Data2'!E4,'Core Data '!E4),""True"",""Difference in Pre-Population Information"")"
想象一下其中的20个,每个按钮都有一个单独的按钮,在不同列的末尾使用不同的公式执行相同的操作。核心数据2是我参考的数据表。核心数据是我比较数据的另一个电子表格(例如上面的示例)

我对宏非常陌生,我想知道如何将所有20条类似于上面的语句放入一个宏中。与其说有20个按钮基本上做相同的事情,不如说有一个按钮,接收所有宏并创建一个大的宏,为每一列填写所有公式,而不是逐个执行所有宏


任何帮助都会很好。谢谢。

没想到会这么简单。我所做的只是一个接一个地添加公式,没有任何注释和声明,似乎效果很好

我基本上只是在按钮代码中写了这样的东西:

范围(“A4:A”和表(“核心数据2”).Range(“A”和行数).End(xlUp).Row).Formula=“=IF(精确('Core Data2'!E4,'Core Data'!E4),“True”,“人口前信息差异”))

范围(“A4:A”和表(“核心数据2”).Range(“A”和行数).End(xlUp).Row).Formula=“=IF(精确('Core Data2'!E4,'Core Data'!E4),“True”,“人口前信息差异”))


想象一下,它们最后显然是不同的公式,但这似乎工作得很好。

您可以编辑VBA,但最简单的方法是不了解任何宏。。。。录制一个新宏,在其中按所需顺序运行所有宏。。。我会说,虽然,最终你可能会想编辑VBA-这是更好的方式…我想更多的是添加和某种形式的语句,让它在同一时间完成这一切。