Sử dụng hàm tìm kiếm nào để thoả mãn điều kiện

[ali3340tc]

Nhờ các bác Pro giúp cho vụ này nhé:

Tôi có 1 file excel như attach.
Tôi muốn sử dụng hàm tìm kiếm để tìm kiếm giá trị thoả mãn điều kiện như sau:


Ví dụ: Khi tôi nhập số 1.26 vào ô A40 thì nó trả kết quả ở ô B40 là 0.1039
(Khi nhập 1.26 vào thì hàng ngang sẽ dò theo 1.2 và gặp hàng dọc ở 0.06 và lấy kết quả ở vùng giao nhau)

Tương tự như trên, nếu nhập 1.265 thì nó tự làm tròn lên thành 1.27 rồi cũng theo nguyên tắc trên để thu được kết quả là: 0.1020

Mong được sự giúp đỡ của các bạn

 

[mhung12005]

Nhờ các bác Pro giúp cho vụ này nhé:

Tôi có 1 file excel như attach.
Tôi muốn sử dụng hàm tìm kiếm để tìm kiếm giá trị thoả mãn điều kiện như sau:


Ví dụ: Khi tôi nhập số 1.26 vào ô A40 thì nó trả kết quả ở ô B40 là 0.1039
(Khi nhập 1.26 vào thì hàng ngang sẽ dò theo 1.2 và gặp hàng dọc ở 0.06 và lấy kết quả ở vùng giao nhau)

Tương tự như trên, nếu nhập 1.265 thì nó tự làm tròn lên thành 1.27 rồi cũng theo nguyên tắc trên để thu được kết quả là: 0.1020

Mong được sự giúp đỡ của các bạn

Bạn không Unprotect ra thì ai giúp được bạn đây.

 

[Luc Van]

Hiểu và làm được chết liền....

 

[ali3340tc]

Hiểu và làm được chết liền....

Cái này theo nguyên tắc: Hàng ngang dóng sang và hàng dọc dóng xuống. Gặp nhau ở đâu thì lấy kết quả tại đó.

Sorry vì quên ko unprotect.

 

[SA_DQ]

Như iêu cầu ban đầu thì bạn đang cần 1 thủ tục & nó trong file đây

(òn vẫn muốn có hàm thì sẽ ngâm cứu tiếp với bạn!

 

[bebo021999]

Cái này theo nguyên tắc: Hàng ngang dóng sang và hàng dọc dóng xuống. Gặp nhau ở đâu thì lấy kết quả tại đó.
Sorry vì quên ko unprotect.

Dùng công thức này tại B40:

=VLOOKUP(LEFT(ROUND(A40,2),3),$A$3:$K$38,MATCH(".0"&IF(LEN(A40)=3,"0",RIGHT(ROUND(A40,2))),A1:K1,0),0)

 

[SA_DQ]

Còn đây là hàm người dùng:

Option Explicit
Function TraBang(Num As Double)
 Dim Dg As Double, Cot As Double
 Dim Rng As Range, sRng As Range, cRng As Range
    
 Num = Format(Num, "#.##")
 Dg = Int(Num * 10) / 10
 Cot = ((Num * 100) Mod 10)
 Set Rng = Range("BangTra")
 Set sRng = Rng.Find(Dg, , xlFormulas, xlWhole)
 If Not sRng Is Nothing Then
   Set cRng = Rng(1).Resize(, Rng.Columns.Count).Find(".0" & CStr(Cot))
   If Not cRng Is Nothing Then
      TraBang = Cells(sRng.Row, cRng.Column).Value
   Else
      TraBang = "???"
   End If
 Else
   TraBang = "SÓ QUÁ LÓN!"
 End If
End Function

Cách xài: Tại 1 ô trống nào đó ta nhập cú fáp sau: =TraBang(A41)
Với 1 chú í quan trọng là bảng tra của bạn đã được gán tên 'BangTra' trước khi đưa hàm vô sử dụng.

 

[Ba Tê]

Sao lại tìm số trong cột text cho phiền nhỉ.
Tìm số trong bảng số có phải nhẹ nhàng hơn không.
Mượn bảng của bạn SA_DQ nhé