Page 1 of 1

หาวิธีแทรกคอลัมน์ตามเลขลำดับ

Posted: Tue Nov 05, 2013 2:21 pm
by Yamazato
รับกวนขอคำแนะนำในการแทรกคอลัมน์ ตัวอย่าง เช่น
มีชุดลำดับข้อมูล ตาม Row
1
2
4
6
7
สังเกตุว่า Row ที่ 3, 5 หายไป พอมีวิธีไหมครับ

Re: หาวิธีแทรกคอลัมน์ตามเลขลำดับ

Posted: Tue Nov 05, 2013 2:48 pm
by bank9597
Yamazato wrote:รับกวนขอคำแนะนำในการแทรกคอลัมน์ ตัวอย่าง เช่น
มีชุดลำดับข้อมูล ตาม Row
1
2
4
6
7
สังเกตุว่า Row ที่ 3, 5 หายไป พอมีวิธีไหมครับ
:D ไม่แน่ใจว่าใช้เป็น VBA หรือไม่ หากต้องใช้ VBA ต้องเขียนมาเองก่อนน่ะครับ

Re: หาวิธีแทรกคอลัมน์ตามเลขลำดับ

Posted: Tue Nov 05, 2013 2:54 pm
by Yamazato
:D ไม่แน่ใจว่าใช้เป็น VBA หรือไม่ หากต้องใช้ VBA ต้องเขียนมาเองก่อนน่ะครับ[/quote]



:flw: ไม่ได้ใช้ VBA ครับ ตอนนี้ผมนั่ง Insert row ทีละ row
เลยเข้ามาถามไอเดียที่ช่วยให้เร็วขึ้น

ขอบคุณครับ

Re: หาวิธีแทรกคอลัมน์ตามเลขลำดับ

Posted: Tue Nov 05, 2013 3:27 pm
by bank9597
Yamazato wrote::D ไม่แน่ใจว่าใช้เป็น VBA หรือไม่ หากต้องใช้ VBA ต้องเขียนมาเองก่อนน่ะครับ

:flw: ไม่ได้ใช้ VBA ครับ ตอนนี้ผมนั่ง Insert row ทีละ row
เลยเข้ามาถามไอเดียที่ช่วยให้เร็วขึ้น

ขอบคุณครับ
[/quote]

ลองดูก่อนครับ

ที่ A14 คีย์ =IF(COUNTIF($A$2:$A$7,IF(ROWS($A$14:A14)>MAX($A$2:$A$7),"",ROWS($A$14:A14)))=1,ROWS($A$14:A14),"") คัดลอกลงมา

Re: หาวิธีแทรกคอลัมน์ตามเลขลำดับ

Posted: Tue Nov 05, 2013 3:41 pm
by Yamazato
bank9597 wrote:
Yamazato wrote::D ไม่แน่ใจว่าใช้เป็น VBA หรือไม่ หากต้องใช้ VBA ต้องเขียนมาเองก่อนน่ะครับ

:flw: ไม่ได้ใช้ VBA ครับ ตอนนี้ผมนั่ง Insert row ทีละ row
เลยเข้ามาถามไอเดียที่ช่วยให้เร็วขึ้น

ขอบคุณครับ
ลองดูก่อนครับ

ที่ A14 คีย์ =IF(COUNTIF($A$2:$A$7,IF(ROWS($A$14:A14)>MAX($A$2:$A$7),"",ROWS($A$14:A14)))=1,ROWS($A$14:A14),"") คัดลอกลงมา[/quote]


:thup: ขอบคุณครับ ช่วยได้เยอะเลย
ซึ่งตอนนี้ผมใช้วิธีถึกอยู่ คือ
1. ใช้ vlookup หาเลขลำดับที่หายไป แล้วเอาเลขที่หายมาต่อท้าย
2.แล้วใช้ sort เอาครับ :?