🔊 โปรดทราบ 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 157 matches

by kio2002
Sun Nov 06, 2016 5:28 pm
Forum: Excel
Topic: รันตัวเลข ถึงแถวตามเงื่อนไขที่กำหนด
Replies: 10
Views: 895

Re: รันตัวเลข ถึงแถวตามเงื่อนไขที่กำหนด

ผมปรับcodeให้เริ่มรันเลข1 ที่เซลล์A13 มันไม่ยอมรันเลข1ให้ มันรันเป็นเลข13เลยซะงั้น
Range("a13", Range("a" & Rows.Count).End(xlUp).Offset(-1, 0)).Select

และอยากให้รันใน sheet ที่กำหนดเช่น sheet1

รบกวนช่วยปรับให้อีกทีครับ
by kio2002
Sat Nov 05, 2016 7:10 pm
Forum: Excel
Topic: รันตัวเลข ถึงแถวตามเงื่อนไขที่กำหนด
Replies: 10
Views: 895

รันตัวเลข ถึงแถวตามเงื่อนไขที่กำหนด

สวัสดีสมาชิกทุกท่านครับ พอดีผมจะสร้างปุ่มคลิกแล้วรันตัวเลข ให้ถึงแถวตามเงื่อนไขที่กำหนด โดยจะให้รันเรียง 1,2,3,4,....ลงไปเรื่อยๆครับ สิ่งที่ต้องการคือ เมื่อคลิกปุ่ม รันตัวเลข อยากให้โปรแกรมหาคำว่า stop ที่อยู่ใน column A แล้วให้รันตัวเลขถึงแถวที่อยู่บนคำว่า stop เช่นในไฟล์ที่แนบมา คำว่า stop จะอยู่แ...
by kio2002
Sat Nov 05, 2016 6:49 pm
Forum: Excel
Topic: ขอวิธีสร้าง drop down
Replies: 3
Views: 675

Re: ขอวิธีสร้าง drop down

ขอบคุณครับ พอมีวิธีปรับตัวหนังสือใน drop down ให้อยู่กึ่งกลางไหมครับ
by kio2002
Sat Nov 05, 2016 2:27 pm
Forum: Excel
Topic: ขอวิธีสร้าง drop down
Replies: 3
Views: 675

ขอวิธีสร้าง drop down

เรียนสมาชิกทุกท่านครับ
ขอวิธีสร้าง drop down แบบดังรูป
และขอวิธีใช้งานด้วยครับ
by kio2002
Fri Nov 04, 2016 8:25 pm
Forum: Excel
Topic: คลิกที่เซลล์A1แล้วเซลล์B1เติมสีพื้นหลังอัตโนมัติ
Replies: 8
Views: 1023

Re: คลิกที่เซลล์A1แล้วเซลล์B1เติมสีพื้นหลังอัตโนมัติ

สุดยอดไปเลย code ตรงตามที่การแล้วครับ
ขอบคุณคนควน และสมาชิกทุกๆคนนะครับ
เว็บนี้มีประโยชน์อย่างมากเลย
by kio2002
Fri Nov 04, 2016 7:41 pm
Forum: Excel
Topic: เราสามารถกำหนด Textbox1 ให้เปลี่ยนภาษาเองได้หรือไม่ครับ
Replies: 8
Views: 1033

Re: เราสามารถกำหนด Textbox1 ให้เปลี่ยนภาษาเองได้หรือไม่ครับ

คุณ akranan อ่านกฏข้อ5ด้วยนะครับ

5. สำหรับคำถามเกี่ยวกับ VBA ให้ลองเขียนมาเองก่อนเสมอ ถามเฉพาะที่ติดปัญหา ระบุ Module, Procedure ที่ติดปัญหาให้ชัดเจน ควรโพสต์ Code ให้แสดงเป็น Code เพื่อสะดวกในการอ่านและทดสอบ
by kio2002
Thu Nov 03, 2016 7:34 pm
Forum: Excel
Topic: คลิกที่เซลล์A1แล้วเซลล์B1เติมสีพื้นหลังอัตโนมัติ
Replies: 8
Views: 1023

