: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 29 matches

by wongsaton
Fri Sep 25, 2015 11:11 am
Forum: Excel Formulas & Functions
Topic: การ copy ข้อมูลข้ามไฟล์โดยการตรวจสอบข้อมูลในช่องว่าง
Replies: 4
Views: 539

Re: การ copy ข้อมูลข้ามไฟล์โดยการตรวจสอบข้อมูลในช่องว่าง

Code: Select all

If TargetWb.Sheets(1).Range("b" & Rows.Count).End(xlUp) <> "" Then i = 3
code error ที่บรรทัดนี้ครับ ไม่สามารถรันได้ครับ รบกวนแนะนำทีครับ ขอบคุณครับ
by wongsaton
Fri Sep 25, 2015 9:24 am
Forum: Excel Formulas & Functions
Topic: การ copy ข้อมูลข้ามไฟล์โดยการตรวจสอบข้อมูลในช่องว่าง
Replies: 4
Views: 539

การ copy ข้อมูลข้ามไฟล์โดยการตรวจสอบข้อมูลในช่องว่าง

ผมได้ทำการ copy ข้อมูลข้ามไฟล์ได้แล้วครับ แต่ติดปัญหาตรงในการ copy ครั้งต่อไป ผมต้องการ copy ข้อมูลเพียงแค่บางส่วน
พอจะมีวิธีการตั้งเงื่อนไข ตรวจสอบข้อมูลในช่องว่างหรือวิธีอื่นๆบ้างไหมครับ
รบกวนทุกท่านด้วยนะครับ ขอบคุณครับ
ปล.ผมแนบไฟล์ต้นทางและผลลัพธ์ที่ต้องการมาแล้วครับ
by wongsaton
Sun Sep 20, 2015 4:07 pm
Forum: Excel Formulas & Functions
Topic: การ copy ข้อมูลข้ามชีสจากแนวตั้งเป็นแนวนอนครับ
Replies: 7
Views: 842

Re: การ copy ข้อมูลข้ามชีสจากแนวตั้งเป็นแนวนอนครับ

เข้าใจกระจ่างแล้วครับอาจารย์ ขอบพระคุณมากครับ
แล้วถ้าผมต้องการจะ copy เซลล์ที่ไม่ติดกัน จะต้องเริ่มต้นโดยคำสั่งใดครับอาจารย์
เช่น ในไฟล์แนบครับผม ปล.ผมถามเพื่อเป็นความรู้ เพื่อไปปรับใช้ในอนาคตครับอาจารย์ กรุณาด้วยนะครับผม
by wongsaton
Sun Sep 20, 2015 3:53 pm
Forum: Excel Formulas & Functions
Topic: การ copy ข้อมูลข้ามชีสจากแนวตั้งเป็นแนวนอนครับ
Replies: 7
Views: 842

Re: การ copy ข้อมูลข้ามชีสจากแนวตั้งเป็นแนวนอนครับ

Code: Select all

.PasteSpecial Paste:=xlPasteValues, Transpose:=True
เป็นคำสั่งสลับแกนทั้งหมดเลยใช่ไหมครับอาจารย์

Code: Select all

.CurrentRegion.copy
เป็นคำสั่ง copy เซลล์ที่ติดกับ A1 ใช่ไหมครับอาจารย์
แล้วถ้าผมต้องการจะ copy เซลล์ที่ไม่ได้ติดกับ A1 จะมีวิธีทำอย่างไรครับอาจารย์
ขอบพระคุณล่วงหน้าครับ
by wongsaton
Sun Sep 20, 2015 2:51 pm
Forum: Excel Formulas & Functions
Topic: การ copy ข้อมูลข้ามชีสจากแนวตั้งเป็นแนวนอนครับ
Replies: 7
Views: 842

Re: การ copy ข้อมูลข้ามชีสจากแนวตั้งเป็นแนวนอนครับ

