Đánh giá chủ đề:
  • 9 Votes - 2.67 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Import Dữ Liệu Từ Excel Vào Access
#21
(13-01-11, 07:52 PM)Noname Đã viết: mục đích của active x control Microsoft Common Dialog Control để browse tới file thôi. Bạn có thể cài full office sẽ có . Hoặc thay thế bằng hàm gì ấy trong topic này:
http://thuthuataccess.com/forum/Thread-t...1-password

Mình cài full mà vẫn bị bạn ạ, link bạn gửi sai rồi nhé
Chữ ký của uronmapu Cảm ơn cả nhà

Để học Access không nên ngại đặt câu hỏi


Uron
Reply
Những người đã cảm ơn
#22
(02-07-12, 10:15 PM)uronmapu Đã viết:
(13-01-11, 07:52 PM)Noname Đã viết: mục đích của active x control Microsoft Common Dialog Control để browse tới file thôi. Bạn có thể cài full office sẽ có . Hoặc thay thế bằng hàm gì ấy trong topic này:
http://thuthuataccess.com/forum/Thread-t...1-password

Mình cài full mà vẫn bị bạn ạ, link bạn gửi sai rồi nhé

Nếu không có Common Dialog Control Dể browse file thì thay thế bằng cái này

Bước 1: Bạn tạo Nút Command Button sau đó dặt tên tuỳ ý (Browse)
Bước 2: Viết Lệnh cho nút này như sau:
dim fDialog as string
Set fDialog = Application.FileDialog(msoFileDialogFilePicker)
With fDialog
.Title = "Chọn Tập Tin"
.Filters.Clear
.Filters.Add "hình ảnh", "*.xls"
.Filters.Add "All Files", "*.*"
If .Show = True Then
For Each varFile In .SelectedItems
msgbox varFile
Next
Else
MsgBox "You clicked Cancel in the file dialog box."
End If
End With

Vậy đó nhé, thử xem

P/S : Chưa test với Acc 2007 trở lên


Nếu không thì lên mạng tim COMDLG32.OCX rồi copy cái này vào System32 và khởi động lại máy
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 uronmapu
#23
Mình dùng 2007,

Mình tìm trong C:\Windows\System32 thấy có comdlg32.ocx mà vẫn bị lỗi
Chữ ký của uronmapu Cảm ơn cả nhà

Để học Access không nên ngại đặt câu hỏi


Uron
Reply
Những người đã cảm ơn
#24
Anh Noname ơi ! cho em hỏi cái này chút ! Em có cái file excel tên là lsgd, giờ muốn viết cái chương trình import cái file đó vào access, sau đó chỉ lấy 2 cột trong file excel, cột thứ nhất là ngày gd, cột thứ 2 là số dư cuối.

Ngày gd : thì phải hiện đầy đủ từ 1 -> cuối tháng, mặc dù trong file excel có khi không bắt đầu từ ngày 1

Số dư cuối : nếu ko có phát sinh trong ngày ( giao dịch ) thì số dư cuối của ngày đó bằng số dư đầu của ngày sau !

Em đưa cho anh file excel và asscess bạn coi giúp mình nha, chân thành cảm ơn !

http://www.mediafire.com/?umpnncvz7use0p4
Chữ ký của taoladarkpro Xin chào, mình là taoladarkpro, Tham gia http://thuthuataccess.com/forum từ ngày 30-08 -12.
Reply
Những người đã cảm ơn
#25
(30-08-12, 11:58 AM)taoladarkpro Đã viết: Anh Noname ơi ! cho em hỏi cái này chút ! Em có cái file excel tên là lsgd, giờ muốn viết cái chương trình import cái file đó vào access, sau đó chỉ lấy 2 cột trong file excel, cột thứ nhất là ngày gd, cột thứ 2 là số dư cuối.

Ngày gd : thì phải hiện đầy đủ từ 1 -> cuối tháng, mặc dù trong file excel có khi không bắt đầu từ ngày 1

Số dư cuối : nếu ko có phát sinh trong ngày ( giao dịch ) thì số dư cuối của ngày đó bằng số dư đầu của ngày sau !

Em đưa cho anh file excel và asscess bạn coi giúp mình nha, chân thành cảm ơn !

http://www.mediafire.com/?umpnncvz7use0p4

Cái số dư cuối kỳ là cột nào?
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
#26
aftrbal : cái này là số dư cuối trong ngày
bftrbal : cái này là số dư đầu ngày
Chữ ký của taoladarkpro Xin chào, mình là taoladarkpro, Tham gia http://thuthuataccess.com/forum từ ngày 30-08 -12.
Reply
Những người đã cảm ơn
#27
Máy mình không có Microsoft Common Dialog Control mà chỉ có Common Dialog Class, chắc là cái này. Mà không hiểu sao mình không thêm vào form được , bị báo lỗi như sau dù mình đã cài đặt full cho access:
"The operation on the OLE object faied. The OLE sever may not to be registered. To register the OLE sever, reinstall it."
Mình thử thì cũng có một số chức năng khác bị báo lỗi như vậy. Không biết có cần cài đặt thêm cái gì không nhỉ? Mình đã dùng thử trên cả office 2003 và office 2010.

