แบบฟอร์มหนังสือส่งเอกสาร doc

wiroj

unread,

Sep 9, 2012, 5:07:16 AM9/9/12

to

เรียน อ.สำเริง และเพื่อนสมาชิกทุกท่าน

ขอรบกวนอาจารย์ และเพื่อนสมาชิก ช่วยสร้างแบบฟอร์มสำหรับบันทึกทะเบียนหนังสือรับ-ส่ง เพื่อให้บันทึกลงใน sheet ที่กำหนด 

ซึ่งผมได้สร้างไว้แล้วแต่ยังไม่สามารถใช้ได้

รายละเอียดตามไฟล์ที่แนบมา

ขอบคุณครับ

ธุรการใหม่ หัวใจไอที

แบบฟอร์มบันทึกทะเบียนหนังสือรับ-ส่ง.xlsx

Samroeng

unread,

Sep 11, 2012, 5:24:06 AM9/11/12

to

เรียน คุณวิโรจน์ และเพื่อนสมาชิก

ผมได้ลองปรับปรุงงานตัวอย่างที่คุณวิโรจน์สอบถามมา เพื่อให้การทำงานเป็นไปโดยอัตโนมัติมากขึ้น ลองดูจากไฟล์ตัวอย่างที่แนบมานี้ครับ

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

ก่อนใช้งาน ต้องเปิดการใช้ Macro ด้วยนะครับ

อ.สำเริง

ปล.ไฟล์นี้สำหรับ Excel 2007-2010 เท่านั้น


แบบฟอร์มบันทึกทะเบียนหนังสือรับ-ส่ง.xlsm

Boontiwa

unread,

Sep 11, 2012, 7:03:42 AM9/11/12

to excel for hr

เรียนอาจารย์สำเริงคะ

ขอบคุณสำหรับตัวอย่างไฟล์ข้อมูลซึ่งสามารถนำไปใช้งานจริงได้เลยค่ะ.. ^__^

แต่หนูมีปัญหาเรื่องการนำไฟล์ไปใช้งาน (เนื่องจากยังอ่อนเรื่องการใช้Excelอยู่พอควร)  ในกรณีที่ฟิวข้อมูลลงไปแล้วต้องการบันทึก จะขึ้นข้อความว่า "ไฟล์.xls is locked for editing"... กรณีเช่นนี้ต้องปลดล็อคอย่างไรคะ

รบกวนอาจารย์ด้วยค่ะ

ขอบคุณค่ะ

บุญทิวา

Samroeng

unread,

Sep 11, 2012, 8:12:45 AM9/11/12

to

เรียน คุณบุญทิวา

หมายถึงว่าไฟล์อื่นใช่มั๊ยครับ (เพราะไฟล์ที่ผมแนบมาในเมล์นี้ ไม่ได้ล๊อคอะไรเลย)

จากที่ถามมา น่าจะเกิดจากมีการป้องกันการแก้ไข (Protect sheet) การแก้ไข ให้ทำดังนี้

Excel2003 : เข้าไปที่เมนู Tools > Protection > Unprotect sheet

Excel2007-2010 : ให้คลิกขวาที่ชื่อชีทนั้น แล้วเลือก Unprotect sheet

อ.สำเริง

Sent from Samsung Galaxy S-II

Boontiwa

unread,

Sep 12, 2012, 12:47:59 AM9/12/12

to excel for hr

เรียน อาจารย์สำเริง

ขอบคุณค่ะที่กรุณาให้ข้อมูล(อาจารย์เข้าใจถูกต้องค่ะ หนูหมายถึงกรณีที่เปิดไฟล์อื่นน่ะค่ะ แต่ลองทำตามวิธีที่อาจารย์แนะนำก็ใช้ได้เลยค่ะ)

สำหรับไฟล์แบบฟอร์มบันทึกทะเบียนหนังสือรับ-ส่ง อันนี้ หนูมีคำถามต่อค่ะ
Sheet Form column: "C19" (หนังสือส่ง) หากต้องการคีย์ข้อมูลวันที่ลงไปเอง(เหมือนหนังสือรับ) ต้องไปแก้ไขสูตรอย่างไรคะ

