:!: โปรดทราบ Image
    1. กรุณาอ่านกฎการใช้บอร์ด (Forum rules) ในตำแหน่งด้านบนของแต่ละบอร์ดครับ Image
    2. การสมัครสมาชิกเพื่อโพสต์คำถาม ดาวน์โหลดไฟล์แนบไปศึกษา ทำตามขั้นตอนด้านล่างครับ
      1. สมัครสมาชิก ดูขั้นตอนตาม Link นี้ครับ => สมัครสมาชิก กรณีลืมรหัสผ่านสามารถรับรหัสใหม่ได้ที่นี่ครับ => Reset รหัสผ่านImage
      2. Login เข้าระบบโดยคลิก Login ตรงมุมขวาบนของหน้านี้ Image กรณีมีปัญหาในการเข้าใช้งาน คลิก Link นี้เพื่อแจ้งผู้ดูแลระบบครับ => ติดต่อผู้ดูแลระบบ
    3. เมื่อ Login แล้วสามารถกำหนดการตั้งค่าส่วนตัว เช่นตั้งค่าภาษาเป็นไทยหรืออังกฤษได้ที่ Link นี้ครับ => ตั้งค่าส่วนตัว Image
    4. วิธีการตั้งและตอบกระทู้ดูได้ที่ Link นี้ครับ => วิธีการตั้งและตอบกระทู้ Image
    5. การจัดรูปแบบตัวอักษรด้วย bbcode ในช่องแสดงความคิดเห็นดูได้ที่ Link นี้ครับ => จัดรูปแบบตัวอักษร และสามารถกำหนดขนาดตัวอักษรใน Browser ได้ที่นี่ครับ ==> กำหนดขนาดตัวอักษรใน Browser Image

พบ Automation Error (Error 440) เมื่อใช้งาน VBA ค่ะ

ฟอรั่มถาม-ตอบปัญหาการใช้งาน MS Excel and VBA
Forum rules
  1. ไม่อนุญาตให้ใช้ภาษาแชทในการถาม-ตอบปัญหา ไม่ใช้คำว่า "คับ" หรือ "อ่ะครับ" แทนคำว่า "ครับ" ไม่ใช้คำว่า "เด๋ว" แทนคำว่า "เดี๋ยว" เป็นต้น เนื่องจากเมื่อแปลเป็นภาษาต่างประเทศแล้วจะให้ความหมายผิดไปจากที่ควรจะเป็น
  2. ห้ามถามโดยระบุชื่อผู้ตอบ ต้องตั้งชื่อกระทู้ให้สื่อถึงปัญหาที่จะถาม ไม่ตั้งชื่อว่า ช่วยด้วยครับ, มีปัญหามาปรึกษาครับ เป็นต้น
  3. อธิบายปัญหาและระบุคำตอบที่ต้องการมาในกระทู้ด้วยเสมอถึงแม้จะอธิบายไว้ในไฟล์แนบแล้วก็ตาม ทั้งนี้เพื่ออำนวยความสะดวกแก่เพื่อนสมาชิกในการค้นหาข้อมูล
  4. ควรแนบตัวอย่างไฟล์มาที่ฟอรั่มนี้เพื่อเพิ่มความสะดวกในการตอบคำถาม (ขนาดไฟล์ไม่เกิน 500Kb ขนาดภาพไม่เกิน 800*600 Pixel) ไม่แนบเป็น Link มาจากแหล่งอื่น นอกจากนี้ไม่ควรแนบไฟลที่มีข้อมูลสำคัญอันก่อให้เกิดความเสียหายกับตนเองและผู้อื่น
  5. สำหรับคำถามเกี่ยวกับ VBA ให้ลองเขียนมาเองก่อนเสมอ ถามเฉพาะที่ติดปัญหา ระบุ Module, Procedure ที่ติดปัญหาให้ชัดเจน ควรโพสต์ Code ให้แสดงเป็น Code เพื่อสะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่าง)
  6. แจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่
faiiz
Member
Member
Posts: 2
Joined: Wed Nov 15, 2017 7:00 pm

พบ Automation Error (Error 440) เมื่อใช้งาน VBA ค่ะ

#1

Postby faiiz » Wed Nov 15, 2017 7:15 pm

สวัสดีค่ะ
ดิฉันเขียนโปรแกรมเพื่อ คัดลอก row ค่ะ แล้วพบว่าถ้าดิฉันเปิดเข้าไปในโปรแกรมแล้วสั่ง Run VBA จะสามารถคัดลอก row ได้ไม่มีปัญหา
แต่ถ้าดิฉัน เข้าไปพิมพ์ข้อความก่อน แล้วสั่ง Run VBA Excelจะฟ้อง Error ทันทีค่ะ
ซึ่งสามารถพิมพ์ข้อความก่อน Run VBA ได้ในคอมพิวเตอร์บางเครื่อง บางเครื่องไม่สามารถทำงานได้ค่ะ
โดยจะแสดง Error ออกมาดังรูปค่ะ ( ใช้ Excel 2013 ทุกๆเครื่องค่ะ)
Capture.PNG

