Đá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
  Cài đặt ODBC -nền tảng kết nối Access và nguồn dữ liệu khác Noname 33 19,325 01-12-16, 06:49 PM
Bài mới nhất: atula77
  [Help] OBDC Xin giúp atula77 10 290 01-12-16, 06:26 PM
Bài mới nhất: atula77
  Xây dựng Class Modules trong Access ( Cơ bản đến Nâng cao) maidinhdan 2 189 13-11-16, 05:32 PM
Bài mới nhất: cpucloi
  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 18 2,795 20-10-16, 11:51 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 3,862 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ơ