Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] Cần giúp đỡ code chuyển dữ liệu từ Excel vào access !
#1
Mình có bảng Excel có 9 cột và nhiều dòng. Tham khảo đoạn code trên trang diễn đàn access khi thực hiện báo lỗi dòng Conn.Execute sqlR. Mong các bạn giúp đỡ. Cám ơn !

Private Sub Command0_Click()
Dim i As Integer
Dim Conn As ADODB.Connection
Set Conn = CurrentProject.Connection
Dim WbC As Object
Set WbC = GetObject("D:\TaiLieu.xls")
Conn.Execute "Delete * from tblTaiLieu"
With WbC
With .Worksheets("Sheet1")
For i = 2 To 6 [/align]
sqlR = "Insert Into tblTaiLieu Values("
sqlR = sqlR & .Cells(i, 1) & ", "
sqlR = sqlR & .Cells(i, 2) & ", "
sqlR = sqlR & .Cells(i, 3) & ", "
sqlR = sqlR & "'" & 0 & "', "
sqlR = sqlR & .Cells(i, 5) & ", "
sqlR = sqlR & .Cells(i, 6) & ", "
sqlR = sqlR & .Cells(i, 7) & ", "
sqlR = sqlR & .Cells(i, 8) & ", "
sqlR = sqlR & .Cells(i, 9) & " )"
Conn.Execute sqlR
Next i
End With
End With
WbC.Close
Set WbC = Nothing
MsgBox "Done"

End Sub
Chữ ký của DoquangLam Hãy chia sẻ kinh nghiệm cùng mình trên ThuThuatAccess nhé! Chúc vui vẻ rose
Reply
Những người đã cảm ơn
#2
Bạn tham khảo tại đây http://thuthuataccess.com/forum/thread-5231.html
Thân mến
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Xây dựng Class Modules trong Access ( Cơ bản đến Nâng cao) maidinhdan 4 366 26-12-16, 10:17 PM
Bài mới nhất: maidinhdan
  [Help] Xuất dữ liệu access sang excel doandinhtam 11 423 20-12-16, 10:10 PM
Bài mới nhất: maidinhdan
  Cài đặt ODBC -nền tảng kết nối Access và nguồn dữ liệu khác Noname 43 19,735 01-12-16, 06:26 PM
Bài mới nhất: atula77
  Hướng Dẫn Demo tổng hợp xuất Table, Query sang Excel có điều kiện ở vị trí nào cũng được maidinhdan 17 2,993 20-10-16, 11:49 AM
Bài mới nhất: jeck09nt
  Ms Access VBA và Google drive, một vài ý tưởng trong chia sẻ và đồng bộ số liệu... paulsteigel 46 4,115 07-10-16, 02:43 PM
Bài mới nhất: kieu manh

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