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

Search found 64 matches

by sosadboy
Wed Mar 20, 2024 5:31 pm
Forum: Excel
Topic: การประกาศตัวแปรใน VBA Excel
Replies: 1
Views: 78

การประกาศตัวแปรใน VBA Excel

ใน VBA Excel ผมสร้าง sub ทั้งหมด 3 อันซึ่งมีตัวแปร i ที่มีประเภทข้อมูลเป็น long อยู่ในทั้ง 3 sub นั้นซึ่งอยู่ใน worksheet เดียวกัน
มีวิธีการประกาศตัวแปรเพียงครั้งเดียวแล้วใช้ได้ทั้ง 3 sub หรือไม่ครับ ถ้ามีต้องประกาศอย่างไรครับ ขอบคุณครับ
by sosadboy
Fri Oct 14, 2022 12:31 pm
Forum: Excel
Topic: Text to column แล้ว วันที่ไม่ถูกต้อง
Replies: 1
Views: 190

Text to column แล้ว วันที่ไม่ถูกต้อง

ผมมีปัญหาในการจัดรูปแบบวันที่โดยใช้โค๊ด VBA ครับ วันที่เดิมอยู่ในรูปแบบของ General เช่น '01/10/2022 ผมใช้ Text to column ใน การตัดเครื่องหมาย ' ออก แล้วเปลี่ยนรูปแบบวันที่ให้อยู่ในรูปแบบ dd/mm/bb โดยใช้ VBA เพื่อเวลาทำเป็น Table แล้วจะสามารถ Sort ข้อมูลได้ง่าย แต่วันที่ที่ได้หลังจากรันใช้โค๊ดกลับเป็...
by sosadboy
Sat Sep 10, 2022 4:08 pm
Forum: Excel
Topic: คัดลอกข้อมูลจากสมุดงานที่สร้างใหม่ไปยังสมุดงานอื่นไม่ได้
Replies: 7
Views: 388

Re: คัดลอกข้อมูลจากสมุดงานที่สร้างใหม่ไปยังสมุดงานอื่นไม่ได้

:o ผมลืมแก้คำว่า Windows เป็น Workbooks แต่ก็ยินดีด้วยที่ได้คำตอบแล้วครับ สำหรับการเปิดด้วยการ Double Click จะแตกต่างจากการเปิดผ่านเมนู File เพราะเราสามารถกำหนดใน Excel ได้ว่าให้ปฏิเสธการเปิดด้วย Application อื่นที่ใช้ DDE หรือไม่ โดยเข้าผ่านเมนู File > Options > Advanced > ที่ General คลิกที่ Igno...
by sosadboy
Fri Sep 09, 2022 4:02 pm
Forum: Excel
Topic: คัดลอกข้อมูลจากสมุดงานที่สร้างใหม่ไปยังสมุดงานอื่นไม่ได้
Replies: 7
Views: 388

Re: คัดลอกข้อมูลจากสมุดงานที่สร้างใหม่ไปยังสมุดงานอื่นไม่ได้

:D ลองทำดังนี้ครับ เปิดไฟล์โปรแแกรมและไฟล์ Sheet1 แค่ 2 ไฟล์ > ไปที่ไฟล์โปรแกรม > เข้าหน้าต่าง VBE (หากอยู่ที่ Excel กดแป้น Alt+F11) > กดแป้น Ctrl+G เพื่อเปิดหน้าต่าง Immediate Windows > คีย์ ?Windows("Sheet1").Name > Enter สังเกตผลลัพธ์ที่ได้ คีย์เป็น ?Windows(1).Name > Enter สังเกตผลลัพ...
by sosadboy
Wed Sep 07, 2022 4:39 pm
Forum: Excel
Topic: คัดลอกข้อมูลจากสมุดงานที่สร้างใหม่ไปยังสมุดงานอื่นไม่ได้
Replies: 7
Views: 388

Re: คัดลอกข้อมูลจากสมุดงานที่สร้างใหม่ไปยังสมุดงานอื่นไม่ได้

snasui wrote: Wed Sep 07, 2022 11:27 am :D ลอง Debug ดูว่าเกิดจากปัญหาที่บรรทัดไหน วิธีการ Debug ดูจากโพสต์นี้ครับ viewtopic.php?f=3&t=17483&p=103247#p103247
error ตรงบรรทัดนี้ครับ

Code: Select all

     Windows("Sheet1").Activate 
ขึ้นข้อความ Alert ว่า "Run-time error '9': Subscript out of range" ครับ
by sosadboy
Wed Sep 07, 2022 11:20 am
Forum: Excel
Topic: คัดลอกข้อมูลจากสมุดงานที่สร้างใหม่ไปยังสมุดงานอื่นไม่ได้
Replies: 7
Views: 388

คัดลอกข้อมูลจากสมุดงานที่สร้างใหม่ไปยังสมุดงานอื่นไม่ได้

