Snasui Excel Forum

Posted: **Tue Mar 12, 2019 6:05 pm**

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

Posted: **Tue Mar 12, 2019 6:36 pm**

ถ้าต้องการให้เป็นอัตโนมัติ คงต้องพึ่ง vba ครับ ลองเขียนโค้ดมาเองก่อนครับตามกฎข้อ5
หรือลองบันทึกmacro แล้วปรับมาดูครับติดตรงไหนมาถามต่อครับ

Posted: **Tue Mar 12, 2019 7:31 pm**

' Macro1 áÁâ¤Ã
'

'
Range("A2").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("à¡çº¢éÍÁÙÅ").Select
Range("A2").Select
ActiveSheet.Paste
Sheets("Å§àÇÅÒ·Ó§Ò¹").Select
Range("F2:J9").Select
Application.CutCopyMode = False
Selection.ClearContents
Selection.ClearContents
Range("F2").Select

ผมลองแบบนี้ไปครับ

Posted: **Tue Mar 12, 2019 7:43 pm**

ลองศึกษาจากลิงค์นี้ครับ
viewtopic.php?f=9&t=7248

Posted: **Tue Mar 12, 2019 8:54 pm**

ขอบคุณมากครับ

Snasui Excel Forum

ป้อนข้อมูลจากชีตนึงไปอีกชีตนึง

ป้อนข้อมูลจากชีตนึงไปอีกชีตนึง

Re: ป้อนข้อมูลจากชีตนึงไปอีกชีตนึง

Re: ป้อนข้อมูลจากชีตนึงไปอีกชีตนึง

Re: ป้อนข้อมูลจากชีตนึงไปอีกชีตนึง

Re: ป้อนข้อมูลจากชีตนึงไปอีกชีตนึง