Re: คลิกที่เซลล์A1แล้วเซลล์B1เติมสีพื้นหลังอัตโนมัติ

codeใช้ได้ตรงตามที่ต้องการเลยครับ ถ้าหากจะทำเช่นนี้หลายๆเซลล์ สมมุติทำตั้งแต่ระหว่างเซลล์ A1:A50 จะต้องเขียนcodeชุดนี้ทุกเซลล์ไปเรื่อยๆจนถึง50ชุดไหมครับ If Target.Address = Range("A1").Address Then Range("B1").Interior.Color = 255 Else Range("B1").Interior.Color = xlNone End If If Target.Address = R...
by kio2002
Thu Nov 03, 2016 4:11 pm
Forum: Excel
Topic: คลิกที่เซลล์A1แล้วเซลล์B1เติมสีพื้นหลังอัตโนมัติ
Replies: 8
Views: 1023

Re: คลิกที่เซลล์A1แล้วเซลล์B1เติมสีพื้นหลังอัตโนมัติ

นำcodeของคุณpuriwutpokinไปใช้แล้วตรงตามที่ต้องการแล้วครับ

แต่จะปรับcodeตรงนี้เพิ่มเติมครับ
โดยที่ไม่ต้องสนใจว่าเซลล์A1จะมีค่าอะไรก็ตาม แค่คลิกที่เซลล์A1 แล้วก็เติมสีอัตโนมัติที่เซลล์B1เลย
If Target.Address = Range("A1").Address And Range("A1").select
by kio2002
Thu Nov 03, 2016 12:32 pm
Forum: Excel
Topic: คลิกที่เซลล์A1แล้วเซลล์B1เติมสีพื้นหลังอัตโนมัติ
Replies: 8
Views: 1023

Re: คลิกที่เซลล์A1แล้วเซลล์B1เติมสีพื้นหลังอัตโนมัติ

:D ตัวอย่าง Code ครับ Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = Range("A1").Address And Range("A1").Value = "" Then Range("B1").Interior.Color = 255 End If End Sub เซลล์B1เติมสีให้อัตโนมัติตามต้องการแล้วครับ แต่ยังติดตรงที่ ถ้าเราคลิกเลือกเซลล์อื่นๆที่ไม่ใช่เซ...
by kio2002
Wed Nov 02, 2016 8:18 pm
Forum: Excel
Topic: คลิกที่เซลล์A1แล้วเซลล์B1เติมสีพื้นหลังอัตโนมัติ
Replies: 8
Views: 1023

คลิกที่เซลล์A1แล้วเซลล์B1เติมสีพื้นหลังอัตโนมัติ

เรียนสมาชิกทุกท่านครับ ขอเล่าความต้องการก่อนนะครับ พอดีผมต้องการให้เซลล์B1เติมสีอัตโนมัติ เมื่อใช้เมาส์คลิกที่เซลล์A1 โดยกำหนดให้เซลล์A1มีค่าว่าง เซลล์B1ถึงจะเติมสีพื้นหลัง และถ้าหากไม่ได้คลิกที่เซลล์A1(คลิกเลือกที่เซลล์อื่น) เซลล์B1ไม่ต้องเติมสี ปัญหาที่ติดตอนนี้คือ เวลาใช้เมาส์คลิกที่เซลล์A1แล้วB1...
by kio2002
Sun Oct 09, 2016 6:22 pm
Forum: Excel
Topic: 2 บวกอะไร? = 9 (สูตรไหนดีครับ)
Replies: 6
Views: 233

Re: 2 บวกอะไร? = 9 (สูตรไหนดีครับ)

