การแสดงผลโดยมีหลายเงื่อนไข IF และ AND

[p_d]

สวัสดีค่ะ

ดิฉันมีไฟล์ที่ต้องใช้เงื่อนไขหลายอย่างในการแสดงผล ตามไฟล์แนบค่ะ โดยขออธิบายเงื่อนไขดังนี้
1.ตารางบนสุดเป็นค่าที่ได้จาก Vlookup จากฐานข้อมูลมา โดยจะมีค่าแต่ละเดือน 12 เดือนและขึ้นด้วยคอลัมภ์ Dif คือค่าผลต่างแต่ละเดือนเกิดจากการหักลบกับ curr.stock
2.ตารางที่สอง เป็นการแสดงผลโดยดึงเฉพาะแต่ละเดือนออกมาซึ่งมีเงื่อนไขคือ
2.1 ถ้าค่า stock เดือนนั้นๆ น้อยกว่าค่า curr.stock ให้นำ curr.stock-ค่าเดือนนั้น
2.2 ถ้าค่า stock เดือนนั้นๆ มากกว่าโดยไม่มีค่า Dif แสดงอยู่ให้แสดงค่าเป็น curr.stock แต่ถ้ามีค่า Dif ก็ให้ดึงค่า Dif มาแสดงแทน
3. เป็นตารางผลลัพธ์ที่ถูกต้อง เพื่อให้เข้าใจการแสดงผลที่ถูกต้อง เพราะไม่รู้จะอธิบายเข้าใจหรือไม่

ปล. ดิฉันลองใส่สูตรแล้วได้ผลลัพธ์ในตารางที่สองคอลัมภ์ G แต่ยังมีเงื่อนไขผิดอยู่คือ G27 คำตอบต้องเป็น 164 เพราะค่า stock ใน1608 มากกว่า curr.stock ต้องแสดงค่า curr.stock

รบกวนแนะนำด้วยค่ะ
ขอบคุณค่ะ
p_d

[DhitiBank]

ลองแบบนี้ครับ

F23

=IF(LEN(INDEX($F$2:$AB$16,MATCH($A23,$A$2:$A$16,0),MATCH(F$22,$F$1:$AC$1,0)))=0,0,
IF(INDEX($F$2:$AB$16,MATCH($A23,$A$2:$A$16,0),MATCH(F$22,$F$1:$AC$1,0))>$D23-SUM($E23:E23),
MAX(0,$D23-SUM($E23:E23)),INDEX($F$2:$AB$16,MATCH($A23,$A$2:$A$16,0),MATCH(F$22,$F$1:$AC$1,0))))

Enter >> คัดลอกไปทางขวาถึง Q23 >> คัดลอกลงล่างถึงแถวที่ 37 ครับ

[p_d]

เรียนคุณ DhitiBank

ขอบคุณมากนะคะ จะลองไปทำดูก่อนนะคะ ได้ผลอย่างไรจะแจ้งอีกทีคะ

ขอบคุณค่ะ
p_d

[p_d]

เรียน คุณ HitiBank

จากการใส่สูตรแล้วพบว่ายังไม่ผลลัพธ์ที่ไม่ตรงกับข้อมูลค่ะ ไม่ทราบว่าเป็นเพราะอะไร ดิฉันแนบไฟล์ตัวอย่างมาให้ดูค่ะ
ถ้าถูกต้องค่า sum all month จะต้อง่ตรงกับ curr.stock ค่ะ

ขอบคุณค่ะ
p_d

[DhitiBank]

สูตรที่ I105 มีบางตำแหน่งอ้างอิงผิดที่ครับ

=IF(INDEX($I$2:$AE$100,MATCH($A105,$A$2:$A$100,0),MATCH(I$104,$I$1:$AF$1,0))="",0,
IF(INDEX($I$2:$AE$100,MATCH($A105,$A$2:$A$100,0),MATCH(I$104,$I$1:$AF$1,0))>$D105-SUM($H104:H104),
MAX(0,$D105-SUM($H105:H105)),INDEX($I$2:$AE$100,MATCH($A105,$A$2:$A$100,0),MATCH(I$104,$I$1:$AF$1,0))))

