:!: โปรดทราบ Image
    1. กรุณาอ่านกฎการใช้บอร์ด (Forum rules) ในตำแหน่งด้านบนของแต่ละบอร์ดครับ Image
    2. การสมัครสมาชิกเพื่อโพสต์คำถาม ดาวน์โหลดไฟล์แนบไปศึกษา ทำตามขั้นตอนด้านล่างครับ
      1. สมัครสมาชิก ดูขั้นตอนตาม Link นี้ครับ => สมัครสมาชิก กรณีลืมรหัสผ่านสามารถรับรหัสใหม่ได้ที่นี่ครับ => Reset รหัสผ่านImage
      2. Login เข้าระบบโดยคลิก Login ตรงมุมขวาบนของหน้านี้ Image กรณีมีปัญหาในการเข้าใช้งาน คลิก Link นี้เพื่อแจ้งผู้ดูแลระบบครับ => ติดต่อผู้ดูแลระบบ
    3. เมื่อ Login แล้วสามารถกำหนดการตั้งค่าส่วนตัว เช่นตั้งค่าภาษาเป็นไทยหรืออังกฤษได้ที่ Link นี้ครับ => ตั้งค่าส่วนตัว Image
    4. วิธีการตั้งและตอบกระทู้ดูได้ที่ Link นี้ครับ => วิธีการตั้งและตอบกระทู้ Image
    5. การจัดรูปแบบตัวอักษรด้วย bbcode ในช่องแสดงความคิดเห็นดูได้ที่ Link นี้ครับ => จัดรูปแบบตัวอักษร และสามารถกำหนดขนาดตัวอักษรใน Browser ได้ที่นี่ครับ ==> กำหนดขนาดตัวอักษรใน Browser Image

Search found 132 matches

by tigerwit
Thu Jun 08, 2017 3:46 pm
Forum: Excel
Topic: รบกวนอาจารย์ ช่วยเรื่อง Code VB ตรวจสอบการลบและแทรกรูปภาพด้ว
Replies: 18
Views: 1020

Re: รบกวนอาจารย์ ช่วยเรื่อง Code VB ตรวจสอบการลบและแทรกรูปภาพด้ว

สวัสดีครับ
ลองแก้ไขแล้วตามคำแนะนำ
ยังคงเห็นเฉพาะไฟล์ .jpg เท่านั้นครับ
by tigerwit
Wed Jun 07, 2017 2:00 pm
Forum: Excel
Topic: รบกวนอาจารย์ ช่วยเรื่อง Code VB ตรวจสอบการลบและแทรกรูปภาพด้ว
Replies: 18
Views: 1020

Re: รบกวนอาจารย์ ช่วยเรื่อง Code VB ตรวจสอบการลบและแทรกรูปภาพด้ว

Sub InsPic2() 'Code From.. 'http://www.snasui.com/viewtopic.php?f=3&t=1768 'http://www.mrexcel.com/archive/General/4711.html 'http://www.ozgrid.com/forum/showthread.php?t=24068 Const strPath As String = "D:\" '<== Change to your path Dim Imge Dim ImgFileFormat As String Dim i As Integ...
by tigerwit
Fri May 26, 2017 10:31 pm
Forum: Excel
Topic: สอบถาม การพิมพ์ใบรายชื่อ แยกตามห้อง จากฐานข้อมูล
Replies: 2
Views: 112

Re: สอบถาม การพิมพ์ใบรายชื่อ แยกตามห้อง จากฐานข้อมูล

สวัสดีครับ
ทดลองทำดูตามไฟล์นี้
ไม่ทราบว่าพอที่จะตอบโจทย์ความต้องการได้หรือไม่ครับ
ลองโหลดไปศึกษาดูครับ
by tigerwit
Fri May 19, 2017 3:33 pm
Forum: Excel
Topic: ขอความช่วยเหลือ Code VB เพื่อป้องกันการลบข้อมูล
Replies: 3
Views: 135

ขอความช่วยเหลือ Code VB เพื่อป้องกันการลบข้อมูล

