Page 1 of 1

VBA ไม่ได้ใช้งานนานแล้ว Error

Posted: Wed Nov 27, 2019 1:49 pm
by Ekkaponr
รบกวนสอบถามครับ

VBA ผมใช้งานได้ปกติ แต่เมื่อเปิดค้างไว้ไม่ได้ใช้งานสักพัก แล้วกลับมาใช้งานใหม่ปรากฏ Error แบบนี้ครับ
Run-time error '-2147352571 (80020005)':
Could not set the Value property. Type mismatch.
ปกติผมแก้โดยเปิดปิดไฟล์ใหม่ครับ พอจะมีวิธีแก้แบบอื่นมั้ยครับ

Re: VBA ไม่ได้ใช้งานนานแล้ว Error

Posted: Wed Nov 27, 2019 8:10 pm
by snasui
:D รอให้เกิดอาการนี้อีกรอบ > คลิกปุ่ม Debug > สังเกตว่าค้างที่บรรทัดไหน > จับภาพบรรทัดนั้นมาแจ้งไว้อีกทีครับ

Re: VBA ไม่ได้ใช้งานนานแล้ว Error

Posted: Mon Dec 02, 2019 2:46 pm
by Ekkaponr
snasui wrote: Wed Nov 27, 2019 8:10 pm :D รอให้เกิดอาการนี้อีกรอบ > คลิกปุ่ม Debug > สังเกตว่าค้างที่บรรทัดไหน > จับภาพบรรทัดนั้นมาแจ้งไว้อีกทีครับ
อันนี้ Debug ที่ขึ้นตอนกดปุ่มเรียก Userform ครับ
Error runtime.png
Error runtime.png (103.08 KiB) Viewed 53 times

Re: VBA ไม่ได้ใช้งานนานแล้ว Error

Posted: Mon Dec 02, 2019 8:12 pm
by snasui
:D คลิกปุ่ม Debug แล้วจับภาพหน้าจอข้อความแจ้ง Error มาด้วยจะได้ช่วยดูได้ครับ

Re: VBA ไม่ได้ใช้งานนานแล้ว Error

Posted: Wed Dec 04, 2019 4:20 pm
by Ekkaponr
หลังจากที่กด Debug แล้ว VBA ไฮไลท์ ที่ Userform2 ผมจึงกด Debug >> Step Into ไปเรื่อยๆจะได้ผลลัพท์ตามภาพที่แคปมาครับ
Step2.png
Step2.png (141.6 KiB) Viewed 40 times
Step3.png
Step3.png (141.37 KiB) Viewed 40 times
Step4.png
Step4.png (153.61 KiB) Viewed 40 times

Re: VBA ไม่ได้ใช้งานนานแล้ว Error

Posted: Wed Dec 04, 2019 8:29 pm
by snasui
:D เนื่องจากรูป Error ขนาดเล็กมาก หากไล่ตามภาพจะเข้าใจว่าค่าที่จะกำหนดให้กับ TextBox1 ซึ่งอยู่ในเซลล์ปัจจุบันนั้นมีปัญหา ลองตรวจสอบว่าค่าในเซลล์ปัจจุบันนั้นเป็นค่าอะไร ต้องแก้ไขตรงนั้นครับ

Re: VBA ไม่ได้ใช้งานนานแล้ว Error

Posted: Fri Dec 06, 2019 4:49 pm
by Ekkaponr
ได้แล้วครับอาจารย์
ผมแก้ไข จาก TextBox1 = ActiveCell
เป็น ws = ActiveCell
TextBox1 = ws(แทนตัวแปรเข้าไปแทน)
และจาก TextBox5.Value = Sheets("Data").Range("E1")
เป็น TextBox5.Value = Sheets("Data").Range("E1").Value (เพิ่ม.Value)เข้ามา