Cú pháp hàm max min trong VBA dùng thế nào (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

hunglam123

Thành viên bị đình chỉ hoạt động
Thành viên bị đình chỉ hoạt động
Tham gia
31/3/20
Bài viết
180
Được thích
43
Em chào tất cả mọi người. Ở trong excel thì em biết dùng hàm Max và Min để so sánh 2 số
còn trong VBA em thử dùng Max, và Min thì báo lỗi. Vậy cú pháp nó thế nào. Mong mọi người giúp mình. mình cảm ơn mọi người


Mã:
Sub timminmax()
Dim a As Long, b As Long, c As Long, d As Long
a = 5
b = 6
c = Max(a, b) ' tim max
d = Min(a, b) ' tim min

MsgBox (c)
MsgBox (d)
End Sub
 
Em chào tất cả mọi người. Ở trong excel thì em biết dùng hàm Max và Min để so sánh 2 số
còn trong VBA em thử dùng Max, và Min thì báo lỗi. Vậy cú pháp nó thế nào. Mong mọi người giúp mình. mình cảm ơn mọi người


Mã:
Sub timminmax()
Dim a As Long, b As Long, c As Long, d As Long
a = 5
b = 6
c = Max(a, b) ' tim max
d = Min(a, b) ' tim min

MsgBox (c)
MsgBox (d)
End Sub
Do VBA không có sẵn 2 hàm này, cho nên chúng ta phải mượn hàm của Worksheet để thực hiện:

WorksheetFunction.Max(a, b)
WorksheetFunction.Min(a, b)
 
Upvote 0
Do VBA không có sẵn 2 hàm này, cho nên chúng ta phải mượn hàm của Worksheet để thực hiện:

WorksheetFunction.Max(a, b)
WorksheetFunction.Min(a, b)
Em thấy cái Application.max min có được không anh
Mã:
Sub timminmax()
Dim a As Long, b As Long, c As Long, d As Long
a = 5
b = 6
c = Application.Max(a, b) ' tim max
d = Application.Min(a, b) ' tim min

MsgBox (c)
MsgBox (d)
End Sub
 
Upvote 0
Em thấy cái Application.max min có được không anh
Mã:
Sub timminmax()
Dim a As Long, b As Long, c As Long, d As Long
a = 5
b = 6
c = Application.Max(a, b) ' tim max
d = Application.Min(a, b) ' tim min

MsgBox (c)
MsgBox (d)
End Sub
Thì bạn cứ thử chạy code xem nó có chạy được không! Cần gì phải hỏi ta?
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom