Snasui Excel Forum

ไม่ทราบว่าผมอธิบายเคลียร์ไหม ถ้าอธิบายแล้วงงๆ ผมขออภัยนะครับ

ต้องการจะ Lock ตำแหน่ง Cell ในสูตร ไม่ให้ตำแหน่งเคลื่อนตาม การ Shift Cell ไปทางซ้าย

จาก Code VBA คำสั่งนี้

If NC > 10 Then .Range("D2:D3").Delete xlShiftToLeft

และผมได้เขียนสูตร อ้างอิงกับตำแหน่ง Cell ไว้ ประมาณนี้

=IF($J$2-$I$2>SUM($D$2:$I$2),TRUE,FALSE)

เมื่อ Code VBA ทำงาน คือ Shift Cell ย้ายไปทางซ้ายเพื่อจะบันทึกข้อมูลใน Cell ซ้ายสุด
ผลจากการทำงานของ Code VBA นี้ ดันเลื่อนตำแหน่ง Cell ในสูตรผมตามไปด้วย คือเลื่อน Cell เป็น

=IF($I$2-$H$2>SUM($D$2:$H$2),TRUE,FALSE)

ลองดูรูปประกรอบนะครับ ไฟล์ตัวอย่างนะครับ ขอขอบคุณล่วงหน้านะครับ ^^

.

ตัวอย่างการปรับสูตรครับ

=IF(INDIRECT("$J$2")-INDIRECT("$I$2")>SUM(INDIRECT("$D$2:$I$2")),TRUE,FALSE)

ใช้ได้แล้วครับ ขอบคุณมากๆเลยครับผม

ผมจะไปศึกษาเพิ่มเติมเกี่ยวกับคำสั่ง Indirect นะครับ

ขอบคุณสำหรับความช่วยเหลือนะครับ ^/|\^