Excel Forum

สอบถาม Code VBA ในการ Add New ในฟอร์ม

ในเวลาที่เราป้อนข้อมูลในฟอร์มเสร็จแล้ว เพียงแค่เรา Click ใส่ปุ่ม Add New ข้อมูลในฟอร์มก่อจะหว่างเป่าให้เราป้อนข้อมูลได้ใหม่

ภ้าป้อน G13 แล้วข้อมูลจะไป ลบ กับ ห้อง D5 (ตามเงื่อนไขเดี่มที่ผมตั้งไว้)

ภ้าป้อน I13 แล้วข้อมูลจะไป ลบ กับ ห้อง G5 (ตามเงื่อนไขเดี่มที่ผมตั้งไว้)

เพาะว่าในห้อง K กับ M ภ้าไม้ได้ป้อนข้อมูล ค่าที่ออกเท่ากับ 0:00 ตามที่ผมต้องการ

แต่ยังเพียง L กับ N มันจะออก L=12:00; N=17:00 คืผมต้องการให้สองห้องน ...

:D ขอโทดครับผมอธิบายผิดฯ ซ้ำ ๆ ในเรื่องเดิม ๆ

ผมต้องการวางเงื่อนไขไว้ใน สาม เซลล์ คือ เซลล์ L; เซลล์ N และ เซลล์ O

เงือนไขทีหนิ่ง ของ เซลล์ L
ใน เซลล์ L13 ภ้าใน G13ไม้ได้ป้อนข้อมูลเวลาลงไปผมต้องการให้มันเป็น 0:00

เงื่อนไขที่สอง ของ เซลล์ N
N13 ก่อเชั่นกัน ภ้าใน I13 ไม้ได้ป้อนข้อมูลเวลาลงไปผมต ...

ที่ตาลางนี้(Time Out Quick) ผมต้องการให้มันออกเป็น 0:00 ชั่วโมง ภ้าตาลาง Time Morning and Time Afternoon ไม้มีข้อมูล
ที่ตาลาง (Total Down Time) ภ้าตาลาง (Time Morning and Time afternoon) ไม้มีข้อมูล หลื เท่ากับ 0:00 ให้เป็น 8:00 ชั่วโมง (เพาะว่า8:00พนักงานไม้มาทำงาน)

ที่ตาลางนี้(Time Out Quick) ผมต้องการให้มันออกเป็น 0:00 ชั่วโมง ภ้าตาลาง Time Morning and Time Afternoon ไม้มีข้อมูล
ที่ห้องตาลาง (Total Down Time) ภ้าห้องตาลาง (Time Mornning and Time afternoon) ไม้มีข้อมูล หลื เท่ากับ 0:00 ให้เป็น 8:00 ชั่วโมง (เพาะว่า8:00พนักงานขาดงาน)

ดุตาลางที่ผมทาสีเหลือง

สอบภามสูตรคำนวนเวลาแบบมีเงือนไข


สมมุดว่า


วันที 23/7/2014 Mr. A เข้างานตอนเช้า 8:30 พักเที่ยง12:00 เข้างานตอนบ่าย13:00 เลิกงานตอนบ่าย15:00
วันที 24/7/2014 Mr. A ไม้มาทำงาน

แล้วผมต้องการให้ วันที 24/7/2014 Mr. A ไม้มาทำงาน เป็นขาด 8ชั่วโมง โดยที่เราไม้ได้ป้อนเวลาลง

thank you sir

สมมุดว่า: 8:00 - 16:30 = 8.30 h จะใช้สุตรอะไรครับ ให้เวลาออก 8.30

ไม้ใช้ครับ ผมคํานวณผิดเองครับ ที่จริงมีเพียง 8 ชั่วโมงครับ ขอโทดครับที่คํานวณผิด

โทดครับพีมผิด 8:00 - 16:00 = 9h

8:00 - 17:00 = 9 h ทำงาน 9 ชั่วโมง

ภามสุตรการคํานวณเวลาเพาะว่าเวลาป้อนข้อมุลจะเป็น 8:00 12:00 อยากรุ้ว่ากี่ชั่วโมง

มีสูตรดูว่าวันที 11-July-2014 เป็นวันอะไร

thanks

สูตรดิงข้อมูลข้ามsheet มา show ตามตาลางที่กำนด

เพียงแค่เปี่ยน ชื่อ ข้อมูลในตาลางเวลาก่อเปียนไปนำ โดยดิงข้อมูลข้าม sheet

ผมใช้สูตร sum ตัวเลกที่ออกมาไม้ตรงตามตัวจริง (63:34:00)

ต้องใช้สูตรอะไรเพื่อบวกเวลา

สูตรคํานวณเวลาตามเงื่อนไขที่ต้องการ
อยากรู้ว่าพนักงงาน มาสาย กี่นาที กี่ขั่วโมง
โดยมีนโยบายว่า ให้พะนักงานมาสายได้ 15 นาทีต่อวัน

ภ้าพนักงานจะมาไวก่อนโมงเข้าทำงาน หลื ทำงานกายเวลาที่กำนด ผมต้องการให้ ตาลาง Time Absent ปลับเป็น 0 เพาะว่าพนักงานเขาไม้ได้ขาด หลืมาทำงานสาย

ได้แล้วครับ ขอบใจหลายฯฯฯครับ

ต้องการอยากรุ้สูตร count บางเงื่อนไข


ตัวอย่าง. ผมต้องการ count หา Arthone_300689 ว่ามีคำที่ขื้นต้นด้วยคำว่า Harzard ID เท่าไรคำ

ได้แล้วครับ

แต่ว่า ทำไปทำมา เวลาจะใช้งาน มันฟ้อง


run-time error 13:
Type mismatch

Private Sub Save_Click()
Dim irow As String
Dim ws As Worksheet
Dim objP As Variant
Dim objF As Variant
Dim objD As Variant
Dim i As Integer
Set ws = Worksheets("tracking")
objP = Array(Me.TextBox8, Me ...

ดึงค่าสุดท้ายในคอลัมน์ C มาได้แล้วครับ

ยังเพียงแต่ กำนดเอาค่าขื้นตั้น iJOBs-WP-
ช่วยปรับให้ด้วยครับ