[p_d]

คุณ DhitiBank

จริงด้วย ขอโทษนะคะ ตาลาย

ขอบคุณมากค่ะ
p_d

[p_d]

ขอถามเพิ่มเติมค่ะ คือดิฉันต้องการนำสูตรนี้มาใส่ใน macro แต่พอ copy มาใส่ปรากฎว่า macro error เป็นเพราะอะไรหรอคะ มันไม่สามารถ copy มาใส่แล้วรันได้ตามปกติ ดิฉันแนบไฟล์มาให้ดูด้วยค่ะ

Code: Select all

Sub RunFormula()

    Range("I3").Select
    ActiveCell.FormulaR1C1 = _
        "=IF(LEN(INDEX(TABLE1!R2C9:R2857C31,MATCH(TABLE2!RC1,TABLE1!R2C1:R2857C1,0),MATCH(TABLE2!R2C,TABLE1!R1C9:R1C32,0)))=0,0,IF(INDEX(TABLE1!R2C9:R2857C31,MATCH(TABLE2!RC1,TABLE1!R2C1:R2857C1,0),MATCH(TABLE2!R2C,TABLE1!R1C9:R1C32,0))>TABLE2!RC4-SUM(TABLE2!RC8:RC[-1]),MAX(0,TABLE2!RC4-SUM(TABLE2!RC8:RC[-1])),INDEX(TABLE1!R2C9:R2857C31,MATCH(TABLE2!RC1,TABLE1!R2C1:R2857C1,0" & _
        "TABLE2!R2C,TABLE1!R1C9:R1C32,0))))"
    Range("I3").Select
End Sub

[snasui]

ตัวอย่างการนำสูตรไปใช้ใน VBA ตามด้านล่างครับ

Code: Select all

ActiveCell.Formula = "=IF(LEN(INDEX(TABLE1!$I$2:$AE$100,MATCH(TABLE2!$A3,TABLE1!$A$2:$A$100,0),MATCH(TABLE2!I$2,TABLE1!$I$1:$AF$1,0)))=0" _
    & ",0,IF(INDEX(TABLE1!$I$2:$AE$100,MATCH(TABLE2!$A3,TABLE1!$A$2:$A$100,0),MATCH(TABLE2!I$2,TABLE1!$I$1:$AF$1,0))>TABLE2!$D3-SUM(" _
    & "TABLE2!$H3:H3),MAX(0,TABLE2!$D3-SUM(TABLE2!$H3:H3)),INDEX(TABLE1!$I$2:$AE$100,MATCH(TABLE2!$A3,TABLE1!$A$2:$A$100,0),MATCH(" _
    & "TABLE2!I$2,TABLE1!$I$1:$AF$1,0))))"

[p_d]

เรียน อาจารย์

ได้แล้วค่ะ ขอถามอีกนิดค่ะว่าเราจะใช้ "&" (ampersand) เชื่อมตรงไหนบ้างคะ ดูจากอะไร
ขอบคุณมากค่ะ
p_d

[snasui]

ใช้การเชื่อมตรงไหนก็ได้เนื่องจากสูตรที่เช่นเช่นนี้เป็น String ครับ

Code เดิมใช้การอ้างอิงสสูตรแบบ R1C1 และผมไม่ได้ตรวจสอบว่าเขียนเข้าไปใน Code ถูกต้องหรือไม่ อย่างไร แต่เห็นว่าไม่จำเป็นต้องเป็น R1C1 เขียนตรง ๆ เข้าไปก็ควรได้ผลลัพธ์เหมือนกัน

[p_d]

เรียน อาจารย์

ที่เป็น R1C1 ได้จากการ record macro ค่ะ เพิ่งรู้ว่าใน macro ก็สามารถเขียนตรง ๆ เข้าไปได้เลย ^ O^

ขอบคุณมากค่ะ
p_d