Nhờ giải thích Application.WorksheetFunction...

[tuanh1979]

Mình có load bài Data form của Mr Hiếu. Trong đoạn code của commanbutton xoá có dòng Application.WorksheetFunction.Max(Val(Me.H_HHSTT.Value) + 2, 3)
Nhờ các bạn giải thích giúp.. Thank

 

[tedaynui]

Mình có load bài Data form của Mr Hiếu. Trong đoạn code của commanbutton xoá có dòng Application.WorksheetFunction.Max(Val(Me.H_HHSTT.Value) + 2, 3)
Nhờ các bạn giải thích giúp.. Thank

Câu lệnh trên là khi nào bạn dùng 1 lệnh nào đó (có 1 số hàm không áp dụng được như Proper... ) có sẵn của Excel và trong trường hợp trên là hàm MAX. Nếu viết Max(Val(Me.H_HHSTT.Value) + 2, 3) thì VBA sẽ không hiểu mà trước MAX phải có Application.WorksheetFunction.

TDN

 

[tuanh1979]

Nhờ bạn giải thích kỹ hơn dùm mình. 1 phần đoạn code đó như sau
i = Application.WorksheetFunction.Max(Val(Me.H_HHSTT.Value) + 2, 3)
If MsgBox("Ban muon XOA Loai Hang hoa nay ???", vbYesNo, "MrHieu") = vbYes And IsNumeric(i) = True Then
S104.Range("W" & i & ":AD" & i).Delete Shift:=xlUp
S104.Calculate
....
Khi kích chọn một dòng nào đó trong listbox thì vị trí của dòng đó đc gán cho i, và sẽ cắt hẳn dòng đc chọn đó. nhưng mình không hiếu hàm val là gì, và tại sao lại phải dùng hàm max ỏ đây.