maytinhvp01
Thành viên thường trực




- Tham gia
- 27/7/13
- Bài viết
- 390
- Được thích
- 179
Cho mình hỏi là: Mình đã làm theo hướng dẫn trên diễn đàn tạo file activex dll từ VB6 cho VBA excel đơn giản như sau nhưng khi chạy luôn báo lỗi xin chỉ dùm chỗ thiếu sót.
Từng bước mình làm như sau:
+ Mở VB6-->> form: new froject hiện lên chọn Activex DLL.
+ Tại cửa sổ quản lý project mình lần lượt đổi tên của froject1 và class1 mặc đình ban đầu thành PP và CC qua properties tại mục name của chúng.
+ viết code sau trong của sổ code của CC.
+ Lưu dự án vào forder có tên dll
+ vào menu file và chọn Make pp.dll "CHỖ NÀY PHÁT SINH THÔNG BÁO ảnh trong file đính kèm Ảnh_1"
+ lưu cùng forder dll
+ Mở excel 2007 và lưu với tên Dll.xlsm
+ Insert module trong VBA excel và vào tools chon references, chọn dường dẫn tới file pp.dll và tich chọn --->> OK
+ viết code:
nhưng khi chạy luôn báo lỗi " Ảnh chụp trong file đính kèm Ảnh_2"
Hơn nữa mình có download mấy ví dụ về nhưng không thể nào chạy được dù làm theo tất cả các hưỡng dẫn của các ban "đăng ký file dll cho window bằng cách vào run và đánh lệnh: Regsvr32 "dường dẫn tới file\pp.dll"
Rất mong anh em chỉ dùm chỗ thiếu sót!!!
Từng bước mình làm như sau:
+ Mở VB6-->> form: new froject hiện lên chọn Activex DLL.
+ Tại cửa sổ quản lý project mình lần lượt đổi tên của froject1 và class1 mặc đình ban đầu thành PP và CC qua properties tại mục name của chúng.
+ viết code sau trong của sổ code của CC.
Mã:
sub S1()
msgbox "xin_chao"
end sub
+ vào menu file và chọn Make pp.dll "CHỖ NÀY PHÁT SINH THÔNG BÁO ảnh trong file đính kèm Ảnh_1"
+ lưu cùng forder dll
+ Mở excel 2007 và lưu với tên Dll.xlsm
+ Insert module trong VBA excel và vào tools chon references, chọn dường dẫn tới file pp.dll và tich chọn --->> OK
+ viết code:
Mã:
Sub test()
Dim t As PP.CC
Set t = New PP.CC
t.S1
Set t = Nothing
End Sub
Hơn nữa mình có download mấy ví dụ về nhưng không thể nào chạy được dù làm theo tất cả các hưỡng dẫn của các ban "đăng ký file dll cho window bằng cách vào run và đánh lệnh: Regsvr32 "dường dẫn tới file\pp.dll"
Rất mong anh em chỉ dùm chỗ thiếu sót!!!