เมื่อกด Help excel พามายัง link นี้ค่ะ https://msdn.microsoft.com/en-us/vba/la ... -error-440

โดยผลที่ตามมาคือ Excel ไม่สามารถเลือก Cell ต่างๆได้ ซึ่งปกติแล้วถ้าเลือก cell จะมีไฮไลท์รอบๆ Cell นั้น
แต่เมื่อเกิด Error ขึ้นแล้ว กลับไม่สามารถเลือกได้ค่ะ ทำให้เมื่อ Run VBA อีกครั้งหนึ่ง จะฟ้อง Error ว่าไม่สามารถ Selection cell ได้ค่ะ

ซึ่งดิฉันพยายามหาวิธีใน Microsoft Support แล้วแต่ยังหาวิธีแก้ไขไม่ได้ค่ะ
You do not have the required permissions to view the files attached to this post.

User avatar
puriwutpokin
Silver
Silver
Posts: 993
Joined: Fri Jan 04, 2013 9:49 pm

Re: พบ Automation Error (Error 440) เมื่อใช้งาน VBA ค่ะ

#2

Postby puriwutpokin » Wed Nov 15, 2017 7:33 pm

ควรแนบไฟล์ตัวอย่างและโค้ดที่ติดปัญหามาด้วยครับ​ เพื่อนๆสมาชิกจะได้เข้าถึงปัญหานั้นได้ครับ
:roll: สูตรที่ต้องกด Ctrl+Shift+Enter เพื่อให้สูตร Array นั้นทำงาน

faiiz
Member
Member
Posts: 2
Joined: Wed Nov 15, 2017 7:00 pm

Re: พบ Automation Error (Error 440) เมื่อใช้งาน VBA ค่ะ

#3

Postby faiiz » Wed Nov 15, 2017 8:31 pm

ขอบคุณค่ะที่แนะนำ

CodeAddrow.PNG

นี่คือ Code ที่ใช้ค่ะ
ซึ่ง Error 440 ที่ดิฉันได้แจ้งไปข้างต้น จะเกิดขึ้น แล้วหลังจากนั้นจะทำให้ Code ชุดนี้ที่แนบไปนั้นไม่สามารถใช้งานได้ค่ะ
เนื่องจาก ติดปัญหา การ Select Row ค่ะ

เมื่อ Error 440 จะเป็นลักษณะตามภาพนี้ค่ะ
CannotSelectCell.PNG

ถ้าสังเกตดูจะเห็นว่าไม่ได้แสดงว่าดิฉันเลือก Cell ที่มีเลข 2 อยู่ ซึ่งจริงๆแล้ว ดิฉัน เลือก Cell นั้นค่ะ
โดยปกติถ้าเราเลือก cell จะมีลักษณะดังนี้ค่ะ
activecell.PNG


แต่เมื่อทำการปิดไฟล์และเปิดขึ้นมาใช้งานโดย Run VBA เพียงอย่างเดียวแล้ว พิมพ์ข้อความ จะสามารถทำงานได้ค่ะ
แต่หากทำการพิมพ์ข้อความก่อน แล้วจึง Run VBA จะไม่สามารถใช้งานได้ โดยจะแสดง ERROR 440 ออกมาค่ะ
You do not have the required permissions to view the files attached to this post.

User avatar
snasui
Site Admin
Site Admin
Posts: 22334
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Contact:

Re: พบ Automation Error (Error 440) เมื่อใช้งาน VBA ค่ะ

#4

Postby snasui » Thu Nov 16, 2017 5:50 am

:D การแนบ Code ให้ดูใน Link ของกฎการใช้บอร์ดข้อ 5 ด้านบนครับ

ลองแนบไฟล์ตัวอย่าง ตัดมาเฉพาะส่วนที่เป็นปัญหามาดูกันจะได้ช่วยตรวจสอบได้ จาก Code ที่เขียนมานั้นเป็นแค่การคัดลอก แทรก และ Clear ที่เป็นการใช้งานแบบปกติทั่วไป

การทำงานที่เป็นการแทรกบรรทัดจะมีปัญหาขึ้นได้ก็ต่อเมื่อ Worksheet นั้นมีข้อมูลจนถึงบรรทัดสุดท้าย โปรแกรมจะไม่ให้เราแทรกข้อมูลได้อีก ในทางคอลัมน์ก็เช่นกัน หากมีข้อมูลถึงคอลัมน์สุดท้ายก็จะไม่สามารถแทรกคอลัมน์ได้อีก

ในเบื้องต้น ลองตรวจสอบข้อมูลว่ามีลักษณะตามด้านบนหรือไม่ครับ


Return to “Excel”

Who is online

Users browsing this forum: 060090, puriwutpokin and 32 guests