: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

นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

ฟอรัมถาม-ตอบปัญหาการใช้งานสูตรและฟังก์ชัน Excel
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. กรุณาแจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่
March201711
Gold
Gold
Posts: 1047
Joined: Sat Mar 11, 2017 7:01 pm
Excel Ver: 2010, 365

นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#1

Post by March201711 »

สอบถามค่ะ อยากทราบว่าจะเขียนสูตรอย่างไรให้อยู่ใน 3 column นี้ค่ะ
โดยปกติเวลาเขียนสูตรแล้วต้อง copyจาก column B53 ถึง D53 ไปวางไว้ที่ cell B60 ถึง D60 แบบ Paste special แต่จะติดตรงที่มีขีดล่างที่ไม่มีข้อความ ต้อง double click ที่ cell B60 มาลบทุกครั้งเลยค่ะ ต้องปรับสูตรอย่างไรบ้างคะ
You do not have the required permissions to view the files attached to this post.
User avatar
snasui
Site Admin
Site Admin
Posts: 31257
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#2

Post by snasui »

:D B26 ปรับสูตรเป็นตามด้านล่างครับ

=IF(B3="","",B3&"_"&A3)

Enter > Copy ลงด้านล่าง
March201711
Gold
Gold
Posts: 1047
Joined: Sat Mar 11, 2017 7:01 pm
Excel Ver: 2010, 365

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#3

Post by March201711 »

ขีดล่างหายไปแต่ก้อเป็นค่าว่าง ซึ่งไม่พอดีกับบรรทัดค่ะ ต้องเข้าไป double cilck ที่cell B60 ถึง D60 ลบค่าว่างออกให้พอดีกับบรรทัดค่ะ ตามที่แนบค่ะ
You do not have the required permissions to view the files attached to this post.
User avatar
snasui
Site Admin
Site Admin
Posts: 31257
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#4

Post by snasui »

:D เซลล์ B53 ปรับสูตรเป็นด้านล่างครับ

=LEFT(B25&CHAR(10)&B26&CHAR(10)&B27&CHAR(10)&B28&CHAR(10)&B29&CHAR(10)&B30&CHAR(10)&B31&CHAR(10)&B32&CHAR(10)&B33&CHAR(10)&B34&CHAR(10)&B35&CHAR(10)&B36&CHAR(10)&B37&CHAR(10)&B38&CHAR(10)&B39&CHAR(10)&B40&CHAR(10)&B41&CHAR(10)&B42&CHAR(10)&B43&CHAR(10)&B44,SUMPRODUCT(LEN(B25:B44))+COUNTIF(B25:B44,"*?")-1)

Enter > Copy ไปด้านขวาจนถึง D53
March201711
Gold
Gold
Posts: 1047
Joined: Sat Mar 11, 2017 7:01 pm
Excel Ver: 2010, 365

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#5

Post by March201711 »

ทำได้แล้วค่ะอาจารย์ ช่วยอธิบายเป็นความรู้เพื่อประยุกต์ใช้งานอื่นๆต่อไป ขอบคุณมากค่ะ :D
User avatar
snasui
Site Admin
Site Admin
Posts: 31257
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#6

Post by snasui »

:D เป็นการตัดสายอักขระมาเท่าที่ต้องการจะใช้งานครับ

Left คือฟังก์ชั่นการตัดข้อความ เช่น Left(A1,4) แปลว่าตัดอักขระด้านซ้ายของ A1 มา 4 อักขระ
Len คือฟังก์ชั่นสำหรับการนับจำนวนอักขระ ถ้านับเซลล์เดียวใช้ Len(Cell) ถ้านับหลายเซลล์พร้อมกันใช้ Sumproduct(Len(Range)) เพราะ Len แข็งแรงไม่พอที่จะนับเป็นช่วง แต่การนับด้วย Len จะไม่ได้นับ Char(10) เพราะ B25:B44 ยังไม่ได้เชื่อมกับ Char(10) จึงทำให้นับขาดไปตามจำนวน Char(10) ที่ใช้

