Chia sẻ ControlForOffice - Bộ công cụ điều khiển Office/Excel

Nguyễn Duy Tuân

Nghị Hách
Thành viên danh dự
Tham gia ngày
13 Tháng sáu 2006
Bài viết
4,080
Được thích
9,529
Điểm
860
Nơi ở
Hà Nội
Cảm ơn anh Tuân đã trả lời em sớm:
Em đang dùng:
- Win7 32bit
- Office 2010 (2007 cài lại) 32bit
- Copy file ControlForOffice.ocx vào Folder Windows\System32\
- Chạy file Install để đăng ký bởi Regsvr32

Kết quả vẫn vậy. Em thật sự không hiểu! trên xách tay khi cài lại Office2007 thì chạy được, trên Máy bàn Win7 và Office 2010 không chạy được, cài lại Office2007 cũng không chạy được.

Máy tính của em cài ổ D:\ là ổ chứa win Không biết có đúng lỗi nằm ở đây không nữa. Có bác nào dùng
ControlForOffice trên Office2010 rồi xin hướng dẫn em chút.


Cảm ơn anh Tuân và cảm ơn mọi người.
Mình vừa download về chạy trên Windows Vista, Office 2010 32-bit Ok.
Taskpane.jpg
 

huuhien80

Thành viên chính thức
Tham gia ngày
30 Tháng mười hai 2008
Bài viết
54
Được thích
8
Điểm
0
Tuổi
33
Em cảm ơn anh đã rất nhiệt tình, chắc trường hợp của em nó cá biệt.

1. Win

1 Win.jpg

2. Office: (em vừa tải bản office khác về cài)

2 Office.jpg

3. Copy ControlForOffice

3 Control For Office.jpg

4. Error: Sau khi đã install và chạy file:

4 Error.jpg

5. Debug.

5 Debug.jpg

Em đã thử lại nhưng kết quả vẫn vậy, không biết vấn đề nằm ở đâu nữa anh Tuân ạ.

Không biết có ai gặp trường hợp như em không nữa.....



Edit: Em tải bản 2013 về cài xem thế nào.
 
Lần chỉnh sửa cuối:

huuhien80

Thành viên chính thức
Tham gia ngày
30 Tháng mười hai 2008
Bài viết
54
Được thích
8
Điểm
0
Tuổi
33
Em gửi mail rồi anh ạ! Anh xem giúp em với.
 

huuhien80

Thành viên chính thức
Tham gia ngày
30 Tháng mười hai 2008
Bài viết
54
Được thích
8
Điểm
0
Tuổi
33
Cảm ơn anh Tuân.

Chạy Install bằng Run as Administrator là giải quyết được vấn đề :)

Cảm ơn anh nhiều.
 

huuhien80

Thành viên chính thức
Tham gia ngày
30 Tháng mười hai 2008
Bài viết
54
Được thích
8
Điểm
0
Tuổi
33
Anh Tuân ơi! Cho em hỏi tham lam 1 tí.

Em thêm 1 Useform2 và đặt chế độ Auto_open chạy 2 Useform
Showform2.jpg

Em muốn thêm 1 Useform nằm ở Top nhưng khi chạy ra nó thế này, Em muốn giảm độ dày của Useform2.
Em biết là can thiệp độ dày của Useform nằm top hoặc Botton là thì phải chỉnh sửa trong file ControlForOffice.ocx. Anh có thể giúp em 1 lần nữa không ạ.

Cảm ơn anh nhiều!
 

huuhien80

Thành viên chính thức
Tham gia ngày
30 Tháng mười hai 2008
Bài viết
54
Được thích
8
Điểm
0
Tuổi
33
Private Sub UserForm_Initialize()
If TPs Is Nothing Then
Set TPs = New BSTaskPanes
End If
Set TP = TPs.Add("Ten TaskPane", Me)
TP.Visible = True
TP.DockPosition = msoBarTop
TP.Height = 60
End Sub

Chèn 2 dòng bôi đậm này vào là giải quyết được vấn đề của cái Top Task Pane.
Cảm ơn.

Thật tuyệt vời.... Cảm ơn bác Tuân Verry Much....
 
Lần chỉnh sửa cuối:

Nguyễn Duy Tuân

Nghị Hách
Thành viên danh dự
Tham gia ngày
13 Tháng sáu 2006
Bài viết
4,080
Được thích
9,529
Điểm
860
Nơi ở
Hà Nội
Private Sub UserForm_Initialize()
If TPs Is Nothing Then
Set TPs = New BSTaskPanes
End If
Set TP = TPs.Add("Ten TaskPane", Me)
TP.Visible = True
TP.DockPosition = msoBarTop
TP.Height = 60
End Sub

