: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

รวมข้อความ

ฟอรัมถาม-ตอบปัญหาการใช้งาน MS Excel and VBA
Forum rules
  1. ไม่อนุญาตให้ใช้ภาษาแชทในการถามและตอบปัญหา ไม่ใช้คำว่า "คับ" หรือ "อ่ะครับ" แทนคำว่า "ครับ" ไม่ใช้คำว่า "เด๋ว" แทนคำว่า "เดี๋ยว" เป็นต้น เนื่องจากเมื่อแปลเป็นภาษาต่างประเทศแล้วจะให้ความหมายผิดไปจากที่ควรจะเป็น
  2. ห้ามถามโดยระบุชื่อผู้ตอบและต้องตั้งชื่อกระทู้ให้สื่อถึงปัญหาที่จะถาม ไม่ตั้งชื่อว่า ช่วยด้วยครับ, มีปัญหามาปรึกษาครับ เป็นต้น
  3. กรุณาอธิบายปัญหาและระบุคำตอบที่ต้องการมาในกระทู้ด้วยเสมอถึงแม้จะอธิบายไว้ในไฟล์แนบแล้วก็ตาม ทั้งนี้เพื่ออำนวยความสะดวกแก่เพื่อนสมาชิกในการค้นหาข้อมูล
  4. กรุณาแนบไฟล์ตัวอย่างพร้อมแสดงคำตอบที่ถูกต้องมาในไฟล์ด้วยเพื่อให้ง่ายต่อการทำความเข้าใจและสะดวกต่อการตอบคำถาม (ขนาดไฟล์ไม่เกิน 500Kb ขนาดภาพไม่เกิน 800*600 Pixel) ไม่แนบเป็น Link มาจากแหล่งอื่นที่อาจจะถูกลบทิ้งไปโดยต้นทางในภายหลัง นอกจากนี้ไม่ควรแนบไฟล์ที่มีข้อมูลสำคัญอันก่อให้เกิดความเสียหายกับตนเองและผู้อื่น
  5. กรณีเป็นคำถามเกี่ยวกับ Programming เช่น VBA, VB.Net, C#, SQL ฯลฯ ต้องลองเขียนมาเองก่อนเสมอ ถามเฉพาะที่ติดปัญหา ระบุ Module, Procedure ที่ติดปัญหาให้ชัดเจน กรุณาโพสต์ Code ให้แสดงเป็น Code คือเปิดด้วย [code] และปิดด้วย [/code] ตัวอย่างเช่น [code]dim r as range[/code] เพื่อให้แตกต่างจากข้อความทั่วไป สะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่าง)
  6. กรุณาแจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่
predee16
Member
Member
Posts: 93
Joined: Wed Feb 27, 2019 4:13 pm
Excel Ver: 2007

รวมข้อความ

#1

Post by predee16 »

ผมต้องการรวมข้อความ โดยมีเงื่อนไขตามรายละเอียดแนบ ครับ
You do not have the required permissions to view the files attached to this post.
User avatar
parakorn
Gold
Gold
Posts: 1223
Joined: Thu Mar 14, 2013 9:41 am
Location: Central Chaengwattana[Tops]
Excel Ver: 365
Contact:

Re: รวมข้อความ

#2

Post by parakorn »

ตามกฏของฟอรั่ม
รบกวนอธิบายปัญหาอย่างย่อ และตัวอย่างผลลัพท์ที่ต้องการในโพสด้วยครับ ผู้ที่เข้ามาศึกษาจะได้รู้ว่าเป็นหัวข้อที่ตรงกับที่ตนเองศึกษาหรือไม่
Xcelvba
Silver
Silver
Posts: 549
Joined: Thu Feb 03, 2022 9:04 am
Excel Ver: 2019

Re: รวมข้อความ

#3

Post by Xcelvba »

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

D2=CONCAT(A2,C2,IF(OR(B2="OT00001",B2="OT00009"),B2,IF(B2="OT00006","O",IF(LEFT(B2,1)="E","E",IF(LEFT(B2,1)="C","C",LEFT(SUBSTITUTE(B2,"0",""),1))))))
Copied cross down
User avatar
puriwutpokin
Guru
Guru
Posts: 3693
Joined: Fri Jan 04, 2013 9:49 pm
Location: Bangkok
Excel Ver: MS.365

Re: รวมข้อความ

#4

Post by puriwutpokin »

อีกตัวอย่าง D2=A2&IF(--MID(B2,4,1)>0,C2&MID(B2,4,1),IF(OR(LEFT(B2)="C",LEFT(B2)="E",C2="A"),C2&LEFT(B2),C2&B2))
:shock: :roll: :D
Xcelvba
Silver
Silver
Posts: 549
Joined: Thu Feb 03, 2022 9:04 am
Excel Ver: 2019

Re: รวมข้อความ

#5

Post by Xcelvba »

puriwutpokin wrote: Thu Jun 09, 2022 3:56 pm อีกตัวอย่าง D2=A2&IF(--MID(B2,4,1)>0,C2&MID(B2,4,1),IF(OR(LEFT(B2)="C",LEFT(B2)="E",C2="A"),C2&LEFT(B2),C2&B2))
--MID ขีดๆ คืออะไรครับ :idea:
User avatar
puriwutpokin
Guru
Guru
Posts: 3693
Joined: Fri Jan 04, 2013 9:49 pm
Location: Bangkok
Excel Ver: MS.365

Re: รวมข้อความ

#6

Post by puriwutpokin »