honghiran wrote:ปัญหาคือ หากมีชุดข้อมูล หลายอัน จะใช้สูตรนี้ไม่ได้ครับ
เช่น 2 + ? = 9 ใช้สูตร d1-a1 ได้ 7 OK
แต่ 9 + ? = 2 ใช้สูตร d1-a1 ได้ -7 NoK
ลองใช้ ABS เข้ามาช่วยดูครับ หากไม่ต้องการให้ติดลบ ตามที่คนควนแนะนำครับ
by kio2002
Wed Oct 05, 2016 9:14 pm
Forum: Excel
Topic: ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)
Replies: 13
Views: 1094

Re: ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)

ผมได้ตามที่ต้องการแล้วครับ ขอบคุณคนควนและสมาชิกมากๆครับ
VBA นี้ซับซ้อนมากๆเลยครับ ผมก็พยายามเรียนรู้ด้วยตัวเอง มีหลายๆอย่างที่ยังไม่เข้าใจ อาจจะถามเยอะหน่อย

ผมลองเปลี่ยนเป็น SheetChange ตามที่แนะนำ แต่ยังไม่ได้ผล ผมจึงลบ Sheet ออก แล้วเหลือแค่ Change
by kio2002
Wed Oct 05, 2016 7:43 pm
Forum: Excel
Topic: ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)
Replies: 13
Views: 1094

Re: ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)

เรียนคนควนครับ ผมลองเขียน code ตามที่แนะนำมาแล้วครับ ผลที่ได้คือ พอใส่เลข1 แล้วต้องไปคลิกเลือกที่เซลล์ D5 msgbox มันถึงจะเด้งขึ้นมา(ปกติแล้วเซลล์D5จะไม่ได้ใส่เลขอะไร) แต่ผมอยากให้ msgbox มันเด้งขึ้นมาหลังจากเราใส่เลข1 แล้ว enter หรือเมื่อคลิกเลือกที่เซลล์อื่น ไม่ทราบว่าต้องปรับ code ตรงไหนเพิ่มครับ ...
by kio2002
Tue Oct 04, 2016 9:30 pm
Forum: Excel
Topic: ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)
Replies: 13
Views: 1094

Re: ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)

เรียนคนควนครับ ผมลองเขียน code และทดลอง run แมโคร แล้วครับ หากใส่ค่า1ที่เซลล์ D5 แล้ว msgbox จะขึ้นมาแจ้งเตือน แต่ติดตรงที่ว่าจะทำยังไงให้ msgbox ขึ้นมาแจ้งเตือนอัตโนมัติครับ เวลาที่เราใส่ค่า1ที่เซลล์D5 รบกวนช่วยปรับ code ให้หน่อยครับ ผมเขียน Procedure ถูกแล้วใช่ไหมครับ code อยู่ที่ worksheet1 ครับ ...
by kio2002
Wed Sep 21, 2016 9:56 pm
Forum: Excel
Topic: สอบถามสูตรการเปลี่ยนสีเซลล์ครับ
Replies: 1
Views: 174

สอบถามสูตรการเปลี่ยนสีเซลล์ครับ

เรียนทุกท่านครับ
สอบถามสูตรการเปลี่ยนสีเซลล์ครับ

ผมขอยกตัวอย่างซักข้อนะครับ
ที่sheet1
สมมุติผมใส่ตัวเลขในเซลล์ d6(เลขอะไรก็ได้) แล้วอยากให้เซลล์c6 เป็นสีเขียว
จะเขียนสูตรยังไงดีครับ พอดีไม่เคยทำ ต้องรบกวนขอสูตรหน่อยครับ

ขอบคุณมากครับ
by kio2002
Wed Sep 21, 2016 9:12 pm
Forum: Excel
Topic: ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)
Replies: 13
Views: 1094

Re: ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)