ผมใช้โค๊ด VBA ในการคัดลอกข้อมูลจากสมุดงานที่พึ่งสร้างใหม่ ซึ่งเป็นสมุดงานที่ออกมาจากโปรแกรมของทางบริษัทในรูปแบบของสมุด งาน excel ปัญหาที่พบคือ โค๊ดที่เขียนใช้กับเครื่องตัวเองได้ตามปกติ แต่พอเอาโค๊ดไปใช้กับบางเครื่องในเครือข่าย พบว่าโค๊ดไม่ทำงาน โค๊ดที่ใช้คือ Sub ดึงข้อมูล() Application.ScreenUpdatin...
by sosadboy
Tue Feb 15, 2022 3:56 pm
Forum: Excel
Topic: เพิ่มขนาดช่องที่แสดงผลใน Drop down list
Replies: 2
Views: 413

Re: เพิ่มขนาดช่องที่แสดงผลใน Drop down list

ขอบคุณมากครับ จะลองไปปรับปรุงใช้งานครับ
by sosadboy
Fri Feb 11, 2022 3:04 pm
Forum: Excel
Topic: เพิ่มขนาดช่องที่แสดงผลใน Drop down list
Replies: 2
Views: 413

เพิ่มขนาดช่องที่แสดงผลใน Drop down list

เนื่องจาก drop down list ที่สร้างมีจำนวนรายการใน list จำนวนมาก ทำให้ต้องเสียเวลามาเลื่อนหารายการที่ต้องการ ในส่วนนี้เราสามารถ กำหนดให้ drop down list แสดงข้อมูลตามจำนวนที่เราต้องการได้หรือไม่ครับ เช่นในตอนที่เรากด drop down list ตอนแรกต้องการให้โชว์ข้อมูล 10 รายการจากทั้งหมด ซึ่งปัจจุบันผมใช้ Excel ...
by sosadboy
Fri Feb 04, 2022 4:06 pm
Forum: Excel
Topic: ต้องการย่อสูตรที่ใช้ฟังก์ชัน IF แบบหลายชั้นหรือมีฟังก์ชันไหนที่เหมาะสมกว่าไหมครับ
Replies: 2
Views: 378

ต้องการย่อสูตรที่ใช้ฟังก์ชัน IF แบบหลายชั้นหรือมีฟังก์ชันไหนที่เหมาะสมกว่าไหมครับ

เนื่องจากผมต้องสรุปรายงานเป็นประจำ ซึ่งมีปัญหาตรงที่จำนวนชิ้นวัตถุดิบที่นำเข้าไม่เป็นมาตรฐานเดียวกัน มาทั้งชิ้นใหญ่ และชิ้นที่ส่งมาเป็นสำเร็จรูปแล้วทำให้ต้องหารชิ้นที่ส่งมาเป็นเป็นชิ้นสำเร็จรูปกลับเป็นชิ้นใหญ่เพื่อง่ายและสอดคล้องต่อการสรุปงาน โดยปัญหาหลักๆ คือในรายงานต้นฉบับไม่มีสัดส่วนชิ้นใหญ่ต่อชิ...
by sosadboy
Tue May 12, 2020 1:41 am
Forum: Excel
Topic: เลือก cell โดยอ้างอิงจากตำแหน่ง last use cell
Replies: 3
Views: 641

Re: เลือก cell โดยอ้างอิงจากตำแหน่ง last use cell

ขอบคุณ อาจารย์มากครับ คิดอยู่ว่าต้องใช้ offset แต่เขียน statement ไม่ถูกเองพอไปรันเลยไม่ได้ผลตามที่ตัวเองต้องการ ขอบคุณมากๆครับ เอาไปปรับใช้กับงานอื่นได้มากเลยครับ
by sosadboy
Mon May 11, 2020 4:05 pm
Forum: Excel
Topic: เลือก cell โดยอ้างอิงจากตำแหน่ง last use cell
Replies: 3
Views: 641

Re: เลือก cell โดยอ้างอิงจากตำแหน่ง last use cell

โค๊ดที่หาเซลล์สุดท้ายของตาราง ผมใช้ตามนี้ครับ Sub GotoRedcells() Range("A5000").End(xlUp).Select 'ติดที่ต่อจากนี้จะอ้างอิงอย่างไร เพื่อเลือกเซลล์ที่อยู่ถัดลงไป 2 เซลล์ครับ End Sub ที่ต้องอ้างอิง last cell เพราะ last cell ของตารางจะไม่ใช่ตำแหน่งเดิมเสมอ ในไฟล์ที่ใช้งานจริง ฝากผู้รู้ทุกท่านช...
by sosadboy
Mon May 11, 2020 1:36 pm
Forum: Excel
Topic: เลือก cell โดยอ้างอิงจากตำแหน่ง last use cell
Replies: 3
Views: 641

เลือก cell โดยอ้างอิงจากตำแหน่ง last use cell

