Page 1 of 1

เมื่อ Scan barcode แล้วให้บันทึกข้อมูล โดยไม่ต้องกดปุ่ม save เพื่อ run macro

Posted: Mon Mar 18, 2019 10:52 pm
by ch.jew10
ผมได้สร้าง form ที่ sheetชื่อ form เพื่อให้ user กรอกข้อมูล เมื่อกดปุ่ม save ที่มุมขวาด้านล่าง

จะ copy ข้อมูลไปใน sheet List non conform ครับ ที่ต้องการคือ หากมีการ scan barcode รับค่า imei ที่ช่อง cell c10

แล้วให้บันทึกข้อมูลไปเลย โดยไม่ต้องกดปุ่ม save จะทำได้หรือไม่ครับ ขอบคุณมากครับ

Re: เมื่อ Scan barcode แล้วให้บันทึกข้อมูล โดยไม่ต้องกดปุ่ม save เพื่อ run macro

Posted: Tue Mar 19, 2019 8:02 am
by puriwutpokin
ไปที่ VBA ที่ชีท Form
ใส่โค้ดตามนี้ดูครับ :D

Code: Select all

Private Sub Worksheet_Change(ByVal Target As Range) 'Excel VBA change event test for close.
If Not Intersect(Target, Range("c10")) Is Nothing Then
Application.EnableEvents = False
If Target = Range("c10") Then
Call Macro1
End If
End If
Application.EnableEvents = True
End Sub

Re: เมื่อ Scan barcode แล้วให้บันทึกข้อมูล โดยไม่ต้องกดปุ่ม save เพื่อ run macro

Posted: Wed Mar 20, 2019 1:06 am
by ch.jew10
ทดลองแล้วยังไม่ได้ผล error อยู่ครับ

Private Sub Worksheet_Change(ByVal Target As Range) 'Excel VBA change event test for close. แถบสีเหลือง
If Not Intersect(Target,Range("C10") Is Nothing Then ตัวหนังสือสีแดง
แล้วพอใส่ code ที่ sheet form ปุ่ม save ไม่สามารถใช้งานได้ครับ

Re: เมื่อ Scan barcode แล้วให้บันทึกข้อมูล โดยไม่ต้องกดปุ่ม save เพื่อ run macro

Posted: Wed Mar 20, 2019 6:33 am
by puriwutpokin
แนบไฟล์​ที่ใส่โค้ดนั้นมาดูครับ

Re: เมื่อ Scan barcode แล้วให้บันทึกข้อมูล โดยไม่ต้องกดปุ่ม save เพื่อ run macro

Posted: Wed Mar 20, 2019 7:54 pm
by ch.jew10
ผมทดลองอีกที ใช้งานได้ตามที่ต้องการแล้วครับ ขอบคุณมากครับ