ขอบพระคุณมากๆครับอาจารย์ สำเร็จแล้วครับ
code สั้นได้ใจความมากเลยครับ แต่ถ้าผมจะรบกวนอาจารย์ช่วยกรุณาอธิบายคำสั่งแต่ละคำสั่งจะได้ไหมครับ
แต่ถ้าอาจารย์ไม่สะดวกไม่เป็นไรครับผม ขอบพระคุณครับ
by wongsaton
Sun Sep 20, 2015 12:58 pm
Forum: Excel Formulas & Functions
Topic: การ copy ข้อมูลข้ามชีสจากแนวตั้งเป็นแนวนอนครับ
Replies: 7
Views: 842

การ copy ข้อมูลข้ามชีสจากแนวตั้งเป็นแนวนอนครับ

ผมต้องการ copy ข้อมูลจาก sheet1 ที่เป็นแนวตั้งให้ copy ไปอยู่ใน sheet3 แบบแนวนอนครับ
ผมลองเขียน code แบบที่ผมเข้าใจก็ไม่เป็นอย่างที่ผมต้องการครับ ผิดพลาดประการใดขออภัยครับ มือใหม่ครับ
รบกวนทุกท่านแนะนำผมทีนะครับ ขอบพระคุณครับ
ปล.ผมทำผลลัพธ์ที่ต้องการมาเป็นตัวอย่างใน sheet2 ในไฟล์แนบครับ
by wongsaton
Wed Sep 09, 2015 2:47 pm
Forum: Excel Formulas & Functions
Topic: การ copy ข้อมูลไปอีกไฟล์โดยมีเงื่อนไขครับ
Replies: 2
Views: 373

Re: การ copy ข้อมูลไปอีกไฟล์โดยมีเงื่อนไขครับ

ได้แล้วครับอาจารย์ โปรแกรมทำงานอย่างที่ผมต้องการแล้วครับ ขอบคุณมากครับผม :D
by wongsaton
Wed Sep 09, 2015 10:08 am
Forum: Excel Formulas & Functions
Topic: การ copy ข้อมูลไปอีกไฟล์โดยมีเงื่อนไขครับ
Replies: 2
Views: 373

การ copy ข้อมูลไปอีกไฟล์โดยมีเงื่อนไขครับ

ผมอยากจะ copy ข้อมูลวันที่ ในช่อง F3:H3 ไปอีกไฟล์หนึ่งพร้อมกับข้อมูลด้านล่างโดยมีเงื่อนไข ซึ่งข้อมูลด้านล่างไม่มีปัญหาครับ ผมได้ลองปรับโค้ดดูแล้ว ก็ยังไม่ได้ตามที่ผมต้องการครับ รบกวนทุกท่านช่วยแนะนำผมทีนะครับ ขอบคุณครับ
ปล.ผมแนบไฟล์มาแล้วครับ
by wongsaton
Thu Aug 27, 2015 11:11 am
Forum: Excel Formulas & Functions
Topic: copy ข้อมูลข้ามไฟล์จากแนวตั้งเป็นแนวนอนโดยมีเงื่อนไข
Replies: 2
Views: 472

copy ข้อมูลข้ามไฟล์จากแนวตั้งเป็นแนวนอนโดยมีเงื่อนไข

ปัญหาของผมคือ ผมอยากจะให้ข้อมูลในไฟล์ปลายทางถูกจัดอยู่ในตารางในรูปแบบที่กำหนด พอจะมีวิธีไหนหรือ code ไหนไหมครับที่จะสามารถกำหนดที่อยู่ ที่จะให้ไฟล์ไปวางข้อมูลไว้ได้ครับ ผมลองทำยังไงก็เป็นแนวตั้งครับ รบกวนทุกท่านด้วยนะครับ ขอบคุณครับ
ปล.ผมแนบไฟล์ตัวอย่างมาแล้วครับ
by wongsaton
Sat Aug 22, 2015 6:54 pm
Forum: Excel Formulas & Functions
Topic: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ
Replies: 35
Views: 2502

Re: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ

