Tùy chọn
Thủ Thuật Access
-
Trang chủ
|
Viết bởi: subasatran 25-10-23, 04:30 PM Chuyên mục: Thủ thuật VBA - Bài trả lời (9) |
Em có sử dụng kết nối ADODB kết nối Excel và Access để import data từ excel vào access để xử lý dữ liệu.
Tuy nhiên, khi chạy code import thì bị gặp lỗi như sau :
Nếu tên Sheet của file Excel được đặt tên thì code chạy ổn(ví dụ như tên sheet là Data).
Mã PHP:
Set rs = CreateObject("ADODB.Recordset")
FilePath = CurrentProject.Path & "\" & FileName & ".xlsx"
SQL = "select * from [Data$A1:AA]"
Strconnect = ("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & FilePath _
& ";Extended Properties=""Excel 12.0 Xml;HDR=Yes;"";")
rs.Open SQL, Strconnect, 3, 1
Thì code import báo lỗi ở câu lệnh SQL.
Mã PHP:
Set rs = CreateObject("ADODB.Recordset")
FilePath = CurrentProject.Path & "\" & FileName & ".xlsx"
SQL = "select * from [Sheet1$A1:AA]"
Strconnect = ("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & FilePath _
& ";Extended Properties=""Excel 12.0 Xml;HDR=Yes;"";")
rs.Open SQL, Strconnect, 3, 1
a. nguyên nhân báo lỗi là do đâu vậy ?
b.Làm sao để khi tên sheet của file excel để nguyên mặc dịnh là Sheet1 thì code vẫn chạy được ạ ?do các file excel này được exporrt từ hệ thống và rất nhiều file nên không thể mở từng file để đặt tên sheet được
Rất cám ơn mọi người.
|
|
Viết bởi: btamsgn 18-10-23, 05:20 PM Chuyên mục: Forms - Bài trả lời (1) |
Mình muốn liệt kê ngày thiếu trong table1 trừ ngày thứ 2 không tính nhưng hàm bị lỗi chưa tìm ra.
ví dụ: từ ngày 01-Aug-2023 đến ngày 17-Oct-2023 theo bảng thiếu ngày: 12-Aug, 24-Aug,..
Nhưng nút lệnh tìm liệt kê sai.
Nhờ các bạn xem và sửa code giúp mình.
https://drive.google.com/file/d/1Mjsvvhz...sp=sharing
|
Viết bởi: dotrung 05-10-23, 03:06 PM Chuyên mục: Report - Bài trả lời (1) |
hình ảnh demo textbox trên report
![[Hình: jVAgQc]](https://upanh.tv/image/jVAgQc)
file trên web http://www.lebans.com/DownloadFiles/Clas...Direct.zip
|
|
Viết bởi: dotrung 01-10-23, 12:10 AM Chuyên mục: Report - Bài trả lời (2) |
![[Hình: Loi-report.jpg]](https://img.upanh.tv/2023/09/30/Loi-report.jpg)
Đây là file demo lỗi của dotrung :
https://www.mediafire.com/file/h1r3jjm90...accdb/file
|
|
Viết bởi: mrgior 29-09-23, 12:25 AM Chuyên mục: Forms - Bài trả lời (6) |
Trích dẫn:Private Sub DDen_Format(Cancel As Integer, FormatCount As Integer)
If Me.DDen = "ORD" Or Me.DDen = "MIA" Or Me.DDen = "LAX" Then
Me.DDen.ForeColor = RGB(255, 0, 0)
Else
Me.DDen.ForeColor = RGB(0, 0, 0)
End If
End Sub
Ae giúp mình với ạ
| Chủ đề Mới nhất |
| Quản Lý Phòng Khám Tư Nhâ... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: Le Duc-24-09-26, 12:03 AM- » Bài trả lời: 34- » Lượt xem: 8,344 |
| Tạo Form không có khung v... -Chuyên mục: Thư viện thủ thuật-Đăng bởi lần cuối: ongke0711-05-09-26, 10:12 PM- » Bài trả lời: 0- » Lượt xem: 146 |
| Tải hàng loạt hóa đơn PDF... -Chuyên mục: Thành viên giúp nhau-Đăng bởi lần cuối: dotrung-16-08-26, 10:29 PM- » Bài trả lời: 6- » Lượt xem: 160 |
| Quản lý kho bằng Accesss -Chuyên mục: Thảo Luận Access-Đăng bởi lần cuối: AKBui-09-08-26, 12:52 AM- » Bài trả lời: 77- » Lượt xem: 8,101 |
| Tra cứu Mã số thuế - phần... -Chuyên mục: Share Code-Đăng bởi lần cuối: ongke0711-03-07-26, 02:10 PM- » Bài trả lời: 0- » Lượt xem: 181 |
| Đồ cổ đây - một chút hoài... -Chuyên mục: Góc ảnh-Đăng bởi lần cuối: Noname-12-06-26, 09:21 AM- » Bài trả lời: 1- » Lượt xem: 659 |
| Tra cứu thông tin DN qua ... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: ongke0711-02-06-26, 11:36 PM- » Bài trả lời: 0- » Lượt xem: 185 |
| Homestay chill đà lat -Chuyên mục: Góc Blogger-Đăng bởi lần cuối: tt1212-01-06-26, 02:51 PM- » Bài trả lời: 0- » Lượt xem: 629 |
| Quản lý quầy thuốc nhỏ lẻ -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: ongke0711-09-05-26, 11:24 AM- » Bài trả lời: 4- » Lượt xem: 3,615 |
| TẠO THÔNG BÁO NHẮC NHỞ CÔ... -Chuyên mục: Tương tác Chương trình ngoài-Đăng bởi lần cuối: ongke0711-07-04-26, 10:46 AM- » Bài trả lời: 2- » Lượt xem: 285 |
| Diễn đàn Thống kê |
|
» Thành viên: 0 » Thành viên mới nhất: Không có ai » Các chủ đề diễn đàn: 0 » Các bài viết diễn: 0 Thống kê đầy đủ |