ผมต้องการเลือกตำแหน่ง cell ถัดจากบรรทัดสุดท้ายของตารางลงไป 2 Cell ครับ ผมต้องเพิ่มเติม Code อย่างไรครับ ตอนนี้ทำได้แค่หาตำแหน่งบรรทัดสุดท้ายของตาราง พยายามหาแล้วต่อ Code ไม่ได้สักทีครับ ตามไฟล์แบบต้องการเลือกตำแหน่ง cell ที่ระบายสีแดงครับ ฉนกำในไฟล์ครับ มี Module เดียวครับ
by sosadboy
Wed Mar 04, 2020 1:47 pm
Forum: Excel
Topic: ตั้งค่าหน้าต่างแผ่นงาน excel ตามความต้องการ MS 2016
Replies: 1
Views: 503

ตั้งค่าหน้าต่างแผ่นงาน excel ตามความต้องการ MS 2016

ปัญหาของผมคือเมื่อเปิดไฟล์ excel ขึ้นมามันจะย่อขนาดเล็กตลอดอยู่ตรงมุมซ้ายบนของหน้าจอ ไฟล์ excel ที่ว่า export ออกมาจากโปรแกรมประยุกต์ทองทางบริษัท ครับ จึงอยากทราบว่า เราสามารถตั้งค่าให้เมื่อเปิดโปรแกรมแล้วหน้าต่างโปรแกรมมีขนาดตามที่ต้องการได้หรือไม่ครับ เช่น ครึ่งหน้า เต็มหน้าจอ เป็นต้นครับ หรือต้อง...
by sosadboy
Wed Feb 26, 2020 1:21 pm
Forum: Excel
Topic: copy ข้อมูลจากไฟล์ที่ไม่ได้ save ไม่ได้
Replies: 5
Views: 996

Re: copy ข้อมูลจากไฟล์ที่ไม่ได้ save ไม่ได้

ได้แล้วครับ ต้องเปลี่ยน

Code: Select all

 Windows("Sheet1").Activate  
เป็น

Code: Select all

 
Workbooks("Sheet1").Activate  
ครับ น่าจะเป็นที่เวอร์ชันของ ms office
by sosadboy
Tue Feb 25, 2020 3:08 pm
Forum: Excel
Topic: Conditional formatting แบบมีเงื่อนไข
Replies: 5
Views: 1003

Re: Conditional formatting แบบมีเงื่อนไข

ใช่ครับ ลองดูเลยครับ เลือกช่วงที่จะให้เป็นตามเงื่อนไขหรือสี แล้วใส่ใน Conditional formatting
ขอบคุณมากครับ ตอนแรกผมใส่แค่เซลล์เดียวแล้ว copy รูปแบบเอา แบบนี้ให้ผลไม่เหมือนกันใช่ไหมครับถึงเราไม่ล็อค row ใน conditional formatting ก็ตาม
by sosadboy
Tue Feb 25, 2020 12:49 pm
Forum: Excel
Topic: Conditional formatting แบบมีเงื่อนไข
Replies: 5
Views: 1003

Re: Conditional formatting แบบมีเงื่อนไข

puriwutpokin wrote: Tue Feb 25, 2020 11:40 am ปรับใน Conditional formatting =$B2>0
คือ ถ้าปรับแล้วทุกแถวจะปรับตามไหมครับ สมมุติถ้าผม copy รูปแบบลงมา เช่น ที่ A3 เงื่อนไขจะเป็นไปตามค่าใน B3 คือ $B3>0 ไหมครับ
by sosadboy
Tue Feb 25, 2020 9:07 am
Forum: Excel
Topic: Conditional formatting แบบมีเงื่อนไข
Replies: 5
Views: 1003

Conditional formatting แบบมีเงื่อนไข

ผมพยามที่จะกำหนด Conditional formatting โดยมีเงื่อนไขคือ ให้ระบายสีช่อง A2 เมื่อค่าในเซลล์ B2 เข้าเงื่อนไขที่กำหนด เช่นเมื่อ B2 มากกว่า 0 ให้ระบายสีเหลืองที่ A2 แต่ที่ผมติดปัญหาคือต้องการคัดลอก format ดังกล่าวลงมาที่เซลล์ A3 โดยให้เงื่อนไขใน Conditional Formatting เลื่อนลงมาเป็นช่อง B3 สามารถทำได้หร...
by sosadboy
Fri Feb 21, 2020 1:46 pm
Forum: Excel
Topic: copy ข้อมูลจากไฟล์ที่ไม่ได้ save ไม่ได้
Replies: 5
Views: 996

Re: copy ข้อมูลจากไฟล์ที่ไม่ได้ save ไม่ได้

puriwutpokin wrote: Thu Feb 20, 2020 4:18 pm ลองกำหนดตำแหน่งที่จะว่างให้ชัดเจนดูครับ ว่าตำแหน่งปลายทางอยู่ที่เซลใด
เพราะ คำสั่งนี้ไม่ได้ระบุเท่าที่ทราบ ในเวอร์ชั่นใหม่จะไม่เข้าใจว่าตำแหน่งใด

Code: Select all

ActiveSheet.Paste
อาจจะลองปรับเป็น

Code: Select all

ActiveSheet.Range("A1").PasteSpecial xlAll
ขอบคุณมากครับ