Mọi người chạy thử code với các office khác nhau

[NgoctrinhUSA]

Em đang thử nghiệm code VBA sau khi thay đổi một chút bên trong cấu trúc file excel mọi người chạy thử được không nhé.
-Code thì không có gì đặc biệt nhưng do cấu trúc file vbaproject.bin bị thay đổi nên em nghĩ sẽ có phiên bản office từ 2010 trở xuống không chạy được, vì em đang dùng office 2013 x86

 

[SA_DQ]

Mình xài 2010 & đúng là không chạy mở Form được

Có điều là bạn lấy file này ở đâu vậy, thấy rất quen nữa là đằng khác!

 

[NgoctrinhUSA]

Mình xài 2010 & đúng là không chạy mở Form được

Có điều là bạn lấy file này ở đâu vậy, thấy rất quen nữa là đằng khác!

Dạ file này e có nhờ diễn đàn giúp sẵn lấy làm ví dụ ạ

code lấy giá trị từ textbox tới cell cho từng nhân viên

Em có file gồm 8 nhân viên, em muốn 1 code khi nhập giá trị vào textbox tiền turn và tiền tip (1 trong 2 giá trị có thể trống) thì các giá trị sẽ ghi vào các cột tương ứng với nhân viên đó. em đã chỉnh sửa code của anh Tuân (mong tác giả cho phép) cho phù hợp với mục đích của mình là tạo tên...

www.giaiphapexcel.com

 

[ongke0711]

Office 2013 32bit mở form bị lỗi vba project nhé.

 

[giaiphap]

Em đang thử nghiệm code VBA sau khi thay đổi một chút bên trong cấu trúc file excel mọi người chạy thử được không nhé.
-Code thì không có gì đặc biệt nhưng do cấu trúc file vbaproject.bin bị thay đổi nên em nghĩ sẽ có phiên bản office từ 2010 trở xuống không chạy được, vì em đang dùng office 2013 x86

Excel 2013 mở lên báo lỗi thế này.

 

[NgoctrinhUSA]

Excel 2013 mở lên báo lỗi thế này.
View attachment 220258

Mọi người tìm lý do được không máy e vẫn hoạt động tốt

 

[giaiphap]

Mọi người tìm lý do được không máy e vẫn hoạt động tốt

Bạn nhờ người khác giúp mà khóa project rồi lấy gì giúp.

 

[ThangCuAnh]

Thế bạn đã chỉnh cái gì trong vbaProject.bin ?

 

[NgoctrinhUSA]

Thế bạn đã chỉnh cái gì trong vbaProject.bin ?

Tên Module và mã DBP,GC,CMG

 

[ThangCuAnh]

À, mà thôi

 

[NgoctrinhUSA]

Bạn nhờ người khác giúp mà khóa project rồi lấy gì giúp.

Không phải do Code bạn ah mà khoá chỉ là hình thức thôi

 

[batman1]

XP Home + Excel 2010 bit.

- Nhấn Mã Nhân Viên thì im re. Chắc chưa có code

- Nhấn Mở Form thì lỗi



Kiểm tra kỹ thì khi đặt breakpoint tại dòng như trong hình rồi mới nhấn Mở Form thì khi chạy tiếp sẽ có lỗi. Cũng hơi lạ là:
- dòng irow = .Range("B65536").End(xlUp).Row ai cũng dùng bình thường.
- khi nhấn Debug.print thì Excel bị đột quị.



- Nhấn Tổng hợp thì lỗi

 

[ongke0711]

Không phải do Code bạn ah mà khoá chỉ là hình thức thôi

Kinh thật.. học khoá code, mã hoá trước khi học code...hehe...
Tôi tới giờ còn chưa biết cách mã hoá code để người khác khỏi đọc đây. Mà code tôi cũng là mấy cái code tổng hợp, góp nhặt nên khỏi học khoá cho mất công. Sau này mình viết ra cái gì gọi là sở hữu trí tuệ ghê lắm sẽ khoá code lại.

 

[NgoctrinhUSA]

XP Home + Excel 2010 bit.

- Nhấn Mã Nhân Viên thì im re. Chắc chưa có code

- Nhấn Mở Form thì lỗi

View attachment 220284

Kiểm tra kỹ thì khi đặt breakpoint tại dòng như trong hình rồi mới nhấn Mở Form thì khi chạy tiếp sẽ có lỗi. Cũng hơi lạ là:
- dòng irow = .Range("B65536").End(xlUp).Row ai cũng dùng bình thường.
- khi nhấn Debug.print thì Excel bị đột quị.

View attachment 220290

- Nhấn Tổng hợp thì lỗi

View attachment 220286

Thật ra là có Code bác ah mà em làm ẩn đi rồi bác nhấn f2 trong cửa sổ vbe sẽ thấy

Bài đã được tự động gộp: 1/7/19

Kinh thật.. học khoá code, mã hoá trước khi học code...hehe...
Tôi tới giờ còn chưa biết cách mã hoá code để người khác khỏi đọc đây. Mà code tôi cũng là mấy cái code tổng hợp, góp nhặt nên khỏi học khoá cho mất công. Sau này mình viết ra cái gì gọi là sở hữu trí tuệ ghê lắm sẽ khoá code lại.

Dạ em chỉ tò mò thôi he

Bài đã được tự động gộp: 1/7/19

XP Home + Excel 2010 bit.

- Nhấn Mã Nhân Viên thì im re. Chắc chưa có code

- Nhấn Mở Form thì lỗi

View attachment 220284

Kiểm tra kỹ thì khi đặt breakpoint tại dòng như trong hình rồi mới nhấn Mở Form thì khi chạy tiếp sẽ có lỗi. Cũng hơi lạ là:
- dòng irow = .Range("B65536").End(xlUp).Row ai cũng dùng bình thường.
- khi nhấn Debug.print thì Excel bị đột quị.

View attachment 220290

- Nhấn Tổng hợp thì lỗi

View attachment 220286

Em cũng tò mò bác mở cái unview đó lâu không e hỏi thiệt

 

[batman1]

Em cũng tò mò bác mở cái unview đó lâu không e hỏi thiệt

Chắc mất vài giây:

Phải chuột trên tập tin XLSM -> Open with -> duyệt tới và chọn WinRAR -> duyệt tới thư mục xl -> kéo vbaProject.bin ra ngoài -> mở vbaProject.bin bằng Hex Editor -> menu Find -> Replace -> nhập vd. DPB vào find, DPx vào replace -> Replace All. Tương tự với GC -> Gx, CMG -> CMx -> đóng Hex Editor -> kéo vbaProject.bin vào lại trong WinRAR -> chọn ghi đè -> đóng WinRAR -> kích hoạt XLSM -> khi được hỏi thì nhấn 3 lần OK.