Page 1 of 2
สร้างเวลาเกมโอเวอร์
Posted: Tue Sep 11, 2012 4:45 pm
by jindarat
ไม่ทราบว่าได้รับไฟล์เกมหรือเปล่าเนื่องจากส่งไปหลายรอบแล้วแต่ไม่แน่ใจช่วยตอบเกี่ยวกับขั้นตอนในการสร้างเวลาเกมโอเวอร์เพราะฝึกทำแต่ไม่ได้และcodeก้อไม่สามารถเปลี่บยเป็นภาษาไทยได้ช่วยอธิบายด้วนค่ะดิฉันได้แนบไฟลืเกมมาให้แก้ไขเพราะจะใช้ในการสอน
ปกรณ์พพพพพพพพพพพพพพพพพพพพพพพพ.xlsx
Re: สร้างเวลาเกมโอเวอร์
Posted: Tue Sep 11, 2012 5:04 pm
by snasui
การจับเวลาและแสดงคำว่า Game Over หรือข้อความคล้ายกันนี้ จำเป็นต้องใช้ VBA ครับ ซึ่งต้องเขียนกันมาก่อน ติดตรงไหนสามารถถามกันได้ ในฟอรัมนี้ก็มีตัวอย่างให้ดูครับ
สำหรับไฟล์ที่จะแนบ Code มาได้นั้นจะต้องมีนามสกุลเป็น .xlsm ไม่ใช่ .xlsx ดังที่แนบมา ในหมวด Excel งดใช้ภาษาแชทเช่นคำว่า
ก้อ ตามกฎของข้อ 1 ด้านบน และไม่ต้องรีบร้อนในการพิมพ์ข้อความ เนื่องจากพบว่าพิมพ์ไม่ถูกต้องหลายคำครับ
jindarat wrote:ไม่ทราบว่าได้รับไฟล์เกมหรือเปล่าเนื่องจากส่งไปหลายรอบแล้วแต่ไม่แน่ใจช่วยตอบเกี่ยวกับขั้นตอนในการสร้างเวลาเกมโอเวอร์เพราะฝึกทำแต่ไม่ได้และcode
ก้อไม่สามารถ
เปลี่บยเป็นภาษาไทยได้ช่วยอธิบาย
ด้วนค่ะดิฉันได้แนบ
ไฟลืเกมมาให้แก้ไขเพราะจะใช้ในการสอน
ปกรณ์พพพพพพพพพพพพพพพพพพพพพพพพ.xlsx
Re: สร้างเวลาเกมโอเวอร์
Posted: Sun Sep 16, 2012 10:57 am
by dkawee
มีปัญหาการสร้างเวลาเกมโอเวอร์เหมือนกันค่ะ
อยากทราบขั้นตอนละเอียดหน่อยค่ะ เช่น เมื่อบันทึกไฟล์เป็นสกุล xlsm แล้ว เลือก cell ที่จะแสดงการเริ่มเกม เมื่อคลิก cell เริ่มเกมนี้แล้ว ให้ปรากฎตัวเลขเริ่มจับเวลา ต้องทำอย่างไร ที code ที่ต้องใส่อย่างไร และจะแก้ไข code เพื่อตั้งเวลาตามต้องการ เช่น 10 วินาที ทำอย่างไร เป็นต้น ขอบคุณมากค่ะ
Re: สร้างเวลาเกมโอเวอร์
Posted: Sun Sep 16, 2012 11:09 am
by snasui
Code จะต้องเขียนมาเองตามกฎข้อ 5 ด้านบนครับ
ติดตรงไหนค่อยถามกันครับ ต้องขออภัยที่ขอแจ้งให้ทราบว่าที่นี่ไม่มีนโยบายแจก Code รับทำงาน หรือ รับทำการบ้านให้ท่านใดครับ
Re: สร้างเวลาเกมโอเวอร์
Posted: Sun Sep 16, 2012 11:57 am
by dkawee
ขอบคุณมากค่ะ (งานนี้ไม่ใช่การบ้านหรืองานรับ job หรอกค่ะ แต่เพราะอยากเรียนรู้จริงๆค่ะ คิดว่าจะเป็นประตูไปสู่การคิดสร้างสรรค์สื่อต่างๆได้ดี)
เขียน code มาแล้วตามไฟล์ที่แนบค่ะ เรียกใช้แมโครแล้ว ทำไมตัวจับเวลาไม่ทำงานคะ code ผิดหรือเปล่าคะ ขอบคุณอีกครั้ง
Re: สร้างเวลาเกมโอเวอร์
Posted: Sun Sep 16, 2012 11:58 am
by dkawee
ไฟล์แนบ
Re: สร้างเวลาเกมโอเวอร์
Posted: Sun Sep 16, 2012 12:07 pm
by snasui
ในไฟล์ที่แนบมาผมไม่พบว่ามี Code ใด ๆ อยู่เลยครับ
Re: สร้างเวลาเกมโอเวอร์
Posted: Sun Sep 16, 2012 12:18 pm
by dkawee
คลิก Alt+F11 จะพบใน VBE ค่ะ
Sub Format_Cell_Time()
Selection.NumberFormat = "[$-F400]h:mm:ss AM/PM"
End Sub
Re: สร้างเวลาเกมโอเวอร์
Posted: Sun Sep 16, 2012 12:21 pm
by snasui
Code ที่เขียนมานั้น
ไม่ได้เกี่ยวกับการจับเวลาครับ เป็นการกำหนดฟอร์แมทเซลล์เท่านั้นครับ
ดูตัวอย่างการนับเวลาถอยหลัง ซึ่งเกี่ยวกับการกำหนดเกมโอเวอร์ได้จากที่นี่ครับ
นับเวลาถอยหลัง
Re: สร้างเวลาเกมโอเวอร์
Posted: Sun Sep 16, 2012 12:59 pm
by dkawee
ใส่ Code มาใหม่แล้วค่ะ แต่ว่าจะคลิกจาก firstpage มา level 1 แล้วนับแวลาถอยหลังในหน้า level 1 เลย จะต้องทำอย่างไรคะ ขอบคุณค่ะ
Re: สร้างเวลาเกมโอเวอร์
Posted: Sun Sep 16, 2012 1:00 pm
by dkawee
ไฟล์แนบใหม่
Re: สร้างเวลาเกมโอเวอร์
Posted: Sun Sep 16, 2012 1:08 pm
by snasui
ดูตัวอย่าง Code สำหรับการนับเวลาถอยหลัง จากกระทู้นี้
viewtopic.php?f=3&t=584 แล้วลองปรับใช้ดูครับ
Re: สร้างเวลาเกมโอเวอร์
Posted: Sun Sep 16, 2012 1:15 pm
by snasui
dkawee wrote:ใส่ Code มาใหม่แล้วค่ะ แต่ว่าจะคลิกจาก firstpage มา level 1 แล้วนับแวลาถอยหลังในหน้า level 1 เลย จะต้องทำอย่างไรคะ ขอบคุณค่ะ
ไปที่ VBE > ไปที่ชีท Level1 แล้ว Copy Code ด้านล่างไปวาง จากนั้นกลับไปที่ Excel ลองคลิกชีทอื่น ๆ แล้วกลับมาคลิกชีท Level1 ดูครับ
Code: Select all
Private Sub Worksheet_Activate()
Call Count
End Sub
Re: สร้างเวลาเกมโอเวอร์
Posted: Mon Sep 17, 2012 4:29 pm
by jindarat
สวัสดีค่ะได้ทำการเปลี่ยนสกุลไฟล์เกมแล้วเป็น.xlsm แต่ขอรบกวนช่วยสอนขั้นตอนในการเข้าไปเขียนcode ในแมคโคxecel2007ในการสร้างเวลาเกมโอเวอร์
Re: สร้างเวลาเกมโอเวอร์
Posted: Mon Sep 17, 2012 4:33 pm
by snasui
กดแป้น Alt+F11 หรือคลิกขวาที่ชีทใด ๆ แล้วเลือก View code
Re: สร้างเวลาเกมโอเวอร์
Posted: Tue Sep 18, 2012 4:26 pm
by jindarat
ขอบคุณค่ะที่ช่วยสอนขั้นตอนการเข้าไปเขียนcodeแต่มีปัญหาว่าพิมพ์ภาษาไทยแต่เป็นภาษาอะไรไม่ทราบต้องแก้ไขอย่างไรค่ะ
Re: สร้างเวลาเกมโอเวอร์
Posted: Tue Sep 18, 2012 4:45 pm
by snasui
ลองตามนี้ครับ
เข้า VBE > เข้าเมนู Tools > Options > เลือกแถบ Editor Format > ตรง Font: เลือก Font ที่มีวงเล็บต่อท้ายเป็น
(Thai)
Re: สร้างเวลาเกมโอเวอร์
Posted: Tue Sep 18, 2012 6:27 pm
by jindarat
ขอบคุณค่ะเดี๋ยวพรุ่งนี้จะสอนให้นักเรียนเขียนCodeถ้าหากติดขัดตรงไหนจะส่งให้แก้ไขเพิ่มเติมนะค่ะขอบคุณมากที่ให้ความรู้เพราะไม่เคยทราบมาก่อนว่าexcelก็สามารถเขียนโปรแกรมได้ขอบคุณค่ะ
Re: สร้างเวลาเกมโอเวอร์
Posted: Tue Sep 18, 2012 9:53 pm
by ongfong
Distributio
Re: สร้างเวลาเกมโอเวอร์
Posted: Tue Sep 18, 2012 9:54 pm
by ongfong
คือเราสร้างเกมส์ไว้เเล้วเเล้วเราก็จับเวลาแต่ตอนเราพิมพ์คำตอบในการเล่นเกมส์เวลาหยุดทำยังไม่ให้มันหยุด