ในไฟล์งานผมมีชีท student และทำปุ่มสำหรับลบข้อมูลนักเรียน นำเข้าข้อมูลนักเรียน ไว้สำหรับเจ้าหน้าที่ฝ่ายวิชาการที่ทำหน้าที่บันทึกรายชื่อทำงานได้สะดวกขึ้น แต่ก็ต้องการป้องกันไม่ให้ ครู ผู้ซึ่งเป็นเป็นผู้ใช้งาน เผลอไปลบโดยไม่ตั้งใจ โดยได้ใส่ Code ในปุ่มให้ใส่รหัสปลดล็อคชีทก่อน ถ้ารหัสถูกจึงสามารถปลดล็อค...
by tigerwit
Fri May 20, 2016 7:49 am
Forum: Excel
Topic: ขอความช่วยเหลือ Code VB เพื่อเลือกแถวและคลอลัมน์ ครับ
Replies: 3
Views: 1893

Re: ขอความช่วยเหลือ Code VB เพื่อเลือกแถวและคลอลัมน์ ครับ

ขอบพระคุณเป็นอย่างสูงครับ
สามารนำไปใช้ได้ทั้งสองโค๊ดครับ
by tigerwit
Thu May 19, 2016 8:24 pm
Forum: Excel
Topic: ขอความช่วยเหลือ Code VB เพื่อเลือกแถวและคลอลัมน์ ครับ
Replies: 3
Views: 1893

ขอความช่วยเหลือ Code VB เพื่อเลือกแถวและคลอลัมน์ ครับ

ความต้องการ ใช้โค๊ด Vb สั่ง select แถว ตามเงื่อนไงกำหนด โดยกำหนดให้ตรวจสอบว่า จากพื้นที่ ที่ได้ select ไว้แล้ว (A4 :F24) ถ้าพบว่าในคลอลัมน์ที่ 1 มีค่าเป็น 1 ให้ทำการ select ทั้งหมด หากมีค่าเป็นตัวอื่น เช่น 2 3 4 5 6 ไม่ต้อง select ปัญหาคือ เมื่อรันโค๊ดที่เขียนไว้มันจะ select เอาแถวสุดท้ายเพียงแถวเด...
by tigerwit
Wed May 18, 2016 10:21 am
Forum: Excel
Topic: ขอความช่วยเหลือ Code VB ดัก Erorr ครับ
Replies: 2
Views: 806

Re: ขอความช่วยเหลือ Code VB ดัก Erorr ครับ

ตามต้องการครับ
ขอบพระคุณอย่างสูงครับ
by tigerwit
Tue May 17, 2016 10:13 pm
Forum: Excel
Topic: ขอความช่วยเหลือ Code VB ดัก Erorr ครับ
Replies: 2
Views: 806

ขอความช่วยเหลือ Code VB ดัก Erorr ครับ

ต้องการคัดลอกข้อมูลจากอีกไฟล์หนึ่งมาใส่ไว้ในอีกไฟล์หนึ่ง ไฟล์ต้นทางที่คัดลอกชื่อ Name2559.xls ไฟล์ปลายทางที่นำข้อมูลมาวางชื่อ pp5-edit.xlsm ตอนนี้โค๊ดที่เขียนสามารถรันได้ปกติต่อเมื่อได้เปิดไฟล์ Name2559.xls ขึ้นมารอไว้ แต่หากไม่ได้เปิดไฟล์ Name2559.xls ไว้ ก็จะมีปัญหาการรันโค๊ด ขอความช่วยเหลือในการแ...
by tigerwit
Wed Mar 11, 2015 11:02 am
Forum: Excel
Topic: เรียนถามสูตการปัดเศษทศนิยมขึ้นและลงตามที่ต้องการ
Replies: 3
Views: 181

เรียนถามสูตการปัดเศษทศนิยมขึ้นและลงตามที่ต้องการ

มีเรื่องรบกวนเรียนถามสูตรครับ
เงื่อนไขของการปัดเศษขึ้นหรือลงมีดังนี้ครับ
หาก มีเศษเป็นทศนิยมตั้งแต่ .75 ขึ้นไป ให้ปัดขึ้นเป็นจำนวนเต็ม เช่น 3.75 ปัดขึ้น เป็น 4 หรือ 2.85 ปัดขึ้นเต็ม 3
แต่ถ้า เศษเป็นทศนิยมต่ำว่า .75 ให้ปัดลงเป็นจำนวนเต็ม เช่น 3.65 ปัดลงเป็น 3 หรือ 1.60 ปัดลงเป็น 1
by tigerwit
Wed Oct 09, 2013 8:06 pm
Forum: Excel
Topic: ซ่อน Sheet ทั้งหมดยังไงครับ...
Replies: 7
Views: 204

