Page 1 of 1
ต้องการหา cell ที่ว่าง เพื่อไม่ให้คำนวณสูตร (หรือให้ใส่ค่าว่าง)
Posted: Sun May 21, 2017 8:56 am
by rosejung
ต้องการหา cell ที่ว่าง เพื่อไม่ให้คำนวณสูตร (หรือให้ใส่ค่าว่าง)
เนื่องจากจะมีการคำนวณสูตร ด้วย macro แล้วให้คำนวณสูตรตาม data ที่ row มีการผันแปรทุกครั้งค่ะ
Re: ต้องการหา cell ที่ว่าง เพื่อไม่ให้คำนวณสูตร (หรือให้ใส่ค่าว่าง)
Posted: Sun May 21, 2017 9:01 am
by snasui
กรุณาแนบไฟล์ประกอบ พร้อมทั้งชี้ให้เห็นว่า กรณีใดจึงจะตรงตามที่ต้องการ กรณีใดที่ไม่ตรงตามต้องการ
การสอบถามปัญหาเกี่ยวกับ VBA จำเป็นจะต้องทำตามกฎการใช้บอร์ดข้อ 5 ด้านบน
กรุณาอ่านและปฏิบัติตามกฎทุกข้อครับ
Re: ต้องการหา cell ที่ว่าง เพื่อไม่ให้คำนวณสูตร (หรือให้ใส่ค่าว่าง)
Posted: Sun May 21, 2017 9:33 am
by rosejung
Code: Select all
Sub test()
Range("E1").Select
ActiveCell.FormulaR1C1 = "=+RC[-4]&RC[-3]"
Range("E1").Select
Selection.AutoFill Destination:=Range("E1:E23"), Type:=xlFillDefault
Range("E1:E23").Select
Range("E1").Select
End Sub
1. ต้องการให้ E คำนวณเฉพาะที่มีข้อมูลใน A ค่ะ เนื่องจากข้อมูล A มีการผันแปรตลอดค่ะ ไม่คงที่
Re: ต้องการหา cell ที่ว่าง เพื่อไม่ให้คำนวณสูตร (หรือให้ใส่ค่าว่าง)
Posted: Sun May 21, 2017 10:05 am
by snasui
แนบไฟล์ Excel ตัวอย่างมาด้วยครับ
แสดงตัวอย่างคำตอบที่ต้องการมาด้วยจะได้สะดวกในการทำความเข้าใจครับ
Re: ต้องการหา cell ที่ว่าง เพื่อไม่ให้คำนวณสูตร (หรือให้ใส่ค่าว่าง)
Posted: Sun May 21, 2017 10:07 am
by rosejung
snasui wrote: แนบไฟล์ Excel ตัวอย่างมาด้วยครับ
แสดงตัวอย่างคำตอบที่ต้องการมาด้วยจะได้สะดวกในการทำความเข้าใจครับ
Re: ต้องการหา cell ที่ว่าง เพื่อไม่ให้คำนวณสูตร (หรือให้ใส่ค่าว่าง)
Posted: Sun May 21, 2017 10:19 am
by snasui
ไฟล์ที่แนบมานี้ไม่ได้ชี้ให้เห็นว่า "ต้องการหา cell ที่ว่าง เพื่อไม่ให้คำนวณสูตร (หรือให้ใส่ค่าว่าง)"
ควรทำตัวอย่างและคำตอบให้สอดคล้องกับคำถาม คือต้องมีเซลล์ว่างประกอบเข้ามาด้วย จะได้เห็นว่าเมื่อเป็นค่าว่างแล้วให้แสดงผลลัพธ์เช่นไร หากไม่ว่างแล้วจะให้แสดงผลลัพธ์เช่นไร เช่นนี้เป็นต้นครับ
การทำงานนี้ใช้สูตร If เข้ามาช่วยคือด้านล่าง ลองนำไปใช้ในขั้นตอนการบันทึก Macro แทนสูตรเดิมครับ
เซลล์ E1 คีย์
=If(A1="","",A1&B1)
Enter