ปรับเป็น Code ตามไฟล์แนบครับ Private Sub CommandButton1_Click() r = 4 Do r = r + 1 Loop Until Cells(r, 4) <> "" Cells(r, 4).Select MsgBox "ªèͧ D" & Cells(r, 1) + 4 & " ÁÕ¢éÍÁÙÅ", vbCritical End Sub ต้องขออภัยครับ พอดีผมอธิบายไม่หมด และแนบไฟล์ผิด ผมอยากให้ Msgbox ขึ้นมาแจ้งเตือนอัติโนมัติ โดยไม่ต้อ...
by kio2002
Wed Sep 21, 2016 8:54 pm
Forum: Excel
Topic: ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)
Replies: 13
Views: 1094

Re: ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)

:D อ่าน MsgBox ใน Code แล้วเข้าใจว่าอธิบายมาไม่ถูกต้อง ช่วยยืนยันใหม่ว่า กรณีมีค่าใดที่ไม่เป็นค่าว่างหรือเท่ากับ 0 แล้วให้แจ้่งเตือน หากเป็นเช่นนี้ตามไฟล์ตัวอย่างจะแจ้งเตือนทุกค่า เพราะไม่มีเซลล์ใดจาก D5 เป็นต้นไปเป็นเซลล์ว่าง การเขียนชื่อ Procedure ห้ามเว้นวรรค ครับ ครับ กรณีมีค่าใดใน cell d5 ที่ไ...
by kio2002
Wed Sep 21, 2016 8:12 pm
Forum: Excel
Topic: ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)
Replies: 13
Views: 1094

ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)

เรียน ทุกท่านครับ ผมสร้าง code ไว้ที่ module3 โดยต้องการให้ หาก cell d5 มีค่าใดๆ ที่ไม่ใช่ 0 หรือค่าว่างเปล่า ผมอยากให้มีกล่องข้อความขึ้นมาแจ้งเตือนครับ แต่ผมลองแล้ว code มัน error ครับ หรือมีวิธีอื่นที่ไม่ต้องใช้ vba สามารถแนะนำมาได้นะครับ รบกวนทุกท่านช่วยดูให้หน่อยครับ ขอบคุณครับ Sub MsgBox shows(...
by kio2002
Sat Sep 17, 2016 8:39 am
Forum: Excel
Topic: กำหนดพื้นที่การพิมพ์ แล้ว RoundedRectangle1 ที่สร้างไว้ถูกซ่อน
Replies: 8
Views: 451

Re: กำหนดพื้นที่การพิมพ์ แล้ว RoundedRectangle1 ที่สร้างไว้ถูกซ่อน

:D ยังไม่กระจ่างกับคำถามครับ RoundedRectangle1 คือปุ่มกดหรือ Object ใด หากเป็นปุ่มกด ไม่ได้ชื่อ RoundedRectangle1 แต่ชื่อ สี่เหลี่ยมผืนผ้า 1 หากต้องการจะให้พิมพ์ปุ่มกดออกมาด้วยจะต้องลากปุ่มกดเข้ามาไว้ในพื้นที่การพิมพ์ครับ กรณีไม่ได้คำตอบหรือยังไม่เข้าใจ ให้จับภาพสิ่งที่ต้องการมาดูอีกรอบครับ ขออภัยค...
by kio2002
Fri Sep 16, 2016 9:32 pm
Forum: Excel
Topic: กำหนดพื้นที่การพิมพ์ แล้ว RoundedRectangle1 ที่สร้างไว้ถูกซ่อน
Replies: 8
Views: 451

Re: กำหนดพื้นที่การพิมพ์ แล้ว RoundedRectangle1 ที่สร้างไว้ถูกซ่อน

:D ปกติการ Print เราจะทำการกำหนด Print Area เสียก่อนโดย คลุมข้อมูลที่ต้องการ Print > เข้าเมนู Page Layout > Print Area จากนั้นค่อยกำหนดตามที่ผมโพสต์ไว้ตามด้านบนครับ หากจะกำหนดพื้นที่การพิมพ์แบบ Auto ก็สามารถทำได้ด้วย VBA ซึ่งต้องเขียนมาเองก่อนพร้อมแจ้งมาด้วยว่าอยู่ใน Module ไหน ชื่อว่าอะไร ติดขัดบร...