求助excel宏编写

来源：百度知道 编辑：UC知道 时间：2024/05/24 06:36:08
比方我有2个表
1、表1放数据，内容为A1写上20，B1写上30，C1写上40，D1写上50
2、表2中一个单元格想将表1中的四个数字比较出最小值显示在该单元格里
比如表2中的A1单元格=表1中A1、B1、C1、D1四个单元格里最小值

这个怎么操作和运用，求助

这么简单的问题不需要宏，直接函数就ok

表2的A1输入:
=MIN(表1!A1:D1)

关于函数与宏的建议：日常工作中的大多数的问题都可以直接用函数就能解决，只有比较复杂的问题才需要VB。但也有例外，比如个人所得税计算，或者货币小写转大写金额，本来手工操作不复杂，但如果用函数计算就相当麻烦，如果用VB写个自定义函数就简单多了。不知道新版的excel有没有增加这方面的函数。

函数
表2的A1输入:
=MIN(Sheet1!A1:D1)

宏

Sub test()
a = Worksheets("Sheet1").Range("A1:D1")
Worksheets("Sheet2").Range("A1") = Application.Min(a)
End Sub

表2的A1输入:
=MIN(Sheet1!A1:D1)