หนูลองcopy จาก "C6" (หนังสือรับ) มาวาง แต่พอเวลากดบันทึกหนังสือส่งไปแล้ว ข้อมูลวันที่ยังอยู่ ไม่ได้หายไปเหมือน column อื่นๆ น่ะค่ะ

รบกวนอาจารย์อีกครั้งค่ะ

ขอบพระคุณค่ะ

Samroeng

unread,

Sep 12, 2012, 1:22:06 AM9/12/12

to

เรียน คุณอุ๋ย

วันที่ส่งนั้น สามารถพิมพ์ลงไปได้เลยครับ แต่เนื่องจากต้นแบบเดิม ในเซลนั้นเป็นสูตร ตอนบันทึกข้อมูลแล้ว ผมจึงไม่ได้สั่งให้ลบข้อมูลวันที่ดังกล่าว

กรณีนี้ ถ้าไล่ macro เป็น ก็ลองเข้าไปเพิ่มคำสั่ง เพื่อลบวันที่ด้วย ก็ไม่ยากครับ เข้าไปดูรหัสคำสั่ง โดยการคลิกขวาที่ชื่อชีท เลือก view code แล้วดับเบิลคลิกที่ module1 ครับ

อ.สำเริง

Sent from Samsung Galaxy S-II

rewat.sithkankiat

unread,

Sep 12, 2012, 1:50:35 AM9/12/12

to

เป็นข้อมูลที่ดีมากเลยครับ

หากแต่จะรบกวนช่วยอธิบาย แมโคร จักขอบคุณยิ่งครับ

Application.ScreenUpdating = False

ThisWorkbook.Activate

MyVar = [RecvData]

[RecvTarget] = MyVar

ActiveWorkbook.Save

Application.Goto Reference:="RecvClear"

Selection.ClearContents

Range("C5").Select

Application.ScreenUpdating = True

MsgBox ("บันทึกข้อมูลหนังสือรับ เรียบร้อยแล้ว")

แต่ละบรรทัดเพื่อเป็นความรู้ เล็กๆ น้อยๆ ครับ ต่อไปคงจะเขียนแบบนี้ได้บ้างครับ

รู้เป็นบางบรรทัดเท่านั้นเองครับ

ขอบคุณครับ

Boontiwa

unread,

Sep 12, 2012, 1:51:17 AM9/12/12

to excel for hr

เรียนอาจารย์

ขอบคุณอีกครั้งค่ะ ^^

(แหะๆ จำชื่อเล่นอุ๋ยได้ด้วยอ่ะ  อายจัง ^_^)

อุ๋ยจะจัดฝึกอบรม In-house Training อีกแล้วค่ะ อาจจะต้องมีทั้ง word   excel  powerpoint โดยแบ่ง train แต่ละหลักสูตรเป็นรุ่นๆ ไป หากอาจารย์จะแนะนำวิทยากรมืออาชีพ(เหมือนอาจารย์) จะขอบคุณมากเลยค่ะ

ด้วยความนับถือ

อุ๋ยค่ะ

ป๋าหมาก

unread,

Sep 12, 2012, 6:31:24 AM9/12/12

to

Application.ScreenUpdating = False                          หยุดการเคลื่อนไหวของหน้าจอ

ThisWorkbook.Activate                                           ให้สมุดงานที่บันทึกมาโครนี้ Active

MyVar = [RecvData]                                                 เก็บค่าจากช่วง RecvData ไปไว้ที่ MyVar

[RecvTarget] = MyVar                                              ส่งค่าจาก MyVar ไปเก็บยัง RecTarget

ActiveWorkbook.Save                                             สั่งบันทึก

Application.Goto Reference:="RecvClear"             เลือกช่วง RevClear

Selection.ClearContents                                         ลบค่าในช่วงที่เลือก

Range("C5").Select                                                 เลือกเซลล์ C5

Application.ScreenUpdating = True                        เคลื่อนไหวหน้าจอให้เป็นปกติ

MsgBox ("บันทึกข้อมูลหนังสือรับ เรียบร้อยแล้ว")  แสดงกล่องข้อความ

Pabhawarin Sukyong

unread,

Sep 3, 2013, 3:47:05 AM9/3/13

to

เรียน อาจารย์