Re: ซ่อน Sheet ทั้งหมดยังไงครับ...

สวัสดีครับ... ผมได้รับคำแนะนำเรื่องการ Code VB จากคุณ คนควน เสมอ งานที่ผมทำส่าวนใหญ่ทำกับโรงเรียนเช่น ปพ.5 งานการเงิน ซึ่งได้รับคำแนะนำจากที่นี้ เดี๋ยวลองค้นดูครับว่า กระทู้นั้นอยู่ที่ไหน บังเอิญว่าตอนตอบผมไปลอกโค๊ด มาจากงานที่ทำ แล้วติดเครดิตนี้มาด้วยครับ ค้นแล้วไม่เจอครับ... จะลบให้ก็ไม่ได้ แต่ยืน...
by tigerwit
Wed Oct 09, 2013 7:06 pm
Forum: Excel
Topic: ซ่อน Sheet ทั้งหมดยังไงครับ...
Replies: 7
Views: 204

Re: ซ่อน Sheet ทั้งหมดยังไงครับ...

Code: Select all

Option Explicit

Sub HideTab()
'Code โดย คนควน"
    ActiveWindow.DisplayWorkbookTabs = False
End Sub



Code: Select all

Private Sub Workbook_Open()
'Code โดย คนควน"
Call HideTab
End Sub


ลองนำไปปรับประยุกต์ใช้ครับ
by tigerwit
Mon Jan 28, 2013 10:13 pm
Forum: Excel
Topic: รบกวนแก้ไขปัญหาค่า #value ให้หน่อยครับ
Replies: 8
Views: 7325

Re: รบกวนแก้ไขปัญหาค่า #value ให้หน่อยครับ

ใช้สูตรที่แนะนำแล้ว
พึงพบว่ามีปัญหา แสดงค่า #N/A ในกรณีที่เงินบางประเภทไม่มี ราการรับ รายการจ่ายเงิน
พยายามใช้ IF(ISNA มาช่วยแล้วแต่ก็มีปัญหาอยู่ รบกวนช่วยแก้ปัญหาอีกครั้งครับ
by tigerwit
Sun Jan 27, 2013 5:53 pm
Forum: Excel
Topic: รบกวนแก้ไขปัญหาค่า #value ให้หน่อยครับ
Replies: 8
Views: 7325

Re: รบกวนแก้ไขปัญหาค่า #value ให้หน่อยครับ

สวัสดีครับ จากงานเดิมมีการปรับเล็น้อยเนื่องจากได้แนวคิดจาก http://www.snasui.com/viewtopic.php?f=3&t=4110 ชีท all เป็นการลงรายการรับ รายการจ่าย เงินงบประมาณของโรงเรียนในภาพรวม ชีีทsub จะสรุปรายรับ รายจ่าย แยกตามประเภทของเงินที่ได้รับจัดสรร โดยใช้ เซล K3 เป็นตัวแยกงบประมาณแต่ละประเภท บรรทัดสุดท้า...
by tigerwit
Mon Jan 21, 2013 11:02 pm
Forum: Excel
Topic: รบกวนแก้ไขปัญหาค่า #value ให้หน่อยครับ
Replies: 8
Views: 7325

รบกวนแก้ไขปัญหาค่า #value ให้หน่อยครับ

ตามไฟล์แนบที่แนบมา
ชีท sub ในคลอลัมน์ H ตั้งแต่เซล H4 ลงไปใช้สูตร

Code: Select all

=IF(AND(ISBLANK(F4),ISBLANK(G4)),"",H3+F4-G4)

เพื่อคำนวณผล แต่มีปํญหาแสดงค่า #value ทั้งที่ ใช้สูตรเดียวกัน ในชีท All กับไม่เป็นไร
ช่วยดูและปรับแก้ไขให้หน่อยครับ

Go to advanced search