ขอบคุณมากๆนะครับทุกๆท่าน โปรแกรมผมทำงานได้ดีแล้วครับ ไม่มีปัญหาใดๆแล้วครับ ผมได้ลองปรับ code ดูแล้วครับ
ปัญหาเกิดจากไฟล์ปลายทางครับ เปลี่ยนไฟล์ปลายทางอย่างที่คุณ bank9597 แนะนำ ก็สามารถใช้งานโปรแกรมได้อย่างไม่มีปัญหาครับ :thup:

ขอบคุณทุกๆท่านอีกครั้งนะครับ ผมจะต้องนำเสนอหัวหน้าวันจันทร์นี้ครับ ไว ...
by wongsaton
Sat Aug 22, 2015 3:24 pm
Forum: Excel Formulas & Functions
Topic: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ
Replies: 35
Views: 2502

Re: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ

อ. คนควนบอกไปแล้วว่า ไม่มีไฟล์อยู่ โค๊ดจึงไม่ทำงาน

คุณตรวจดูแต่ในโฟลเดอร์ แต่ไม่ได้ดูในโค๊ดว่าอ้างถึงที่ใด :mrgreen:
ลองปรับจาก strPath = "D:\Excle VBA\" เป็น strPath = "C:\Users\MEA\Desktop\ITRON\"

เรียนคุณ bank และทุกท่านครับ strPath = "C:\Users\MEA\Desktop\ITRON\ code นี้คือที่มาของข้อมูลท ...
by wongsaton
Fri Aug 21, 2015 7:59 pm
Forum: Excel Formulas & Functions
Topic: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ
Replies: 35
Views: 2502

Re: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ

แก้ปัญหาล่าสุดก่อนน่ะครับ
ให้ไปที่ Folder Option > View > ติ๊กถูกหน้าช่อง Hide Extension ... > OK
แล้วรันโค๊ดดูครับ

ผมได้ตอบไปแล้วครับ
ผมได้ทำอย่างที่คุณ bank9597 บอกตั้งแต่ตอนแรกแล้วครับ แต่ก็ยังเป็นปัญหาอย่างที่ผมกล่าวไปครับ ไม่ทราบว่าคอมพิวเตอร์ของคุณ bank9597 สามารถรัน code นี้ในไฟล์ตัวอย่าง ...
by wongsaton
Fri Aug 21, 2015 7:22 pm
Forum: Excel Formulas & Functions
Topic: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ
Replies: 35
Views: 2502

Re: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ

snasui wrote::D โปรแกรมแจ้งความผิดพลาดไว้ชัดเจนแล้วว่าไม่พบไฟล์ ได้ตรวจสอบไฟล์ว่ามีอยู่จริงตามที่โปรแกรมฟ้องแล้วหรือไม่ครับ :?:
ตรวจสอบแล้วครับอาจารย์ ไฟล์มีอยู่จริงและชื่อตรงตามในโปรแกรมทุกอย่างเลยครับ แต่โปรแกรมกลับไม่ยอมเปิดไฟล์ ผมจนปัญญาจริงๆครับ รบกวนอาจารย์ทีนะครับ ขอบคุณครับ
by wongsaton
Fri Aug 21, 2015 7:13 pm
Forum: Excel Formulas & Functions
Topic: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ
Replies: 35
Views: 2502

Re: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ

snasui wrote::D Mark on error resume next ให้เป็น Comment แล้วแจ้งมาอีกรอบว่าโปรแกรมฟ้องว่าอย่างไรครับ
โปรแกรม error ที่บรรทัดนี้ครับ

Code: Select all

Workbooks.Open(strPath & strFileName).Activate
(โดยมีลูกศรชี้และเป็นแถบสีเหลืองครับ)
ผมแนบภาพหน้าจอตอนรันมาด้วยครับ รบกวนอาจารย์ทีนะครับ ขอบคุณครับ :D
by wongsaton
Fri Aug 21, 2015 6:09 pm
Forum: Excel Formulas & Functions
Topic: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ
Replies: 35
Views: 2502