ขอมูลน่าสนใจมากเลยคะ ดิฉันลองทำแล้วแต่บันทึกไม่ได้ รบกวน อาจารย์ช่วยแนะนำด้วยคะ (ดิฉันทำการบันทึกไฟล์ที่ อ. ลงไว้ให้ โดยการกดดาวน์โหลด์ แล้วก็ลองทำการบันทึก แล้วก็ไม่สำเร็จคะ) 

ขอบคุณคะ

เมื่อ วันอังคารที่ 11 กันยายน ค.ศ. 2012, 16 นาฬิกา 24 นาที 50 วินาที UTC+7, อ.สำเริง เขียนว่า:

Samroeng

unread,

Sep 3, 2013, 6:58:34 AM9/3/13

to Excel4HR

เนื่องจากไฟล์ชุดนี้ ต้องเปิดให้ Macro ทำงานด้วย จึงจะสามารถคลิกปุ่มบันทึกได้ ฉะนั้น ตอนเปิดไฟล์ขึ้นมา จะต้องคลิกยอมรับ Macro enable ด้วยนะครับ

อ.สำเริง

Y.Samroeng Tel.081-4239828
Send from Galaxy Tab

--
******************
|= คุณได้รับเมล์นี้ เพราะคุณเป็นสมาชิกกลุ่ม "Excel_for_HR" ของ อ.สำเริง ยิ่งถาวรสุข

Pabhawarin Sukyong

unread,

Sep 3, 2013, 9:32:10 PM9/3/13

to

เรียน อ.สำเริง

ขอบคุณมากคะ ใช้ได้แล้วคะ และจะพยายามนำสิ่งที่ อ. มาเผยแพร่ มาพัฒนาตนเองคะและที่ทำงานคะ

ขอบคุณคะ

รัชชุกาญจน์ มองเพ็ชร

unread,

Nov 12, 2015, 4:46:28 AM11/12/15

to Excel_for_HR

อาจารย์ค่ะหนูลองเอาไฟล์มาใช้ดูตรงวันที่ต้องใส่แบบไหนค่ะ เพราะตอนนี้หนูใส่ไปมันขึ้นแบบนี้ค่ะ ######

เมื่อ วันอังคารที่ 11 กันยายน ค.ศ. 2012 16 นาฬิกา 24 นาที 06 วินาที UTC+7, อ.สำเริง เขียนว่า:

Samroeng

unread,

Nov 12, 2015, 4:48:43 AM11/12/15

to Excel4HR

ลองขยายความกว้างของคอลัมน์นั้น เพื่อให้วันที่แสดงได้เต็มคอลัมน์ครับ

อ.สำเริง

กองแผนและพัฒนา มหาวิทยาลัยหัวเฉียวเฉลิมพระเกียรติ

unread,

Nov 17, 2015, 9:42:04 PM11/17/15

to Excel_for_HR

ตรงช่อง ที่  ในฟอร์มทะเบียนหนังสือส่ง อยากจะเพิ่มตัวเลือกอีกทำยังไงค่ะ หรือต้องการพิมพ์ลงไปเองต้องทำแบบไหน

เมื่อ วันพฤหัสบดีที่ 12 พฤศจิกายน ค.ศ. 2015 16 นาฬิกา 48 นาที 43 วินาที UTC+7, อ.สำเริง เขียนว่า:

เหมี่ยวจัง ..จ๋า

unread,

Nov 17, 2015, 9:42:04 PM11/17/15

to อ.สำเริง

คุณเอก คะ

  รบกวนคะ  แก้ไข ไฟล์ประวัติพนักงานให้ด้วยคะ  เนื่องจาก ว่า ข้อมูลไม่ลิงค์ จะดูพนักงานว่าในแต่ละเดือนเกิดวันที่เท่าไหร่ เดือนไหนบ้างคะ อายุงานกี่ปีแต่ละคนในแต่ละเดือนคะ

ขอบคุณคะ

ประวัติพนักงานทั้งหมด 58.xlsx

Samroeng

unread,

Nov 18, 2015, 2:58:59 AM11/18/15

to Excel4HR

เนื่องจาก เจ้าของไฟล์เดิม ที่ทำไว้ครั้งแรก เขากำหนดตัวเลือก แยกเป็นหน่วยงาน ซึ่งมีจำนวนแน่นอน จึงใส่ไว้ใน Data > Validation เลย หากคุณต้องการเปลี่ยน หรือเพิ่มเติมข้อความ ก็เข้าไปแก้ไขที่ Data > Validation โดยตรง หรือจะสร้างตารางตัวเลือกไว้ก่อน แล้วค่อยลิงค์มาเติมก็ได้ครับ

