Tôi muốn biết liệu có ai đó có thể xuất dữ liệu từ DBGrid sang Excel không? Tôi đang sử dụng Delphi 7, Excel 2007 và ADO.
Mọi trợ giúp sẽ được đánh giá cao.Xuất dữ liệu từ DBGrid sang Excel
5
A
Trả lời
10
Nếu bạn muốn có một xuất nhanh dữ liệu thô, chỉ cần xuất recordset của bạn (ADODataset.recordset) với một cái gì đó như thế:
procedure ExportRecordsetToMSExcel(DestName: string; Data: _Recordset);
var
ovExcelApp: OleVariant;
ovExcelWorkbook: OleVariant;
ovWS: OleVariant;
ovRange: OleVariant;
begin
ovExcelApp := CreateOleObject('Excel.Application'); //If Excel isnt installed will raise an exception
try
ovExcelWorkbook := ovExcelApp.WorkBooks.Add;
ovWS := ovExcelWorkbook.Worksheets.Item[1]; // go to first worksheet
ovWS.Activate;
ovWS.Select;
ovRange := ovWS.Range['A1', 'A1']; //go to first cell
ovRange.Resize[Data.RecordCount, Data.Fields.Count];
ovRange.CopyFromRecordset(Data, Data.RecordCount, Data.Fields.Count); //this copy the entire recordset to the selected range in excel
ovWS.SaveAs(DestName, 1, '', '', False, False);
finally
ovExcelWorkbook.Close(SaveChanges := False);
ovWS := Unassigned;
ovExcelWorkbook := Unassigned;
ovExcelApp := Unassigned;
end;
end;
+0
Và nếu chúng ta muốn xuất một ClientDataset sang Excel thì chúng ta làm gì? – Amin
+0
Nếu bạn không có bản ghi, bạn phải lặp lại tập dữ liệu của mình và viết các ô accceling excel. ví dụ: ovWS.Cells [RowIndex, ColumnIndex] .Value: = Dataset.FieldByName ('foo'). AsString; –
Các vấn đề liên quan
- 1. Xuất dữ liệu ASP.Net sang Excel
- 2. Xuất dữ liệu không chuẩn hóa từ excel sang xml
- 3. Xuất từ PHP sang Excel
- 4. xuất dữ liệu từ excel sang cơ sở dữ liệu sqlite
- 5. Xuất dữ liệu truy vấn SQL sang Excel
- 6. Dữ liệu SilverlightGrid: Xuất sang excel hoặc csv
- 7. Xuất sang Excel từ một Repeater?
- 8. Xuất dữ liệu từ MATLAB sang csv
- 9. chuyển dữ liệu từ Excel sang SQL Server
- 10. Xuất SQL sang Excel
- 11. php + jqgrid + xuất sang excel
- 12. Sắp xếp dữ liệu đọc từ Excel sang Pandas DataFrame
- 13. Di chuyển dữ liệu từ Excel sang SQL Server bảng
- 14. Xuất dữ liệu vào pdf
- 15. Nhập dữ liệu từ Excel sang SQL Server không nhập được tất cả dữ liệu
- 16. Trích xuất dữ liệu với Excel
- 17. Xuất Bảng HTML sang Excel bằng ASP.NET
- 18. Xuất Javascript hoặc Flash sang CSV/Excel
- 19. Chuyển đổi từ cơ sở dữ liệu/Excel/CSV sang đồ đạc dữ liệu YAML?
- 20. Xuất sang XML từ trang dữ liệu động
- 21. C# (WinForms-App) xuất DataSet sang Excel
- 22. Xuất DataTable sang Excel File
- 23. Xuất sang Excel JSF và PrimeFaces
- 24. Làm cách nào để xuất dữ liệu sang Excel bằng LINQ to Entity?
- 25. Xuất sang Excel trong Asp.net MVC
- 26. Xuất Bảng HTML sang Excel từ ASP.NET MVC
- 27. Trang JSP không có mã HTML để xuất dữ liệu sang trang tính Excel
- 28. Xuất dữ liệu SQLite sang Excel trong iOS theo lập trình
- 29. Xuất tệp cơ sở dữ liệu sqlite sang XML và sau đó vào bảng tính Excel
- 30. Xuất từ SQL Server sang Excel với tiêu đề cột?
Đừng xuất DBGrid, xuất dữ liệu http://stackoverflow.com/a/16642049/1699210 chỉ cần điền arrData từ ví dụ đã cho với các giá trị trường. – bummi
Tôi cũng sẽ đưa ra tham chiếu mà Bummi đưa ra. Để sử dụng phương pháp tiếp cận mảng biến thể, bạn phải biết có bao nhiêu hàng bạn có trong truy vấn. Nếu không nó có thể đơn giản hơn để sử dụng phương pháp tiếp cận csv mà tôi đã đưa ra trong câu hỏi đó. –
@ No'amNewman tùy thuộc vào datataypes cách tiếp cận csv có thể gây ra nhiều rắc rối hơn trong hội tụ, ví dụ: Giá trị ngày giờ ... – bummi