Re: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ

:D ไม่ผิดกฎแต่อย่างใดครับ หากท่านใดมีเวลาก็สามารถตอบแบบละเอียดได้ตามสะดวก แต่อาจจะไม่สะดวกกับหลายคนเช่นผมเป็นต้นครับ :mrgreen:

ควรศึกษามาเองและถามเฉพาะที่ติดปัญหา ผู้ตอบจะได้มีเวลาช่วยเหลือสมาชิกท่านอื่นๆ ที่รอคอยคำตอบด้วยครับ :P

ครับอาจารย์ เรื่องความหมาย code ผมจะพยายามศึกษาเองก่อน ถ้าติดป ...
by wongsaton
Fri Aug 21, 2015 5:44 pm
Forum: Excel Formulas & Functions
Topic: การ copy ข้อมูลในเซลล์เดียวโดยการนับตัวอักษร
Replies: 2
Views: 472

Re: การ copy ข้อมูลในเซลล์เดียวโดยการนับตัวอักษร

snasui wrote::D ตัวอย่างสูตรครับ

=Trim(Right(Substitute(A1,"\",Rept(" ",50)),50))
ขอบคุณมากครับอาจารย์ snasui ตรงตามความต้องการเลยครับ ขอบคุณมากๆครับ :cp: :D
by wongsaton
Fri Aug 21, 2015 2:35 pm
Forum: Excel Formulas & Functions
Topic: การ copy ข้อมูลในเซลล์เดียวโดยการนับตัวอักษร
Replies: 2
Views: 472

การ copy ข้อมูลในเซลล์เดียวโดยการนับตัวอักษร

ผมต้องการจะ copy ข้อมูลในเซลล์เดียวกัน เพียงบางส่วนโดยวิธีการนับตัวอักษรหรือวิธีใดๆก็ได้ครับ เช่น D:\Excle VBA\12345.xlsx เป็นข้อมูลที่อยู่ในเซลล์ A1 ด้วยกัน แต่ผมต้องการจะ copy แค่ 12345.xlsx แบบนี้พอจะมีสูตรไหนของ Excel ตอบโจทย์ปัญหานีได้บ้างไหมครับ
รบกวนด้วยครับ ขอบคุณล่วงหน้าครับ :D :cry:
by wongsaton
Fri Aug 21, 2015 2:01 pm
Forum: Excel Formulas & Functions
Topic: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ
Replies: 35
Views: 2502

Re: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ

โค๊ดระบุไปที่ b2 i2 m2 ไม่ใช่ b f j
โค๊ดจะเอาค่าที่ไปบันทึกโดยอ้างจาก range ข้างบน
หากคุณเปลี่ยน range ใหม่ คุณกต้องขยับข้อมูลตามไปด้วย ให้เหมือนเดิม
เว้นแต่คุณจะเข้าใจโค๊ด และปรับให้โค๊ดไปดึงค่าให้ถูกที่ครับ

ครับผม ผมพอจะทราบวิธีการแก้ไขและปรับ code ให้ถูกต้องตามที่ต้องการอยู่บ้างครับ (เอกสารท ...
by wongsaton
Fri Aug 21, 2015 11:20 am
Forum: Excel Formulas & Functions
Topic: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ
Replies: 35
Views: 2502

Re: การเรียกเปิดไฟล์ที่ต้องการพร้อมกับ copy ข้อมูลครับ

ให้เพิ่มโค๊ด :ard:
On Error Resume Next ไว้บนสุดครับ แล้วรันโค๊ดดู


ขอบคุณ คุณ bank9597 มากๆนะครับ โปรแกรมไม่ error แล้วครับ ใจหายเลยครับเมื่อกี้
แต่มีปัญหาอีกแล้วครับ พอหาย error การ copy ข้อมูลที่ทำได้ ตอนนี้มันกลับไม่ copy ข้อมูลตามที่กำหนดแล้วครับ แต่การค้นหาไฟล์ปลายทางจาก row B2,F2,J2 ย ...