มีวิธี query excel เกิน 65536 rows หรือเปล่าครับ
Posted: Sun Jan 20, 2019 2:28 am
จากไฟล์ตัวอย่าง สมมติข้อมูลมีสัก 100000 บรรทัด (ผมใส่ไปแค่ 12 เพราะหากใส่ถึงแสนไฟล์จะใหญ่เกิน 500 kb)
และผม query ด้วยโค้ดดังข้างล่าง แต่มันลิมิตที่ไม่เกิน 65536 บรรทัด อยากรู้ว่ามีวิธี query จาก excel ไฟล์ตนเอง หรือ ไฟล์อื่น ให้ข้อมูลมากกว่า 65536 บรรทัดหรือเปล่าครับ
และผม query ด้วยโค้ดดังข้างล่าง แต่มันลิมิตที่ไม่เกิน 65536 บรรทัด อยากรู้ว่ามีวิธี query จาก excel ไฟล์ตนเอง หรือ ไฟล์อื่น ให้ข้อมูลมากกว่า 65536 บรรทัดหรือเปล่าครับ
Code: Select all
Sub SQL()
Sheet2.[2:1000000].ClearContents
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
strFile = ThisWorkbook.FullName '"D:\Excel Program\Test Excel\TestDatabaseTransaction - backup 700000 data.xlsx" '
strCon = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & strFile _
& ";Extended Properties=""Excel 12.0;HDR=Yes;IMEX=1"";"
Set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")
cn.Open strCon
strSQL = "SELECT Inv_num,BranchID,ProductID,QTY,Date FROM [SaleTrsc$A:E]"
rs.Open strSQL, cn
Sheet2.[A2].CopyFromRecordset rs
End Sub
ส่วนใหญ่ผมจะทำงานกับ Query ที่ซับซ้อน จำเป็นต้องมี Tool ช่วยในการสร้าง Query จึงเลือกสร้าง View ใน Database ก้อนใดก้อนหนึ่งใน SQL เพื่อ Join Table ต่าง ๆ จาก Database ต่าง ๆ ให้พร้อมใช้เสียก่อนที่จะสร้าง Connection ใน Excel ไป Query ข้อมูลจาก View นั้นมาใช้ ไม่ค่อยได้ใช้ Excel เป็น Database แบบที่ต้องใช้ Query ที่ต้องดึงมาจากหลายฐานข้อมูลหรือหลายไฟล์ครับ