:!: โปรดทราบ 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 150 matches

by kio2002
Thu Nov 03, 2016 4:11 pm
Forum: Excel
Topic: คลิกที่เซลล์A1แล้วเซลล์B1เติมสีพื้นหลังอัตโนมัติ
Replies: 8
Views: 830

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: 830

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: 830

คลิกที่เซลล์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: 152

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: 680

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

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

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

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: 680

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: 123

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

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

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

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

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 ต้องขออภัยครับ พอดีผมอธิบายไม่หมด และแนบไฟล์ผิด ผมอยากให้ Msgb...
by kio2002
Wed Sep 21, 2016 8:54 pm
Forum: Excel
Topic: ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(vba)
Replies: 13
Views: 680

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: 680

ให้กล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนด(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: 326

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

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

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

:D ปกติการ Print เราจะทำการกำหนด Print Area เสียก่อนโดย คลุมข้อมูลที่ต้องการ Print > เข้าเมนู Page Layout > Print Area จากนั้นค่อยกำหนดตามที่ผมโพสต์ไว้ตามด้านบนครับ หากจะกำหนดพื้นที่การพิมพ์แบบ Auto ก็สามารถทำได้ด้วย VBA ซึ่งต้องเขียนมาเองก่อนพร้อมแจ้งมาด้วยว่าอยู่ใน Module ไหน ชื่อว่าอะไร ติดขัดบร...
by kio2002
Fri Sep 16, 2016 7:34 pm
Forum: Excel
Topic: กำหนดพื้นที่การพิมพ์ แล้ว RoundedRectangle1 ที่สร้างไว้ถูกซ่อน
Replies: 8
Views: 326

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

:D กำหนดตามภาพครับ เรียนท่านอาจารย์ snasui ต้องขออภัยด้วยครับ ผมได้ลองทำตามที่อารย์บอกแล้วครับ แต่ยังไม่ตรงตามที่ต้องการ ผมขออธิบายอีกครั้ง เนื่องจากอธิบายไม่หมด ผมสร้างตารางมาให้ดูใหม่แล้วครับ พื้นที่การปริ้นของผมก็คือต้องการปริ้นหน้า 1-2 หรือ 4-5 แล้วแต่รายการสินค้าจะเยอะมากน้อย ที่ผ่านๆมา ผมจะต้...
by kio2002
Sat Sep 10, 2016 9:33 pm
Forum: Excel
Topic: กำหนดพื้นที่การพิมพ์ แล้ว RoundedRectangle1 ที่สร้างไว้ถูกซ่อน
Replies: 8
Views: 326

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

เรียนทุกท่านครับ ผมกำหนดพื้นที่การพิมพ์ แล้ว RoundedRectangle1 ที่สร้างไว้ แล้วถูกซ่อนครับ โดยวัตถุประสงค์ของผม คือต้องการสร้าง RoundedRectangle1 วางไว้นอกพื้นที่การพิมพ์ ผมกำหนดพื้นที่การพิมพ์แบบ เลือกทั้ง column A ถึง G แล้ว RoundedRectangle1 ที่สร้างไว้ใช้ ถูกซ่อนไว้ครับ พอจะมีวิธีไม่ให้ RoundedR...
by kio2002
Thu Sep 08, 2016 9:12 pm
Forum: Excel
Topic: อยากสร้างกล่องข้อความขึ้นมาแจ้งเตือนตามเงื่อนไขที่กำหนดไว้(VBA)
Replies: 3
Views: 180

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

เรียนทุกท่าน ผมได้ทำ VBA ลบแถวที่มีค่าเป็น 0 หรือไม่มีค่าใดๆ ในเซลล์ที่กำหนดไว้ระหว่าง A10 ถึง A20 แต่พอใส่จำนวนสินค้า ในเซลล์ A10ถึงA20ทุกเซลล์เป็นค่าใดๆ เช่น 1,2,6,7 มันจะมีกล่องข้อความขึ้นมาแจ้ง "run-time error '1004': "No cells werw found." แต่ผมอยากให้มีกล่องข้อความขึ้นมาแจ้งเตือ...
by kio2002
Sat May 07, 2016 8:44 am
Forum: Excel
Topic: สูตรเปลี่ยนตาม Drop Down ที่เลือก
Replies: 6
Views: 437

Re: สูตรเปลี่ยนตาม Drop Down ที่เลือก

ขอบคุณท่าน Pro602ครับ
ผมทำตามสูตรของท่านได้แล้วครับ ขอบคุณมากครับ
by kio2002
Thu May 05, 2016 10:02 pm
Forum: Excel
Topic: สูตรเปลี่ยนตาม Drop Down ที่เลือก
Replies: 6
Views: 437

Re: สูตรเปลี่ยนตาม Drop Down ที่เลือก

:D ตัวอย่างการปรับสูตรที่ E10 ครับ =CEILING(F10*$E$8/100+F10,IF($E$7="ไม่ปัด",F10*$E$8/100+F10,0.25)) สอบถามเพิ่มครับ ผมสร้าง drop down มาเพิ่มอีก1เงื่อนไข "ปัดขึ้นจำนวนเต็ม" โดย ถ้าเลือก"ปัดขึ้นจำนวนเต็ม" ให้เซลล์ G10ถึงG16 ปัดจุดทศนิยมขึ้นเป็นจำนวนเต็มครับ เช่น 33.55...
by kio2002
Tue Apr 26, 2016 9:30 pm
Forum: Excel
Topic: ต้องการ Copy cells จากชีทที่ถูกซ้อน ไปอีกชีท โดยใช้ VBA
Replies: 2
Views: 149

Re: ต้องการ Copy cells จากชีทที่ถูกซ้อน ไปอีกชีท โดยใช้ VBA

:D ตัวอย่าง Code ครับ Sub สี่เหลี่ยมผืนผ้า1_Click() Sheets("Sheet2").UsedRange.Copy Sheets("Sheet1").Range("a1") End Sub ความหมายคือให้คัดลอก Sheet2 เฉพาะพื้นที่ที่ใช้งานจริงไปวางที่ Sheet1 เซลล์ A1 ขอบคุณครับ ท่านอาจารย์ snasui ผมทดลองแล้วใช้ได้ครับ แต่เวลา Copy มาแล้...

Go to advanced search