viết giúp em code của công thức sau

[huynhhuynh87]

Em có dùng công thức sau nhưng em không biết viết code về công thức đó sao cả, anh chị nào biết chỉ em với, em cảm ơn.
công thức 1 như sau: =IF(M8="UNKNOWN",0,IF(M8=0,0,IF(AND(VLOOKUP(M8,$A$2:$F$28062,2,0)=200,VLOOKUP(M8,$BN$2:$BS$19999,2,0)=400),0,IF(VLOOKUP(M8,$A$2:$F$28062,2,0)=200,VLOOKUP(M8,$BN$2:$BS$19999,2,0),IF(VLOOKUP(M8,$A$2:$F$28062,2,0)=200,0,VLOOKUP(M8,$A$2:$F$28062,2,0))))))

 

[SA_DQ]

Em có dùng công thức sau nhưng em không biết viết code về công thức đó sao cả, anh chị nào biết chỉ em với, em cảm ơn.
công thức 1 như sau: =IF(M8="UNKNOWN",0, IF(M8=0,0,
IF(AND(VLOOKUP(M8,$A$2:$F$28062,2,0)=200,VLOOKUP(M8,$BN$2:$BS$19999,2,0)=400),0,
IF(VLOOKUP(M8,$A$2:$F$28062,2,0)=200,VLOOKUP(M8,$BN$2:$BS$19999,2,0),
IF(VLOOKUP(M8,$A$2:$F$28062,2,0)=200,0,VLOOKUP(M8,$A$2:$F$28062,2,0))))))

/(ết quả công thức này sẽ được gán vô ô nào vậy bạn?

 

[huynhhuynh87]

công thức nằm tại ô M8. mà nếu công thức nằm tại ô nào khác thì sao vậy anh?

 

[huynhhuynh87]

anh chị nào giúp em với, em đang cần. cảm ơn anh chị.

 

[ChanhTQ@]

Công thức nằm tại ô M8. mà nếu công thức nằm tại ô nào khác thì sao vậy anh?

Theo mình công thức này mà đem gán vô M8 là bị lỗi.

/-)ể nhanh & ít lời, mình đề nghị bạn giả lập 1 trang tính khoảng 999 dòng áp dụng công thức nớ & đưa lên diễn đàn đi

Học chay & làm chay chưa quen & rất mất thời gian của chung!

 

[nvson]

Bạn xem lại công thức Excel của bạn. Mình thấy chưa đúng đâu (xem lại các điều kiện).
Khi công thức Excel đúng thì chuyển sang VBA là đơn giản.

 

[Hoàng Trọng Nghĩa]

anh chị nào giúp em với, em đang cần. cảm ơn anh chị.

Thứ 1: Bạn cần phải có File mẫu để tham chiếu, từ đó mọi người sẽ hiểu code sẽ đặt tại đâu.

Thứ 2: Nhìn sơ công thức bạn tôi cũng thấy cần rút gọn nhiều lắm!

===> Bạn gửi File lên đi sẽ dễ thực hiện cho bạn.

 

[huynhhuynh87]

file em gởi lên, mong anh chị giúp
file: http://www.mediafire.com/?e9bu7evjjf71759

 

[Hoàng Trọng Nghĩa]

file em gởi lên, mong anh chị giúp
file: http://www.mediafire.com/?e9bu7evjjf71759

Không biết tôi sửa công thức của bạn lại như thế này thì bạn có ý kiến gì không:

=IF(VLOOKUP(D1,$A$2:$C$18771,2,0)=200,IF(VLOOKUP(D1,$H$2:$J$18706,2,0)=400,0,VLOOKUP(D1,$H$2:$J$18706,2,0)),VLOOKUP(D1,$A$2:$C$18771,2,0))

 

[SA_DQ]

Bạn tham khảo macro sau

Option Explicit
Sub FormulasIs()
 Dim LookUp1, LookUp2, VungA As Range, VungB As Range, WF As Object
 
 Set VungA = [B2].CurrentRegion
 Set VungB = [H1].Resize(VungA.Rows.Count, 3)
 Set WF = Application.WorksheetFunction
 LookUp1 = WF.VLookup([D1].Value, VungA, 2, False)
 LookUp2 = WF.VLookup([D1].Value, VungB, 2, False)
 If LookUp1 = 200 Then
   If LookUp2 = 400 Then
      [e2].Value = 0
   Else
      [e2].Value = LookUp2
   End If
 Else
   [e2] = LookUp1
 End If
End Sub

 

[le tin]

Bạn xem file thử đúng ý chưa
Bạn lưu ý lần sau nhớ đơn gỉản hóa việc gởi file , không nên tùm lum như vậy