อ.สำเริง

Samroeng

unread,

Nov 18, 2015, 3:13:47 AM11/18/15

to Excel4HR

คุณเหมียว

ปัญหาเกิดจาก การที่ไม่ได้ล๊อกเซลอ้างอิงครับ

ทั้งเซลเดือนที่เลือก และเซลช่วงรายชื่อเดือนที่ไป MATCH

ดังนั้น เมื่อคัดลอกสูตรไป เซลอ้างอิงก็เลยเพี้ยนไป

ลองดูในไฟล์แนบครับ

อ.สำเริง

ประวัติพนักงานทั้งหมด 58.xlsx

unread,

Dec 4, 2017, 8:04:38 AM12/4/17

to Excel_for_HR

ขออนุญาตถามนะคะ  ทราบมาว่าการลงทะเบียนหนังสือรับหนังสือส่งมีแบบออนไลน์  แต่ทำไม่เป็นทำยังไงคะพอจะตอบได้มั๊ยคะพอดีเป็นธุรการโรงเรียนคะทำงาน  3  โรงเรียนคะ

เมื่อ วันอาทิตย์ที่ 9 กันยายน ค.ศ. 2012 2 นาฬิกา 07 นาที 16 วินาที UTC-7, wiroj เขียนว่า:

unread,

Feb 8, 2018, 11:52:49 PM2/8/18

to Excel_for_HR

โปรแกรมเป็นคุณต่องานสารบัญมากเลยครับ แต่อยากเพิ่มอีกหนึ่ง เป็น data3  หนังสือสั่งการ เพื่อลงหนังสือคำสั่งอะครับ

กรุณาด้วย ลองก๊อบวางแล้วทำไม่ไปเป็น คือส่วนปุ่มบันทึกอะคับ ไม่รู้จะให้มันไป data3 ยังไงครับ

wanicha k

unread,

Feb 10, 2018, 4:12:21 AM2/10/18

to

ใช้ google form ก็สะดวกดีนะคะ //พอสรุปออกมาให้เลือกเอาตัวที่เป็น spread sheet หน้าตาคล้ายๆ Excel / พอexport ออกมา เป็น format Excel เอาไปสรุปเพื่อทำงานต่อได้เลยค่ะ

Toplist

โพสต์ล่าสุด

แท็ก

flow chart แสดงขั้นตอนการปฏิบัติงาน lmyour แปลภาษา กาพย์เห่ชมเครื่องคาวหวาน กาพย์เห่เรือ การเขียน flowchart โปรแกรม ตัวรับสัญญาณ wifi โน๊ตบุ๊คหาย ตัวอย่าง flowchart ขั้นตอนการทํางาน ผู้แต่งกาพย์เห่ชมไม้ ภูมิปัญญาหมายถึง มีสัญญาณ wifi แต่เชื่อมต่อไม่ได้ เชื่อมต่อแล้ว ไม่มีการเข้าถึงอินเทอร์เน็ต แปลภาษาอังกฤษเป็นไทย pantip แปลภาษาไทย ไทยแปลอังกฤษ /roblox promo code redeem 3 พระจอม มีที่ไหนบ้าง AKI PLUS รีวิว APC UPS APC UPS คือ Adobe Audition Adobe Bridge Anapril 5 mg Aqua City Odaiba Arcade Stick BMW F10 jerk Bahasa Thailand Benz C63 ราคา Bootstrap 4 Bootstrap 4 คือ Bootstrap 5 Brackets Brother Scanner Brother iPrint&Scan Brother utilities Burnt HD C63s AMG CSS เว้น ช่องว่าง CUPPA COFFEE สุราษฎร์ธานี Cathy Doll หาซื้อได้ที่ไหน Clock Humidity HTC-1 ColdFusion Constitutional isomer Cuppa Cottage เจ้าของ Cuppa Cottage เมนู Cuppa Cottage เวียงสระ DMC DRx จ่ายปันผลยังไง Detroit Metal City Div class คือ Drastic Vita