Chèn 2 dòng bôi đậm này vào là giải quyết được vấn đề của cái Top Task Pane.
Cảm ơn.

Thật tuyệt vời.... Cảm ơn bác Tuân Verry Much....
Phần mềm kế toán doanh nghiệp A-Excel dùng Taskpane như ControlForOffice đó. Phiên bản mở rộng của COntrolForOffice.ocx là BSAC.ocx - Bluesofts ActiveX Controls.

a-excel.jpg
 

huuhien80

Thành viên chính thức
Tham gia ngày
30 Tháng mười hai 2008
Bài viết
54
Được thích
8
Điểm
0
Tuổi
33
Vâng, Em cũng đang xây dựng file theo 2 Taskpane như vậy, Vì em không xây dựng được List như của anh nên em sẽ lấy Top Taskpane làm điều hướng điều khiển nhiều Left Taskpane, Mỗi Left Taskpane sẽ có 1 nhiệm vụ riêng.

Làm dạng List hay thật. Em sẽ khắc phục bằng
OptionButton.

Dù sao thì so với cách làm cũ của em như vậy cũng đã cải tiến hơn rất nhiều rồi :)

Sáng nay em kết hợp cái Top Taskpane với UniMenuInUserform cũng của bác nhưng chạy lỗi, Vì viết bằng ngôn ngữ khác nên em cũng không biết khắc phục thế nào.

Nếu như cái Top Taskpane mà bổ sung được UniMenuInUserform thì tuyệt vời bác Tuân ạ. Vừa gọn mà vừa đẹp.

Dù sao thì cũng cảm ơn bác nhiều! Bác thật nhiệt tình..
 

laucahl

Thành viên mới
Tham gia ngày
25 Tháng tư 2009
Bài viết
4
Được thích
0
Điểm
0
Tuổi
32
xin lỗi tác giả, quả thật tôi đã download file, làm theo hướng dẫn như kô được bác có thể hướng dẫn cụ thể cho em, hoặc làm 1 file excel nhỏ, chỉ hướng dẫn hiển thị tiếng việt trên msgbox được kô? trong file có quá nhiều code, kô biết cái nào là của cái nào, xin chân thành cám ơnack, bó tay các bác. hướng dẫn cũng không đến nơi đến chốn, chỉ quăng cho con cá, đi kiếm cái cần câu đuối luôn.Nếu bạn nào muốn hiển thị được msgbox tiếng việt unicode thì hãy làm như sau:1.copy file controlforoffice.ocx vào windows\system322.copy lại toàn bộ đoạn mã module CFO_API vào file các bạn cần làm3.Cái quan trọng tiếp theo là phải vào tool\reference chọn browse tìm đến file ControlForOffice.ocxLàm xong 3 bước trên là thoải mái unicode msgboxW không cần phải khai báo starthookmsgbox nữa khi open và close file.Nhưng không biết tại sao nhiều khi không hiện nội dung trong msgbox chỉ hiện mỗi cái button, bấm liên tục 7,8 lần thì lại hiện nội dung bình thường.Bó tay.comCám ơn TuanVNUNI đã cho ra tool hữu ích này.
Anh Tuân ơi, cho em hỏi, cái module CFO_API ở đâu vậy, em mới tiếp cận cái này nên chưa biết nó ở đâu, anh hay ai đó chỉ giúp với
 

Nguyễn Duy Tuân

Nghị Hách
Thành viên danh dự
Tham gia ngày
13 Tháng sáu 2006
Bài viết
4,080
Được thích
9,529
Điểm
860
Nơi ở
Hà Nội
Uh. Bạn mở file BSTaskPane. Vào VBA (ALT+F11) sẽ nhìn thấy module "CFC_API". Nhấp chuột phải trên đó rồi chọn "Export". Khi tạo file mơí bạn Import vào.
 

bivily

Thành viên hoạt động
Tham gia ngày
11 Tháng mười 2007
Bài viết
110
Được thích
26
Điểm
0
Anh Tuân ơi! Em chạy trên máy cài Win7 và ứng dụng cái TaskPanel thì:
- Với Office 2007 thì chạy tốt.
- Còn với Office 2013 thì khi chạy nó không thể thực hiện được thủ tục Form_Resize(), mình phải dùng chuột thay đổi kích thước TaskPanel thì nó mới chạy anh à! Phải khắc phục như thế nào hả anh?
 

Nguyễn Duy Tuân

Nghị Hách
Thành viên danh dự
Tham gia ngày
13 Tháng sáu 2006
Bài viết
4,080
Được thích
9,529
Điểm
860
Nơi ở
Hà Nội
Top