ยินดีต้อนรับคุณ, บุคคลทั่วไป กรุณา เข้าสู่ระบบ หรือ ลงทะเบียน

เข้าสู่ระบบด้วยชื่อผู้ใช้ รหัสผ่าน และระยะเวลาในเซสชั่น

ThaiSEOBoard.comพัฒนาเว็บไซต์Programming ▀ EXCEL 1 Column 15000 แถว ต้องการทำให้เป็น 100 column 150 แถว มีอะไรที่มันออโต้มั้ยครับ
หน้า: [1]   ลงล่าง
พิมพ์
ผู้เขียน หัวข้อ: ▀ EXCEL 1 Column 15000 แถว ต้องการทำให้เป็น 100 column 150 แถว มีอะไรที่มันออโต้มั้ยครับ  (อ่าน 1089 ครั้ง)
0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้
Lord of Dollars
ก๊วนเสียว
*

พลังน้ำใจ: 33
ออฟไลน์ ออฟไลน์

กระทู้: 464



ดูรายละเอียด
« เมื่อ: 25 พฤศจิกายน 2011, 16:11:15 »

EXCEL 1 Column 15000 แถว ต้องการทำให้เป็น 100 column 150 แถว มีอะไรที่มันออโต้ง่ายๆมั้ยครับ ไม่เน้นว่าต้องเรียงลำดับยังไง

เคยทำเป็น php แต่ลืมหมดแล้ว

ไอมาโครก็น่าจะทำได้

ทั้งสองอย่าง ถ้าจะทำเองต้องรื้อฟื้นความจำประมาณสามวัน  Lips Sealed  Lips Sealed Lips Sealed

มีใครแนะนำ tool ได้มั้ยครับ หรือใครหลับตาแล้วนึกโค๊ดออกเลยช่วยหน่อยนะครับ  wanwan008
บันทึกการเข้า
workshop
หัวหน้าแก๊งเสียว
*

พลังน้ำใจ: 68
ออฟไลน์ ออฟไลน์

กระทู้: 1,131



ดูรายละเอียด
« ตอบ #1 เมื่อ: 25 พฤศจิกายน 2011, 16:32:08 »

VBA ครับ ลองเขียนเองก่อนก็ได้
ว่างๆ เดี๋ยวเขียนให้
บันทึกการเข้า

torrentlive.net/signup.php?refer=workshop Refer เวปบิท (ยังเปิดรับอยู่)
workshop
หัวหน้าแก๊งเสียว
*

พลังน้ำใจ: 68
ออฟไลน์ ออฟไลน์

กระทู้: 1,131



ดูรายละเอียด
« ตอบ #2 เมื่อ: 25 พฤศจิกายน 2011, 18:01:34 »

โค๊ด:
Sub SortColumn()
Range("a1").Select
While Not IsEmpty(Selection.Value)
    For i = 1 To 100
        Cells(i, 3 + j).Value = Selection.Value
        Selection.Offset(1, 0).Select
    Next i
    j = j + 1
Wend
End Sub

ใส่คำสั่งนี้ใน module นะครับ โดยที่ข้อมูลที่ต้องการอยู่ใน column A ผมทำให้ไม่จำกัดว่ามีกี่แถว มันจะเรียงไปเรื่อยๆ
 wanwan020 wanwan020 wanwan020 wanwan020
บันทึกการเข้า

torrentlive.net/signup.php?refer=workshop Refer เวปบิท (ยังเปิดรับอยู่)
Lord of Dollars
ก๊วนเสียว
*

พลังน้ำใจ: 33
ออฟไลน์ ออฟไลน์

กระทู้: 464



ดูรายละเอียด
« ตอบ #3 เมื่อ: 26 พฤศจิกายน 2011, 12:26:42 »

ขอบคุณมากครับ  wanwan017  Cry Cry Cry
บันทึกการเข้า
หน้า: [1]   ขึ้นบน
พิมพ์