xin hỏi file.xla (bangdiem) này làm sau hiện lại sheet của bảng điểm?

[ongtrungducmx25]

mình addin (bangdiem) rồi sau đó muốn xem lại các sheet thì không được, mình làm mọi cách như: vào menu Format/sheet thì không hiện lại vào VBA chọn nút visible/-1-xlsheetvisible cũng không thấy hiện sheet ("Diemcu và Lopchua") làm sau file.xla có thể cộng vào sheet như thế nhỉ mong các bạn chỉ mình nhé! mình gởi file có hình trong đó nhé

 

[ptm0412]

Mình hiểu hình như bạn nhầm lẫn giữa add in và template thì phải
- Nếu bạn muốn mỗi khi bạn mở excel hoặc tạo 1 work book mới, bạn sử dụng được 1 số hàm tự tạo, hoặc thêm menu tự tạo thì đó là add in
- Nếu bạn muốn tạo 1 file mới với trình bày, định dạng giống 1 file có sẵn, thì đó là template. Thí dụ nếu bạn click phải vào 1 tên sheet bất kỳ, chọn insert, chọn spread sheet solution, chọn 1 trong các icon, đó là template

Vậy nếu ý bạn là ý 2, bạn hãy lưu lại dưới dạng template, bạn sẽ có 1 file có đuôi là .xlt

 

[ongtrungducmx25]

không phải đâu bạn minh muốn hỏi la file.xla sau có kèm theo cac sheet("Diemcu và Lopchua") thì làm như thế nào nhé

 

[voda]

Bạn mở cửa sổ code, vào Properties của ThisWorkbook chỉnh mục IsAddin = false. Mình gởi file đã chỉnh.

 

[ongtrungducmx25]

pác voda cho mình hỏi cái add-in mới này của em nó bị lỗi gì zậy có sửa được không
“Sub or funtion not define” va “this command well stop the debugger”
mỗi lần lưu lại thì mở ra thông báo lỗi nhé!
sau mình ẩn kiểu của pác voda thì các menu của em không làm việc được có rất nhiều lổi

 

[voda]

-file Sub or funtion not define.xla bị lỗi là do toàn bộ code trong MenuModule bị mất. Muốn sửa, bạn phải phục hồi code trong module này.
-File thongkeHs.xla không dùng được vì nó ở dạng file Addin. Muốn sử dụng nó, bạn vào Properties của ThisWorkbook chỉnh AddIn = false. Mình đã chỉnh lại cho bạn và dùng bình thường.

 

[ongtrungducmx25]

không có cách nào vào Properties của ThisWorkbook chỉnh AddIn = true. thì không dùng được sau nhỉ, vầy phải viết code bổ sung như thế nào cho file.xla đây mình thấy ở file bảng điểm.xla ở #1 thì nó khai báo để hiện các sheet, zậy thì khai báo như thế nào pác chỉ luôn cho em nhé

 

[ongtrungducmx25]

mình muốn thongkeHS của mình ẩn nhưng các menu của mình vẫn làm việc trên các sheet nhé (toan7a1,ly7a1,........)

 

[voda]

-Có nhiều cách làm cho sheet ẩn đi: Dùng chức năng Format/Sheet/Hide của Excel hoặc dùng code trong VBA.
-Trong trường hợp của bạn, theo mình bạn vào Tools/Options/View bỏ chọn mục sheet Tabs là được.

 

[ongtrungducmx25]

em biết cách này nhưng nếu chọn như zay thì nó không phải là file.xla nữa đâu còn làm như cách của pác "Properties của ThisWorkbook chỉnh AddIn = true" nói thì nó addin được nhưng đồi hỏi các sheet của em không mở được cho nên mình cần tìm giải pháp là khi mở thì code bị lỗi này là sau nhỉ

 Sub MoToan7a1()
Sheets("toan7a1").Select
End Sub

hình như bị lỗi "opject variable or with block variable not set" khi mở menu bảng điểm vì đã chỉnh "Properties của ThisWorkbook chỉnh AddIn = true" lỗi gì zậy

 

[voda]