จำนวน Char(10) ที่จำเป็นต้องใช้คือตามจำนวนบรรทัดที่มีข้อมูลใน B25:B44 จึงต้องใช้ Countif(Range,"*?") มาช่วยนับว่าในช่วง B25:B44 มีกี่รายการเพื่อจะบวกเข้าไปกับ Sumproduct(Len(Range)) จากนั้นหักออกด้วย 1 เพื่อให้พอดีกับจำนวณอักขระที่ต้องตัดเนื่องจากบรรทัดสุดท้ายที่มีข้อมูลใน B25:B44 ไม่จำเป็นต้องเชื่อมกับ Chare(10) หรือนั่นคือ Char(10) ที่ใช้จะน้อยกว่าจำนวนข้อมูลใน B25:B44 อยู่ 1 รายการครับ
March201711
Gold
Gold
Posts: 1047
Joined: Sat Mar 11, 2017 7:01 pm
Excel Ver: 2010, 365

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#7

Post by March201711 »

:D ขอบคุณมากค่ะอาจารย์ ได้ความรู้เพิ่มขึ้นอีกค่ะ :cp:
March201711
Gold
Gold
Posts: 1047
Joined: Sat Mar 11, 2017 7:01 pm
Excel Ver: 2010, 365

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#8

Post by March201711 »

รบกวน อาจารย์อีกนิดนึงค่ะ ถ้ามีคำว่า Local fund อยากให้ตัวอักษรเป็นสีแดงค่ะ ต้องปรับอย่างไรค่ะ
You do not have the required permissions to view the files attached to this post.
User avatar
logic
Gold
Gold
Posts: 1511
Joined: Thu Mar 18, 2010 1:57 pm
Excel Ver: 365

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#9

Post by logic »

การใส่สีใส่ได้เป็นเซลล์ ๆ ถ้าใส่สีแค่ส่วนหนึ่งต้องเขียนโค้ด VBA มาช่วยครับ :)
March201711
Gold
Gold
Posts: 1047
Joined: Sat Mar 11, 2017 7:01 pm
Excel Ver: 2010, 365

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#10

Post by March201711 »

ใช้ conditional formatting ได้ไหมคะ
User avatar
logic
Gold
Gold
Posts: 1511
Joined: Thu Mar 18, 2010 1:57 pm
Excel Ver: 365

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#11

Post by logic »

March201711 wrote: Wed Mar 28, 2018 2:37 pm ใช้ conditional formatting ได้ไหมคะ
Conditional Formatting มันจะทำทั้งเซลล์ครับ
March201711
Gold
Gold
Posts: 1047
Joined: Sat Mar 11, 2017 7:01 pm
Excel Ver: 2010, 365

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#12

Post by March201711 »

ถ้าเขียน code vba ต้องเขียนอย่างไรคะ
User avatar
snasui
Site Admin
Site Admin
Posts: 31257
Joined: Sun Jan 24, 2010 12:33 pm
Location: Songkhla, Thailand
Excel Ver: 2010, 2019
Contact:

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#13

Post by snasui »

March201711 wrote: Wed Mar 28, 2018 6:42 pm ถ้าเขียน code vba ต้องเขียนอย่างไรคะ
:D ควรศึกษาและเขียนกันมาเองก่อน ผมไม่อนุญาตให้ตอบด้วย Code หากผู้ถามไม่เขียนเป็น Code มาเองก่อน แต่สามารถตอบด้วย Link หรือแนะนำแหล่งศึกษาได้ครับ การสอบถาม VBA ต้องเป็นไปตามกฎการใช้บอร์ดข้อ 5 ด้านบน

การกำหนดรูปแบบข้อความด้วย VBA ลองดูตัวอย่างที่ Link นี้ครับ viewtopic.php?t=6222
March201711
Gold
Gold
Posts: 1047
Joined: Sat Mar 11, 2017 7:01 pm
Excel Ver: 2010, 365

Re: นำแต่ละบรรทัดให้อยู่ในบรรทัดเดียว

#14

Post by March201711 »

ขอบคุณค่ะ จะลองศึกษาดูค่ะ
Post Reply