vba判断两个单元格数值的大小并返回大值或小值，怎么写？

Question

例如判断R3和S4的大小，把大的数值赋到R9，VBA怎么写？

Answer 1

sub a()
    [r9] = Application.WorksheetFunction.Max([r3],[s4])
    '[r9].NumberFormatLocal = "yyyy-mm-dd"
end sub

Answer 2

[R9]=iif([R3]>[S4],[R3],[S4])