Bạn gởi cho mình 2 file xla khác nhau. Mình nói về từng file một để tránh sự lẫn lộn:
-File bangdiem.xla:Khi bạn đã chỉnh AddIn = true, bạn không thể mở trực tiếp file này ra để sử dụng được mà phải AddIn nó vào trong Excel. Đó là lý do tại sao bạn mở menu bảng điểm thì bị báo lỗi "opject variable or with block variable not set".
-File thongkeHS.xla: File này có đuôi là xla nhưng nó chưa phải là file AddIn thực sự. Nếu bạn chỉnh AddIn = true, rồi AddIn vào trong Excel, khi bạn mở các sheet, bạn sẽ bị báo lỗi. Ví dụ như mở sheet toán7A1 thì sẽ bị báo lỗi ở dòng: sheets("toan7a1").select (như bạn mô tả ở trên).
Muốn khắc phục, bạn phải chỉnh sửa lại file này. Sheet trong file AddIn không phải là lớp cụ thể như: toan7a1, toán8a2...mà là một mẫu chung. Từ đó người dùng tạo ra các lớp cụ thể. Câu lệnh để hiển thị sheet là: Sheets("...").copy. Đó là những lý do gây lỗi mà bạn đã gặp

 

[ongtrungducmx25]

zay sửa lại như thế nào Sheets("...").copy pac chỉ rõ cho em với còn muốn trở thành add-in thật sự thì khắc phục menu nhập diểm của thongkeHS nó bị lỗi "opject variable or with block variable not set" bổ sung như thế nào nhỉ

 

[voda]

Bạn muốn chỉnh sửa file thongkeHS.xla thành file AddIn thật sự thì phải thay đổi lại cấu trúc của file đó:
-Chuyển các sheet lớp học như toan7a1, toán7a2...thành 1 mẫu chung.
-Sheet thống kê có thể giữ nguyên.
-Phần code trong các module phải làm gọn lại, bỏ bớt những chức năng không cần thiết sau đó bổ sung vào cho phù hợp...
Tóm lại nhiều việc phải làm chứ không chỉ là chuyện khai báo. Mình nghĩ bạn nên nghiên cứu và tự làm. Có thể dùng file bangdiem.xla để làm mẫu. Bạn mở phần code của file này, theo đó để làm. Bạn gặp khó khăn chỗ nào, cứ post câu hỏi lên. Nhiều người sẽ giúp bạn. Có điều câu hỏi phải thật cụ thể và rõ ràng. Tránh viết dài và chung chung.
Thân

 

[ongtrungducmx25]

cách tạo menu ở #1 là làm sau nhỉ ,pác vôda sau không giống như file của pác chỉ zay pác có thể cho em vi du cụ thể được không.

 

[voda]

Mình chưa hiểu lắm về câu hỏi. Bạn có thể nói rõ hơn được không? Gởi kèm file thì càng tốt.

 

[ongtrungducmx25]

file bangdiem ở bài 1 của em gởi lên thì không biết tạo menu như thế nào mà em mò tìm hoài không được,còn file thongkehs của em thì cách tạo menu thì em biết,nhưng không biết cách tạo menu của bangdiem đó ra sau ý em là thế pác voda có thể giải thích cho em được không! không có tạo Menusheet chỉ thấy có toolbar trong modul thôi

 

[voda]

File bangdiem.xla tạo menu bằng macro 4. Trong file có sheet Macro1 ẩn. Code của nó nằm trên sheet này. Bạn có thể tham khảo vấn đề tạo Menu bằng Macro sheet trên diễn đàn.

 

[ongtrungducmx25]

làm thế nào để gọi nó ra pác ơi,em muốn xem thử có được không pác nhé

 

[voda]

-Đầu tiên, bạn chỉnh Properties của ThisWorkbook chỉnh AddIn = false, tiếp theo vào format/sheet/unhide làm cho sheet Macro1 hiển thị. Unprotect sheet này, bạn sẽ thấy code.

 

[ongtrungducmx25]

sau em làm như pác chỉ thì chỉ thấy "lopchua và diemcu" thôi không thấy Macro1! pác ơi