Xcelvba wrote: Thu Jun 09, 2022 4:13 pm
puriwutpokin wrote: Thu Jun 09, 2022 3:56 pm อีกตัวอย่าง D2=A2&IF(--MID(B2,4,1)>0,C2&MID(B2,4,1),IF(OR(LEFT(B2)="C",LEFT(B2)="E",C2="A"),C2&LEFT(B2),C2&B2))
--MID ขีดๆ คืออะไรครับ :idea:
เปลี่ยนตัวเลขในรูปแบบข้อความให้กลับเป็นตัวเลขที่นำไปคำนวณได้ครับ
:shock: :roll: :D
linzhengli
Bronze
Bronze
Posts: 336
Joined: Wed Mar 01, 2017 9:15 am
Excel Ver: 2003

Re: รวมข้อความ

#7

Post by linzhengli »

หากเป็นระบบ excel 2003 ใช้สูตรเช่นไรครับ
User avatar
puriwutpokin
Guru
Guru
Posts: 3693
Joined: Fri Jan 04, 2013 9:49 pm
Location: Bangkok
Excel Ver: MS.365

Re: รวมข้อความ

#8

Post by puriwutpokin »

linzhengli wrote: Thu Jun 09, 2022 4:41 pm หากเป็นระบบ excel 2003 ใช้สูตรเช่นไรครับ
ใช้ตามนี้ได้เลยครับ
:shock: :roll: :D
linzhengli
Bronze
Bronze
Posts: 336
Joined: Wed Mar 01, 2017 9:15 am
Excel Ver: 2003

Re: รวมข้อความ

#9

Post by linzhengli »

ขอบคุณท่านมา ณ โอกาสนี้
ขอแสดงความนับถือ
林正利
predee16
Member
Member
Posts: 93
Joined: Wed Feb 27, 2019 4:13 pm
Excel Ver: 2007

Re: รวมข้อความ

#10

Post by predee16 »

ขอรบกวนอีกครั้งครับ รวมข้อความ คำตอบคือตรงผลลัพธ์
เงื่อนไขตามรายละเอียด

code vendor no Payment Method ผลลัพธ์ เงื่อนไข
Z068 0006002510 J Z068_J_Z68 ถ้าเลข Vendor no = 6 ให้แทนด้วย Z68
1083 0001000005 L 1083_L_INT ถ้าเลข Vendor no = 1 ให้แทนด้วย INT
1019 C01000886 K 1019_K_OWT ถ้าตัวอักษร Vendor no = C ให้แทนด้วย OWT
1089 OT00006 A 1089_A_REF ถ้าตัวอักษร Vendor no = O ให้แทนด้วย REF
1004 E01022900 J 1004_J_EMP ถ้าตัวอักษร Vendor no = J ให้แทนด้วย EMP

ขอบคุณมากครับ
You do not have the required permissions to view the files attached to this post.
User avatar
snasui
Site Admin
Site Admin
Posts: 30736
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:

Re: รวมข้อความ

#11

Post by snasui »

:D Vendor Number ดูจากไหน อักขระที่เท่าไรถึงเท่าไรหรือดูอย่างไร กรุณาอธิบายมาอย่างละเอียดครับ
predee16
Member
Member
Posts: 93
Joined: Wed Feb 27, 2019 4:13 pm
Excel Ver: 2007

Re: รวมข้อความ

#12

Post by predee16 »

Concatenate.jpg
Vendor no ดูจากคอลัมภ์ D " ถ้าเป็นตัวเลขเอาเลขจำนวนเต็มตัวหน้า และถ้าเป็นตัวอักษร ก็ใช้ตัวอักษรตัวหน้าสุด"
เงื่อนไข ตามคอลัมภ์ AD ครับ
You do not have the required permissions to view the files attached to this post.
User avatar
snasui
Site Admin
Site Admin
Posts: 30736
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:

Re: รวมข้อความ

#13

Post by snasui »

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

เซลล์ AC2 คีย์

=A2&"_"&X2&"_"&VLOOKUP(IFERROR(LEFT(D2,4)+0,LEFT(D2)),{1,"INT";6,"Z68";"C","OWT";"J","EMP";"O","REF"},2,0)

Enter > Copy ลงด้านล่าง
predee16
Member
Member
Posts: 93
Joined: Wed Feb 27, 2019 4:13 pm
Excel Ver: 2007

Re: รวมข้อความ

#14

Post by predee16 »

ผมรบกวนขอสูตรวิธีการรวมข้อความอีกครั้งครับ เพราะมีรายละเอียดเพิ่มเติมเข้ามานิดหน่อย (มีหลักที่เป็นเลข 0 ไม่เท่ากัน) รายละเอียดเงื่อนไข คือ
ช่อง D2-D14 ที่ใช้ Vendor no เป็นเงื่อนไข
และช่อง A15 ใช้ Company code เป็นเงื่อนไข
คำตอบที่ต้องการคือช่อง AC
ขอบคุณมากครับ
You do not have the required permissions to view the files attached to this post.
User avatar
snasui
Site Admin
Site Admin
Posts: 30736
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 365
Contact:

Re: รวมข้อความ

#15

Post by snasui »

:D ตัวอย่างการปรับสูตรครับ

=A2&"_"&X2&"_"&IF(LEFT(D2)="O",VLOOKUP(RIGHT(D2)+0,{1,"OT1";6,"REF";9,"OT9"},2,0),IF(LEFT(D2)="C","OWF",IF(LEFT(D2)="E","EMP",IF(A2="Z068","Z68",IF(LEFT(D2,3)+0=0,VLOOKUP(LEFT(D2,4)+0,{1,"INC";3,"VEN";6,"STE";7,"GEN"},2,0),IF(LEFT(D2,2)+0=0,VLOOKUP(LEFT(D2,3)+0,{1,"COM";8,"STE"},2),"Not meet"))))))
Post Reply