(05-07-12, 03:44 PM)Xuân Thanh Đã viết: Nếu không có Common Dialog Control Dể browse file thì thay thế bằng cái này

Bước 1: Bạn tạo Nút Command Button sau đó dặt tên tuỳ ý (Browse)
Bước 2: Viết Lệnh cho nút này như sau:
dim fDialog as string
Set fDialog = Application.FileDialog(msoFileDialogFilePicker)
With fDialog
.Title = "Chọn Tập Tin"
.Filters.Clear
.Filters.Add "hình ảnh", "*.xls"
.Filters.Add "All Files", "*.*"
If .Show = True Then
For Each varFile In .SelectedItems
msgbox varFile
Next
Else
MsgBox "You clicked Cancel in the file dialog box."
End If
End With

Vậy đó nhé, thử xem

P/S : Chưa test với Acc 2007 trở lên


Nếu không thì lên mạng tim COMDLG32.OCX rồi copy cái này vào System32 và khởi động lại máy

Mình dùng cách này của Xuân Thanh thì bị báo lỗi Object required tại dòng "Set fDialog = Application.FileDialog(msoFileDialogFilePicker)"
Chữ ký của tsingle
Điều chúng ta biết chỉ là một giọt nước
Điều chúng ta không biết mênh mông như đại dương
Reply
Những người đã cảm ơn
#28
(14-11-12, 09:47 PM)tsingle Đã viết: Máy mình không có Microsoft Common Dialog Control mà chỉ có Common Dialog Class, chắc là cái này. Mà không hiểu sao mình không thêm vào form được , bị báo lỗi như sau dù mình đã cài đặt full cho access:
"The operation on the OLE object faied. The OLE sever may not to be registered. To register the OLE sever, reinstall it."
Mình thử thì cũng có một số chức năng khác bị báo lỗi như vậy. Không biết có cần cài đặt thêm cái gì không nhỉ? Mình đã dùng thử trên cả office 2003 và office 2010.

(05-07-12, 03:44 PM)Xuân Thanh Đã viết: Nếu không có Common Dialog Control Dể browse file thì thay thế bằng cái này

Bước 1: Bạn tạo Nút Command Button sau đó dặt tên tuỳ ý (Browse)
Bước 2: Viết Lệnh cho nút này như sau:
dim fDialog as string
Set fDialog = Application.FileDialog(msoFileDialogFilePicker)
With fDialog
.Title = "Chọn Tập Tin"
.Filters.Clear
.Filters.Add "hình ảnh", "*.xls"
.Filters.Add "All Files", "*.*"
If .Show = True Then
For Each varFile In .SelectedItems
msgbox varFile
Next
Else
MsgBox "You clicked Cancel in the file dialog box."
End If
End With

Vậy đó nhé, thử xem

P/S : Chưa test với Acc 2007 trở lên


Nếu không thì lên mạng tim COMDLG32.OCX rồi copy cái này vào System32 và khởi động lại máy

Mình dùng cách này của Xuân Thanh thì bị báo lỗi Object required tại dòng "Set fDialog = Application.FileDialog(msoFileDialogFilePicker)"

Không ai trả lời cả mình vào help của Microsoft và tìm được câu trả lời , mình gửi địa chỉ cho ai mà bị như mình tham khảo: http://support.microsoft.com/kb/279508/en-us?fr=1
Khai báo biến như của Xuân Thanh phải là "Dim fDialog As Office.FileDialog" và bổ sung thêm "Microsoft Office xx.x Object Library" trong Tools ->References của phần viết code.
Chữ ký của tsingle
Điều chúng ta biết chỉ là một giọt nước
Điều chúng ta không biết mênh mông như đại dương
Reply
Những người đã cảm ơn trungn077
#29
access 2003 không có Microsoft Common Dialog Control mặc dù đã cài full? Mình tìm thấy có Common Dialog Class, nhưng khi tạo thì báo lỗi:
Mã:
The Operation on the OLE Object Failed
The OLE server may not be registered.
To register the OLE server, reinstall it.

Bác nào hướng dẫn giùm mình cách khắc phục nhé!
Thanks các bạn
Chữ ký của ndthanh29 Xin chào, mình là ndthanh29, Tham gia http://thuthuataccess.com/forum từ ngày 08-10 -12.
Reply
Những người đã cảm ơn
#30
Microsoft Excel 11.0 Object Libary
ACE biết cái mục này nằm ở đâu chỉ dùm mình?
Chữ ký của ttqt30 Xin chào, mình là ttqt30, Tham gia http://thuthuataccess.com/forum từ ngày 21-10 -14.
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,300 01-12-16, 06:49 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 182 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,790 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,855 07-10-16, 02:43 PM
Bài mới nhất: kieu manh
  Xuất từ Access ra excel mà không cần phải có file định sẵn trungminh 3 352 18-09-16, 02:33 AM
Bài mới nhất: maidinhdan

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ơ