สูตร Excel แยก URL ออกจาก Text Link

ก่อนอื่นคงจะมีปัญหาสำหรับบางคนที่ต้องการ เอา link url ของ web ที่ copy มาวางไว้ใน excel ถ้ามีแค่ 1 หรือ 2 link ก็ไม่ใช่ปัญหา แต่ถ้าเราต้องการเอาออกทีละเป็นร้อย ๆ link ทีนี้เราจะทำยังไงให้มันง่าย มาลองดูวิธีกัน
1. ก่อนอื่น ก็เปิด Excel ขึ้นมา พร้อมทั้ง Copy  Text link มาใส่ในช่อง A1 ลงไปเรื่อย

2. จากนั้นให้กดแป้น keyboard Alt + F11 ก็จะได้หน้าต่าง Microsoft Visual Basic ตามรูปด้านล่าง

3. ตรง Sheet1 หรือ Sheet ที่เรากำลังทำงานให้กด เข้าไป แล้ว จะเห็น Book1 - Sheet1 (Code) ปรากฏ Copy Code ด้านล่างไปใส่

-------

Sub ExtractHL()
Dim HL As Hyperlink
For Each HL In ActiveSheet.Hyperlinks
HL.Range.Offset(0, 1).Value = HL.Address
Next
End Sub

--------

 4. จากนั้นก็กด F5 หรือปุ่ม Run ได้เลยครับ เดียวจะเห็น ผลที่เกิดขึ้นที่ Colume b1
มาล่ะครับ สำหรับ link url ที่แสดงออกมา

* ในตัวอย่างนี้ link url น้อย สูตรนี้เหมาะกับ link url เยอะ ๆ ที่เราไม่ต้องการมาแต่ link ออกทีละบรรทัดเพราะมันจะเยอะและเหนื่อยเอาการเลย *

วิธีกรองข้อมูล Excel ที่ซ้ำออก

สูตร Excel วันนี้ ขอแนะนำการนำข้อมูลที่ซ้ำออกจากเซลล์ และเหลือแค่ส่วนที่ไม่ซ้ำให้แสดงผล ออกมาแล้วเราก็ค่อย นำส่วนที่กรองแล้วเอาไปใช้งาน

มาเริ่มกันเลย ให้ดูตัวอย่างจาก ภาพด้านบนน่ะครับ และขั้นแรก เราต้องเตรียมข้อมูลก่อนในที่นี้ผู้เขียน สร้างข้อมูลไว้ แค่ 19 บรรทัดดังนั้นข้อมูล ก็จะเริ่มจาก B2:B20 ดังรูปด้านล่าง

- อธิบายช่องของข้อมูล

B
กรณีที่ท่านมีข้อมูลมากกว่า 19 ช่อง ก็ทำได้ แค่ เอา ข้อมูลที่ต้องการกรองมาใส่ แทนช่อง B2 จนถึงช่องสุดท้ายที่ท่านมีข้อมูล

A
ช่องนี้เราต้องมีสูตร เพื่อให้แสดงค่าของแถวที่มันซ้ำออกมาเป็นตัวเลข เพื่อให้รู้ว่าช่องข้อมูลของ B2:B20 มีตรงไหนที่ซ้ำ มันจะแสดงตัวเลขหรือลำดับที่ซ้ำออกมา ช่องนี้จะเป็นตัวกรองขั้นแรกของการดึงข้อมูล
- ช่อง A2 ให้เราใส่ค่าเริ่มต้น คือ 1
- ช่อง A3 ให้ใส่สูตร ลงไป  =IF(COUNTIF($B$2:B3,B3)=1,A2+1,A2) ซึ่งจะเป็นการนับจำนวนแถวและถ้าหากมีข้อมูลที่ซ้ำกันมันจะแสดงตัวเลขซ้ำออกมาให้ ดังภาพด้านล่าง แล้วเราก็ copy สูตร จากแถว A3 จนถึงแถวสุดท้ายของข้อมูลที่เรามี จะเห็นได้ว่ามีตัวเลขที่ซ้ำกันด้วย นั่นก็เพราะว่าแถวนั้นตรงช่อง B มีข้อมูลที่ซ้ำกัน มันจึงแสดงตัวเลขออกมา

C
-ช่อง C2  ให้เราใส่ค่าเริ่มต้น ในที่นี้เริ่มต้นด้วย แดง ก็ใส่ค่าเริ่มต้น แดง ในช่อง C2
-ช่อง C3  ให้ใส่สูตร =IFERROR(VLOOKUP(ROW()-1,$A$2:$B$20,2,FALSE),"") ลงไป และ copy ข้อมูลสูตรไปจนถึง ลำดับสุดท้าย ในที่นี้ก็จะมีแค่ถึงบรรทัด 20 ดังนั้น ตรงที่ทำตัวแดงไว้ เราต้องแก้ใขให้เท่ากับจำนวนบรรทัดของข้อมูลที่เราได้ใส่ลงไป เช่นถ้ามีข้อมูลเท่ากับ 500 บรรทัดเราก็ต้องเปลี่ยนเลข 20 เป็น 500 เพื่อจะได้ครอบคลุมเขตข้อมูลทั้งหมดที่เรามี และพอได้สูตรแล้วเราก็ Copy สูตรทั้งหมดใล่ลงไปตั้งแต่ C2 ถึง C20 หรือเท่ากับจำนวนข้อมูลทั้งหมดที่เรามี ก็เป็นอันเสร็จสิ้นการกรองข้อมูล

Download  ไฟล์ Excel ตัวอย่างได้ที่นี่  Excel Duplicate Formula

Credit ข้อมูลจาก : http://www.globaliconnect.com/excel/index.php?option=com_content&view=article&id=97%3Aremove-duplicates-or-create-a-list-of-unique-records-using-excel-formula&catid=77&Itemid=473