Add-Ins cho Excel 2007 -2016 32bit và 64bit (2 người xem)

  • Thread starter Thread starter giaiphap
  • Ngày gửi Ngày gửi
Liên hệ QC

Người dùng đang xem chủ đề này

giaiphap

==(^o^)==
Tham gia
12/3/07
Bài viết
5,809
Được thích
6,367
Donate (Momo)
Donate
Giới tính
Nam
VnTools Excel là Add-Ins chạy trên nền Excel 2007, 2010, 2013 và 2016
Tương thích với Office 32 lẫn 64 bit

GD.png
GD2.png
Sau một thời gian sử dụng và góp ý của các thành viên tiện ích được nâng cấp lên phiên bản 3.0, phiên bản này sửa một số lỗi của phiên bản 2.0, bổ sung một số tính năng theo sự góp ý của các thành viên. Tiện ích vẫn mong nhận được sự đóng góp, chia sẻ của các thành viên.
Với những người làm công tác văn phòng thì ứng dụng này có thể hổ trợ cho các bạn một số công việc hữu dụng trong việc xử lý bảng tính Excel. Hiện tại tiện ích này chạy được trên Office 32 lẫn 64 bit từ 2007 đến 2016.
Tiện ích có 4 nhóm lệnh chính, mỗi nhóm có những chức năng riêng như sau:

I. Tiện ích về văn bản : Trong nhóm lệnh này chứa các lệnh xử lý chủ yếu là văn bản trên ô tính, gồm các lệnh sau:
Tách – Ghép họ và tên : Dùng để tách (1 cột ra thành 2 cột) hoặc ghép (nhiều cột thành một cột) văn bản.
Xóa hàng trống : Dùng để xóa nhanh những hàng (Nhiều ô liên tiếp theo chiều ngang) không có dữ liệu.
Tô màu xen kẻ : Dùng để tô màu xen kẻ giữa các hàng để dễ quan sát.
Xóa dấu văn bản : Dùng để xóa dấu văn bản (Phù hợp cho trường hợp dùng văn bản làm mã nhân viên).
Chuyển Font chữ : Dùng chức năng này để chuyển đổi qua lại giữa 3 bảng mã thường dùng (Unicode - Vni - TCVN3).
Chuyển sang Unicode: Dùng chức năng này để chuyển nhanh văn bản từ VNI hoặc TCVN3 sang Unicode.
Chuyển sang Vni: Dùng chức năng này để chuyển nhanh văn bản từ Unicode hoặc TCVN3 sang VNI.
Chuyển sang TCVN3: Dùng chức năng này để chuyển nhanh văn bản từ VNI hoặc Unicode sang TCVN3.
Chuyển đổi hoa thường : Dùng chức năng này để chuyển văn bản từ chữ hoa sang chữ thường và ngược lại.
Chuyển chữ hoa : Dùng chức năng này để chuyển văn bản sang chữ in hoa.
In hoa ký tự đầu của câu : Dùng chức năng này để chuyển văn bản sang chữ in hoa ký tự đầu của câu.
In hoa ký tự đầu của mỗi từ : Dùng chức năng này để chuyển văn bản sang chữ in hoa ký tự đầu của mỗi từ.
Chuyển chữ thường : Dùng chức năng này để chuyển văn bản sang chữ thường.
Sắp xếp Tiếng Việt : Dùng chức năng này sắp xếp tăng dần hoặc giảm dần họ và tên tiếng Việt.

II. Tiện ích về số - ô tính : Trong nhóm lệnh này chứa các lệnh chủ yếu về số trên ô tính, gồm các lệnh sau:
Ghép ô : Dùng chức năng này để ghép nhiều ô thành một ô, và dữ liệu được ghép từ các ô đã ghép.
Ẩn giá trị : Dùng chức năng này để tô màu chữ trùng với màu nền những ô thỏa mãn giá trị do người dùng chọn (Chỉ áp dụng cho ô là số).
Đọc số VND : Dùng chức năng này để chèn hàm đọc số tiếng Việt vào ô đang chọn.
Tô màu ô trùng nhau : Dùng chức năng này để tô màu những ô có giá trị trùng nhau.
Chèn ngày - tháng - năm : Dùng chức năng này để chèn nhanh định danh (Do người dùng tự đặt), ngày tháng năm vào ô đang chọn.
Định dạng nhanh : Dùng chức năng này định dạng nhanh ô đang chọn sang một số kiểu dữ liệu thường dùng.
Định dạng số: Dùng chức năng này để định dạng nhanh một số dạng số thường dùng.
Định dạng giờ : Dùng chức năng này để định dạng nhanh một số dạng giờ thường dùng.
Định dạng ngày : Dùng chức năng này để định dạng nhanh một số dạng ngày thường dùng.
Định dạng văn bản : Dùng chức năng này để định dạng nhanh ô đang chọn sang dạng văn bản.
Xóa định dạng : Dùng chức năng này để xóa nhanh định dạng (Trở về dạng Number mặc định của Excel) của ô đang chọn.
Thiết lập về số - ô tính : Dùng chức năng này để thiết lập một số thông số cho nhóm Tiện ích về số - ô tính.

III. Tiện ích về WorkBooks : Trong nhóm này chứa các lệnh chủ yếu về WorkBook và các Sheet. Gồm các lệnh sau:
Lưu và đóng : Dùng chức năng này để lưu trang tính đang chọn và đóng lại.
Lưu tất cả các bảng tính và đóng : Dùng chức năng này để lưu tất cả các trang tính đang mở và đóng tất cả lại.
Đóng tất cả các bảng tính và không lưu : Dùng chức năng này để đóng tất cả các trang tính đang mở và không lưu bảng tính nào cả.
Tự động lưu bảng tính : Dùng chức năng này để thiết lập thời gian tự động lưu trang tính đang làm việc.
WorkSheets : Dùng chức năng này để ẩn sheet đang làm việc (Ẩn ở đây là siêu ẩn, không nhìn thấy trong cửa sổ Unhide sheet).
Ẩn nhiều Sheet: Dùng chức năng này để ẩn nhiều sheet cùng lúc (Ẩn tất cả các sheet chỉ để lại sheet đang chọn).
Hiển thị tất cả các Sheet đã ẩn: Dùng chức năng này để hiện ẩn tất cả các sheet đã ẩn.
Tùy chọn hiển thị các Sheet ẩn: Dùng chức năng này để tùy chọn (Cho phép chọn các sheet ẩn) hiển thị sheet ẩn.
Xóa Sheet không sử dụng: Dùng chức năng này để xóa đi các sheet không sử dụng trong bảng tính.
Sắp xếp Sheet: Dùng chức năng này để sắp xếp tăng dần tên sheet trong bảng tính.
Khóa Sheet: Dùng chức năng này để khóa (Protect sheet) nhiều sheet cùng lúc trong bảng tính.
Mở khóa Sheet: Dùng chức năng này để mở khóa (UnProtect sheet) nhiều sheet cùng lúc trong bảng tính.
Tiện ích Names
Xóa Name bị lỗi #REF: Dùng chức năng này để xóa các Name bị lỗi #REF trong trang tính.
Xóa tất cả các Name: Dùng chức năng này để xóa tất cả các Name trong trang tính (Lưu ý là nó xóa luôn cả các name đang sử dụng).
Xóa Name bị ẩn: Dùng chức năng này để xóa các Name bị ẩn trong trang tính.
Quản lý các Name: Dùng chức năng này để xem các Name ẩn, lỗi,... trong trang tính.
Vùng chọn
Giới hạn (Hoặc bỏ giới hạn vùng chọn) : Dùng chức năng này giới hạn vùng hoạt động của các ô tính.
Tạo vùng cuộn (Set Scroll Area) : Dùng chức năng này để tạo một vùng cuộn (Chỉ được cuộn màn hình và xem vùng này) làm việc nhất định nào đó.
Xóa vùng cuộn (Delete Scroll Area) : Dùng chức năng này để xóa một vùng cuộn làm việc nhất định nào đó.
Bật/Tắt Grid Line : Dùng chức năng này để bật hoặc tắt Grid Line (Đường kẻ dọc và ngang khi chọn ô).
Bật (hoặc tắt) Grid Line : Dùng chức năng này để bật hoặc tắt Grid Line (Đường kẻ dọc và ngang khi chọn ô).
Cấu hình Grid Line : Dùng chức năng này để cấu hình màu, nét kẻ dọc và ngang khi chọn ô cho Grid Line.
Xóa lỗi công thức : Dùng chức năng này để xóa lỗi những ô có công thức bị lỗi.
Mini Options: Dùng chức năng này để thiết lập nhanh một số thiết lập thường dùng, bật hoặc tắt Menu Excel 2003.

IV. Tiện ích in dữ liệu : Trong nhóm lệnh này chứa các lệnh chủ yếu về̀ xem trang in, thiết lập trang in và in dữ liệu, gồm các lệnh sau:
In vùng chọn : Dùng chức năng này để in nhanh vùng dữ liệu đang chọn.
Xem trang in : Dùng chức năng này để xem trước trang in (Giống Print Preview của Excel 2003).
Thiết lập trang in: Dùng chức năng này để thiết lập một số thông tin về lề trang, trang đứng hay ngang,...
In trang tính: Dùng chức năng này để in nhanh trang tính đang làm việc.
Tùy chọn in ấn: Dùng chức năng này để chọn máy in và in trang tính.
In trang lẻ: Dùng chức năng này để in nhanh các trang lẻ.
In trang chẳn: Dùng chức năng này để in nhanh các trang chẳn.
In trang bất kỳ: Dùng chức năng này để in nhanh các trang bất kỳ.

Các bạn tải file cài đặt tiện ích tại đây (Cập nhật tháng 8 năm 2018): https://docs.google.com/uc?export=download&id=1g9S3Hj7WOKgV4wjkDY-jW6_uzGKJIhTP
Do tính bảo mật của google nên mình đặt Password giải nén cho file là GPE.
Các bạn nào không thích cài đặt thì tải file dưới đây về và đặt vào cùng thư mục bất kỳ sau đó đăng ký file VnTools-Excel.xlam với Excel và dùng.
File không cần cài đặt: https://docs.google.com/uc?export=download&id=1mSxeTYtA0qgPBS7gG_UsGT4CGhDk_YZc
 

File đính kèm

Lần chỉnh sửa cuối:
Qua học hỏi từ diễn đàn mình mò mẫm, thao khảo từ các thành viên và mới viết xong Add-Ins chạy trên Excel 2013 (2007 và 2010 chưa chạy thử không biết được không)
Hình ảnh của Add-Ins như sau:
View attachment 145111
Các bạn tải về tại địa chỉ sau
https://www.dropbox.com/s/7vo205qglajfepm/VnTool-Excel Setup.zip?dl=0
Cao thủ nào dùng thử và đóng góp, nhận xét để mình hoàn thiện sản phẩm.
Sẳn tiện có cách nào tạo Project Unviewable cho file xlam chỉ mình cách làm với, tìm mãi vẫn không thấy phần mềm nào tạo được như vậy, chỉ thấy có bản quyển không.
Cho mình xin pass VBA nhé
 
Qua học hỏi từ diễn đàn mình mò mẫm, thao khảo từ các thành viên và mới viết xong Add-Ins chạy trên Excel 2013 (2007 và 2010 chưa chạy thử không biết được không)
Hình ảnh của Add-Ins như sau:
View attachment 145111
Các bạn tải về tại địa chỉ sau
https://www.dropbox.com/s/7vo205qglajfepm/VnTool-Excel Setup.zip?dl=0
Cao thủ nào dùng thử và đóng góp, nhận xét để mình hoàn thiện sản phẩm.
Sẳn tiện có cách nào tạo Project Unviewable cho file xlam chỉ mình cách làm với, tìm mãi vẫn không thấy phần mềm nào tạo được như vậy, chỉ thấy có bản quyển không.
chỉ số trên và chỉ số dưới trong 2013 chạy không được thầy à.
 
Cụ thể như thế nào mới được chứ. Máy nhà vẫn chạy bình thường mà, có chọn đầy đủ các bước chưa.
 
Chọn đủ rồi ạ.................................................................
 
Bạn sử dụng phiên bản Excel mấy vậy. Mình đã thử máy bàn và laptop sử dụng excel 2013 vẫn chạy ngon lành, có khi nào bạn sử dụng bản 64 bit không nhỉ. Cụ thể là nó có báo lỗi gì không?
 
Qua học hỏi từ diễn đàn mình mò mẫm, thao khảo từ các thành viên và mới viết xong Add-Ins chạy trên Excel 2013 (2007 và 2010 chưa chạy thử không biết được không)
Hình ảnh của Add-Ins như sau:
View attachment 145111
Các bạn tải về tại địa chỉ sau
https://www.dropbox.com/s/t8xpn28l25njryk/VnTools-Excel%20Setup.zip?dl=0
Cao thủ nào dùng thử và đóng góp, nhận xét để mình hoàn thiện sản phẩm.
Sẳn tiện có cách nào tạo Project Unviewable cho file xlam chỉ mình cách làm với, tìm mãi vẫn không thấy phần mềm nào tạo được như vậy, chỉ thấy có bản quyển không.

The file you’re looking for has been moved or deleted.
 
còn mấy mục không chạy trên win 64 bit nha bác.
 
Qua học hỏi từ diễn đàn mình mò mẫm, thao khảo từ các thành viên và mới viết xong Add-Ins chạy trên Excel 2013 (2007 và 2010 chưa chạy thử không biết được không)
Hình ảnh của Add-Ins như sau:
View attachment 145111
Các bạn tải về tại địa chỉ sau
https://www.dropbox.com/s/t8xpn28l25njryk/VnTools-Excel%20Setup.zip?dl=0
Cao thủ nào dùng thử và đóng góp, nhận xét để mình hoàn thiện sản phẩm.
Sẳn tiện có cách nào tạo Project Unviewable cho file xlam chỉ mình cách làm với, tìm mãi vẫn không thấy phần mềm nào tạo được như vậy, chỉ thấy có bản quyển không.
Bạn cần unprotect cái nào thì mail file do cho mình sẽ giúp bạn
Mail: huuduy.duy@gmail.com
 
bác cho mình link tham khảo cách tạo cái menu Tiện ích việt đó được khong, mình tạo mà nó cứ nằm bên Add-ins không à
Trên diễn đàn đã có rồi bạn à:
http://www.giaiphapexcel.com/forum/...ng-dẫn-sử-dụng-Ribbon-trong-Excel-2007-(2010)
hoặc tham khảo http://stackoverflow.com/questions/8850836/how-to-add-a-custom-ribbon-tab-using-vba
Bạn cũng có thể lên Google tìm kiếm với tên add ribbon button
https://www.google.com.vn/#q=code+vba+add+ribbon
Bạn muốn gọn, nhẹ, đơn giản, không cần tìm hiều nhiều về lập trình ribbon thì tham khảo Add-Ins này. Chỉ cần thao tác kéo thả là xong:
http://www.andypope.info/vba/ribboneditor_2010.htm

Thấy hữu ích nhớ cảm ơn nhé!
 
Lần chỉnh sửa cuối:
em cài 2013 thì ok lắm nhưng excel 2007 thì bị lỗi "compile error in hidden module this workbook", có cách nào chạy được k anh
 
em cài 2013 thì ok lắm nhưng excel 2007 thì bị lỗi "compile error in hidden module this workbook", có cách nào chạy được k anh
Bạn thử nhấn phím Ctrl trong khi mở Excel xem có thông báo lỗi gì không? Nếu vẫn còn bạn thử xem cách này thế nào nhé.
http://answers.microsoft.com/en-us/...k/5da89258-34fa-4bcc-96bc-223787da6ada?auth=1
Hoặc
http://www.codedawn.com/index/-compile-error-in-hidden-module-message-in-excel
Máy mình không cài Office 2007 nên không thử được.
 
hẹn bạn 2 ngày nửa sẽ có bản chạy trên Excel 2007
em xin góp ý cho thầy để add ins của thầy đã hơn he. tại form Tô màu xen kẽ ấy. có thể cho người dùng tùy chọn cách kẻ không. ví dụ cho vào Format Cells/Border để tùy chỉnh cách kẻ viền. chứ chỉ cho kẻ viền nét đứt nét liền thì ít quá.
lỡ người dùng thích kẻ viền trên viền dưới nét _ . _ ._ còn viền 2 bên là nét đôi thì sao
 
Lần chỉnh sửa cuối:
em làm văn phòng cần mọi thứ trong add-ins, rất hữu ích ạ, cảm ơn đóng góp của thầy nhiều lắm!@$@!^%
 
khi nào thì có cho office 2007 vậy thầy, hóng quá -=.,,
 
em xin góp ý cho thầy để add ins của thầy đã hơn he. tại form Tô màu xen kẽ ấy. có thể cho người dùng tùy chọn cách kẻ không. ví dụ cho vào Format Cells/Border để tùy chỉnh cách kẻ viền. chứ chỉ cho kẻ viền nét đứt nét liền thì ít quá.
lỡ người dùng thích kẻ viền trên viền dưới nét _ . _ ._ còn viền 2 bên là nét đôi thì sao
Mấy hôm nay đi bệnh viện không rảnh để nâng cấp ứng dụng.
Cảm ơn bạn đã đóng góp, mình đã nâng cấp theo ý bạn rồi đây.
Đặc biệt trong phiên bản này còn có thêm thanh Menu Excel 2003 cổ điển đã được Excel từ 2007 khai tử.
https://www.mediafire.com/folder/jh5i997mgpgjn/Add-Ins_Excel
Mong nhận được sự đóng góp nhiều hơn từ các bạn.
 
Lần chỉnh sửa cuối:
Mấy hôm nay đi bệnh viện không rảnh để nâng cấp ứng dụng.
Cảm ơn bạn đã đóng góp, mình đã nâng cấp theo ý bạn rồi đây.
Đặc biệt trong phiên bản này còn có thêm thanh Menu Excel 2003 cổ điển đã được Excel từ 2007 khai tử.
Excel 2007: http://www.mediafire.com/download/kp1d77v4jy1fka0/VnTools-Excel+2007.zip
Excel 2013: http://www.mediafire.com/download/snma6q61o8asrpg/VnTools+Excel+2013.zip
Mong nhận được sự đóng góp nhiều hơn từ các bạn.
em xin đóng góp thêm
-định dạng nhanh:
+định dạng ngày: ngày….tháng….năm….. (cái này cần cho định dạng các biên bản văn phòng)
'-Ẩn hiện số 0:
như của thầy là chuyển số 0 thành dấu -
lỡ muốn ẩn số 0 như trong options thì sao
và cái này chỉ có thể ẩn chứ không hiện lại được thầy có thể làm thêm như là ấn vào lần 1 thì ẩn lần 2 thì hiện
 
Lần chỉnh sửa cuối:
Mấy hôm nay đi bệnh viện không rảnh để nâng cấp ứng dụng.
Cảm ơn bạn đã đóng góp, mình đã nâng cấp theo ý bạn rồi đây.
Đặc biệt trong phiên bản này còn có thêm thanh Menu Excel 2003 cổ điển đã được Excel từ 2007 khai tử.
Excel 2007: http://www.mediafire.com/download/kp1d77v4jy1fka0/VnTools-Excel+2007.zip
Excel 2013: http://www.mediafire.com/download/snma6q61o8asrpg/VnTools+Excel+2013.zip
Mong nhận được sự đóng góp nhiều hơn từ các bạn.
Tui thấy hàm Univba trên máy Tui nó cứ sai từ này: đã

Hàm của Bạn: đã = ChrW(273) & "ã"

Thì đúng ra nó vậy: đã= ChrW(273) & ChrW(227)

Hông biết tui nói vậy có trật ko .... nếu Trật quay lại hàm của Bạn ....Xong
[TABLE="width: 117"]
[TR]
[TD="width: 117"][/TD]
[/TR]
[/TABLE]
 
ở phần đọc số thành chữ có thể thay nghìn = ngàn, và bỏ dấu "," trước đơn vị đồng không thầy--=0
 
em xin đóng góp thêm
-định dạng nhanh:
+định dạng ngày: ngày….tháng….năm….. (cái này cần cho định dạng các biên bản văn phòng)
'-Ẩn hiện số 0:
như của thầy là chuyển số 0 thành dấu -
lỡ muốn ẩn số 0 như trong options thì sao
và cái này chỉ có thể ẩn chứ không hiện lại được thầy có thể làm thêm như là ấn vào lần 1 thì ẩn lần 2 thì hiện
Đã được sử đổi và thêm phần định dạng ngày ... tháng ... năm ... ở mục định dạng nhanh --> định dạng ngày --> định dạng: ngày 15 tháng 7 năm 2015.
Muốn Hiển thị trở lại số 0 thì vào phần định dạng nhanh và chọn xóa định dạng

Tui thấy hàm Univba trên máy Tui nó cứ sai từ này: đã

Hàm của Bạn: đã = ChrW(273) & "ã"

Thì đúng ra nó vậy: đã= ChrW(273) & ChrW(227)

Hông biết tui nói vậy có trật ko .... nếu Trật quay lại hàm của Bạn ....Xong
Đã được cập nhật lại cho đúng.
Thật ra hàm này mình cũng ít sử dụng, nhưng thấy bạn góp ý mình đã sửa lại ban xem có đúng không

ở phần đọc số thành chữ có thể thay nghìn = ngàn, và bỏ dấu "," trước đơn vị đồng không thầy--=0
Đã cập nhật lại ý bạn là muốn đọc nghìn hay ngàn tùy ý, còn dấu "," trước chữ đồng mình đâu thấy có đâu. Bạn đọc số mấy mà lại có dấu "," trước chữ đồng vậy.
Đường Link mới đã chỉnh sửa theo đóng góp của các bạn:
https://www.mediafire.com/folder/jh5i997mgpgjn/Add-Ins_Excel
 
Lần chỉnh sửa cuối:
Đã được sử đổi và thêm phần định dạng ngày ... tháng ... năm ... ở mục định dạng nhanh --> định dạng ngày --> định dạng: ngày 15 tháng 7 năm 2015.
Muốn Hiển thị trở lại số 0 thì vào phần định dạng nhanh và chọn xóa định dạng


Đã được cập nhật lại cho đúng.
Thật ra hàm này mình cũng ít sử dụng, nhưng thấy bạn góp ý mình đã sửa lại ban xem có đúng không


Đã cập nhật lại ý bạn là muốn đọc nghìn hay ngàn tùy ý, còn dấu "," trước chữ đồng mình đâu thấy có đâu. Bạn đọc số mấy mà lại có dấu "," trước chữ đồng vậy.
Đường Link mới đã chỉnh sửa theo đóng góp của các bạn:
Excel 2007: http://www.mediafire.com/download/o053oun6dqimudl/VnTools-Excel+2007.zip
Excel 2013: http://www.mediafire.com/download/2rbx0tg1rg9rfdj/VnTools+Excel+2013.zip
Úp File nhờ check dùm mà khóa tới khóa lui chám quá............ chào nha
 
như vầy nè thầy, không ảnh hưởng lắm nhưng e chỉ muốn góp ý vậy thôi ạ
Aws8VDt.jpg
 
định dang nhanh ngày tháng lỗi "nãm" thay vì "năm" ạ ^___^
bFKh6so.jpg
 
Lỗi trên Office 2013 - 64bit

Qua học hỏi từ diễn đàn mình mò mẫm, thao khảo từ các thành viên và mới viết xong Add-Ins chạy trên Excel 2013 (2007 và 2010 chưa chạy thử không biết được không)
Hình ảnh của Add-Ins như sau:
View attachment 145111
Các bạn tải về tại địa chỉ sau
https://www.dropbox.com/s/t8xpn28l25njryk/VnTools-Excel%20Setup.zip?dl=0
Cao thủ nào dùng thử và đóng góp, nhận xét để mình hoàn thiện sản phẩm.
Sẳn tiện có cách nào tạo Project Unviewable cho file xlam chỉ mình cách làm với, tìm mãi vẫn không thấy phần mềm nào tạo được như vậy, chỉ thấy có bản quyển không.

Mình cài và dùng thử trên bản Office 2013 - 64 bit nhưng không dung được, bị một số lỗi sau:
1) Lỗi khi tắt và mở Excel:
Loi khi tat mo.png
2) Lỗi khi chạy các tiện ích.
Loi khi tach gop ho ten.jpg
3) Phát sinh thêm 1 lỗi nữa
Loi moi.jpg
Mặc dù đã thiết lập như sau
Thiet lap an ninh.jpg
 
Mình cài và dùng thử trên bản Office 2013 - 64 bit nhưng không dung được, bị một số lỗi sau:
1) Lỗi khi tắt và mở Excel:
View attachment 145614
2) Lỗi khi chạy các tiện ích.
View attachment 145615
3) Phát sinh thêm 1 lỗi nữa
View attachment 145616
Mặc dù đã thiết lập như sau
View attachment 145617
Rồi lần này chắc thua rồi, máy mình sử dụng bản 32 bit không thử được.
Các cao thủ nào rành về sự khác biệt bản 32bit và 64bit chia sẽ với. Lúc đó mới điều chỉnh được.
 
Mình coi rồi trong đó một Mớ code copy GPE thôi......có một cái mình thích là cái Robin thôi......còn lại ngại coi lắm .........@#!^%@#!^%
Mình đã nói là học hỏi từ diễn đàn mà, công nhận bạn phá password cũng pro dữ he.
Vấn đề ở đây là mình không nhờ sửa code và chỉ nhờ check và phát hiện lỗi để mình sửa cho hoàn thiện thôi.
Còn một vấn đề bản 32bit và bản 64bit có gì khác biệt cao thủ nào biết nói là mình tự sửa chữa.
 
Mình đã nói là học hỏi từ diễn đàn mà, công nhận bạn phá password cũng pro dữ he.
Vấn đề ở đây là mình không nhờ sửa code và chỉ nhờ check và phát hiện lỗi để mình sửa cho hoàn thiện thôi.
Còn một vấn đề bản 32bit và bản 64bit có gì khác biệt cao thủ nào biết nói là mình tự sửa chữa.
tốt nhát cài 32bit, trước em cũng dùng 64bit mà giờ có mấy cái chỉ chạy trên 32bit nên phải cài lại 32bit. có gì thầy liên hệ Nguyễn Duy Tuân của bluesoft ấy. có vẻ thầy ấy rành về vụ này. em mới tập tành nên đành chịu.
 
em thấy ở phần đọc số anh cho tùy chọn thêm chữ "chẵn" vào phía sau cùng (giống tùy chọn nghìn với ngàn) thì hay hơn anh ạ, vì những file em hay làm người ta yêu cầu phải thêm chữ chẵn vào cuối. Ví dụ: 2 tỷ 2 thì sẽ đọc là: hai tỷ hai trăm triệu đồng chẵn
 
Sau ở máy tính nhà mình thì vẫn chạy đúng, đã sửa lại rồi bạn thử xem còn sai hay không.
Hàm đọc số cũng đã sửa xong, các bạn check tiếp và góp ý các phần khác nhé.
https://www.mediafire.com/folder/jh5i997mgpgjn/Add-Ins_Excel

quá đã bạn ơi, tới giờ thì chỉ cần bấy nhiêu đây thôi, để test thêm mấy phần khác rồi có gì thắc mắc sẽ góp ý để bạn hoàn thiện hơn,thanks bạn-=.,,
 
Lần chỉnh sửa cuối:
Mình cài và dùng thử trên bản Office 2013 - 64 bit nhưng không dung được, bị một số lỗi sau:
1) Lỗi khi tắt và mở Excel:
View attachment 145614
2) Lỗi khi chạy các tiện ích.
View attachment 145615
3) Phát sinh thêm 1 lỗi nữa
View attachment 145616
Mặc dù đã thiết lập như sau
View attachment 145617
Mình đã cập nhật lại bạn thử xem trên Excel 64bit còn lỗi nữa không? mình không có bản 64bit nên không thử được.
em thấy ở phần đọc số anh cho tùy chọn thêm chữ "chẵn" vào phía sau cùng (giống tùy chọn nghìn với ngàn) thì hay hơn anh ạ, vì những file em hay làm người ta yêu cầu phải thêm chữ chẵn vào cuối. Ví dụ: 2 tỷ 2 thì sẽ đọc là: hai tỷ hai trăm triệu đồng chẵn
Đã cập nhật thêm chữ chắn cho bạn.
https://www.mediafire.com/folder/jh5i997mgpgjn/Add-Ins_Excel
 
Em cũng làm chơi 1 cái chuyển mã như thầy. do mắt thẩm mỹ kém nên giao diện không hay bằng thầy.
thầy xem UseForm đọc số của em vậy đc chưa thầy. tổng quát hơn không. em làm mãi mà không thể làm phím dán giá trị như thầy được nó toàn xuất ra giá trị rỗng không à. thầy góp ý giúp em.
à thầy chỉ em cách nào lấy được list danh sách trong 1 sheet đưa lên thanh Robbin được không thầy. chỉ cần sửa trong sheet chứa list thì trên thanh robbin cũng cập nhật theo luôn. hoặc thầy có thể cho em face hay zalo gì không. em có mấy vấn đề thắc mắc về cái thanh Robbin này lắm.
 

File đính kèm

tổng quát hơn không. em làm mãi mà không thể làm phím dán giá trị như thầy được nó toàn xuất ra giá trị rỗng không à. thầy góp ý giúp em.
Hàm đọc số của bạn bị lỗi ngay biến "ll", nhưng không thông báo do bạn dùng lệnh On Error Resume Next ở thủ tục Private Sub OK_Click(). Bạn có thể check thử đọc số 0 ở hàng chục là linh thử xem.
Tôi đã thêm code dán giá trị vào (Kiểu Uni) bạn tự tham khảo nhé và sửa các kiểu khác.
thầy chỉ em cách nào lấy được list danh sách trong 1 sheet đưa lên thanh Robbin được không thầy. chỉ cần sửa trong sheet chứa list thì trên thanh robbin cũng cập nhật theo luôn.
Bạn có thể xem bài mẫu của Phan Tự Hướng để tham khảo mình gửi phía dưới.
hoặc thầy có thể cho em face hay zalo gì không. em có mấy vấn đề thắc mắc về cái thanh Robbin này lắm.
Nếu bạn có nhã hứng có thể liên hệ qua mail: sutv.c2tb.ph@haugiang.edu.vn. Hình như bạn ở Cần Thơ, có dịp uống cafe, tôi cũng thường đi Cần Thơ lắm.
https://www.mediafire.com/folder/yl744fyj620i9//Chia se
 
Phần mềm của chủ thớt không chạy được cho Ofice 2013 x64 hả bạn. Mình dùng cho Windows 10 x64 cài Office 2013 x64 toàn báo lỗi.
1_2829.png


2_591.png
 
Bây giờ Office 64bit cũng dần phổ biến lắm rồi! Mong tác giả hỗ trợ cho phiên bản mới này với! Thực sự có rất nhiều người cần đó ạ! Bác đã ngâm cứu xong cho bản 32bit rồi mong hãy bớt chút thời gian cho bản 64 bit cho những người như chúng em được xài cùng với ạ! - Dẫu biết để làm thì tác giả phải cài lại Win 64bit và Office 64bit, có chút mất thời gian, hi vọng tác giả sẽ khắc phục được!

Cảm ơn tác giả về phần mềm hữu ích này!
 
Bây giờ Office 64bit cũng dần phổ biến lắm rồi! Mong tác giả hỗ trợ cho phiên bản mới này với! Thực sự có rất nhiều người cần đó ạ! Bác đã ngâm cứu xong cho bản 32bit rồi mong hãy bớt chút thời gian cho bản 64 bit cho những người như chúng em được xài cùng với ạ! - Dẫu biết để làm thì tác giả phải cài lại Win 64bit và Office 64bit, có chút mất thời gian, hi vọng tác giả sẽ khắc phục được!

Cảm ơn tác giả về phần mềm hữu ích này!
Cảm ơn các bạn đã quan tâm, nhưng vấn đề ở đây không đơn giản như các bạn nghĩ đâu. Mình cũng đang tìm hiểu để lập trình trên Excel 64bit đây, nhưng sau những lệnh trên 64bit có gì đó khác so với 32bit. Mình cũng nhờ anh Nguyễn Duy Tuân chỉ giáo nhưng vẫn chưa tìm ra được giải pháp.
Để vài ngày nữa rảnh cài lại máy bản 64 bit thử xem có cải tiến được gì không.
 
Cảm ơn các bạn đã quan tâm, nhưng vấn đề ở đây không đơn giản như các bạn nghĩ đâu. Mình cũng đang tìm hiểu để lập trình trên Excel 64bit đây, nhưng sau những lệnh trên 64bit có gì đó khác so với 32bit. Mình cũng nhờ anh Nguyễn Duy Tuân chỉ giáo nhưng vẫn chưa tìm ra được giải pháp.
Để vài ngày nữa rảnh cài lại máy bản 64 bit thử xem có cải tiến được gì không.
bạn muốn cho addin chạy trên 2 hệ 64 bit và 32bit thì cần sửa như vầy . tôi ví dụ đại khái cho 2 hàm api . các chỗ khác bạn sửa tương tự
Mã:
#If Win64 Then
Private Declare PtrSafe Function GetActiveWindow Lib "user32" () As Long
Private Declare PtrSafe Function MessageBoxW Lib "user32" (ByVal HWnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long
#Else
Private Declare Function GetActiveWindow Lib "user32" () As Long
Private Declare Function MessageBoxW Lib "user32" (ByVal HWnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long
#End If

máy tôi là 64 bit nên phần trong else sẽ có màu đỏ nhưng không sao . chương trình vẫn chạy

An_oaoLZuHxMFLCkayjrbWGBZIfBtMXncih5qv2PqtyGZYsnOwtTgJuyTixff78Zk9sA2mIuVCeBMpfWWdVuKd8485JaFB1DO9q16O26RM-zFIddONJZjhABsGFYxBm5OIyjmJySeJPUKmEa0fzfIl6TQ-TOZL9FR9SzXktYY7TJWs5iTbvyAXByryQoSwlIEfbG29KYW5aRpwanPHfdoUFizkVVS6vFAAcHDEGbqsQWmukNjP6dp2C_wX15F2r7xhuHeIWcLuVO7_4xa6pSyjDt-bAz0IlW2agioqajF_QYK74nMYVFMkzUdVO8hLUkvkUcjaprqTiss2V7l7XPrAKW5IMinGJg1rqXMUM2AS29nQUOR7pMibeErpShQmTRDhICjFIPrN2xkJATnsEIxDxRDjMmFA2mez7TTErFl3U2HkNR3ADS1VEeA7OcMDoFbdaRpwsVUCnLWWs3-m9sayQ-9U97uqbZ-fpmxTdE8Tw16ZaIABj58Kvx1vEgORqCwmK94A=w1036-h372-no




riêng hàm DefWindowProcW thì sửa như vầy
Mã:
#If Win64 Then
Private Declare PtrSafe Function DefWindowProcW Lib "user32" (ByVal HWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As [COLOR=#ff0000][B]LongPtr[/B][/COLOR]) As Long
#Else
Private Declare Function DefWindowProcW Lib "user32" (ByVal HWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As LongPtr) As Long
#End If

vì hàm StrPtr(sUniText) trên máy 64bit trả về kiểu LongLong
ngoài hằng số Win64 ra thì còn có hằng số VBA7 nữa
VBA7 để check máy sử dụng office 2010 trở lên
office 2010 trở lên thì từ khóa Ptrsafe được dùng chung cho cả 2 hệ 32 bit và 64 bit
office 2007 trở xuống thì không có từ khóa Ptrsafe , LongPtr ,....
đại khái tôi sửa mấy chỗ đó thì máy 64bit như tôi chạy được . chưa dám nói là đã test hết 100% addin
bạn có thể sửa lại như trên xem có bị lỗi trên office 32 bit không nhé
 
bạn muốn cho addin chạy trên 2 hệ 64 bit và 32bit thì cần sửa như vầy . tôi ví dụ đại khái cho 2 hàm api . các chỗ khác bạn sửa tương tự
Mã:
#If Win64 Then
Private Declare PtrSafe Function GetActiveWindow Lib "user32" () As Long
Private Declare PtrSafe Function MessageBoxW Lib "user32" (ByVal HWnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long
#Else
Private Declare Function GetActiveWindow Lib "user32" () As Long
Private Declare Function MessageBoxW Lib "user32" (ByVal HWnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long
#End If

máy tôi là 64 bit nên phần trong else sẽ có màu đỏ nhưng không sao . chương trình vẫn chạy

An_oaoLZuHxMFLCkayjrbWGBZIfBtMXncih5qv2PqtyGZYsnOwtTgJuyTixff78Zk9sA2mIuVCeBMpfWWdVuKd8485JaFB1DO9q16O26RM-zFIddONJZjhABsGFYxBm5OIyjmJySeJPUKmEa0fzfIl6TQ-TOZL9FR9SzXktYY7TJWs5iTbvyAXByryQoSwlIEfbG29KYW5aRpwanPHfdoUFizkVVS6vFAAcHDEGbqsQWmukNjP6dp2C_wX15F2r7xhuHeIWcLuVO7_4xa6pSyjDt-bAz0IlW2agioqajF_QYK74nMYVFMkzUdVO8hLUkvkUcjaprqTiss2V7l7XPrAKW5IMinGJg1rqXMUM2AS29nQUOR7pMibeErpShQmTRDhICjFIPrN2xkJATnsEIxDxRDjMmFA2mez7TTErFl3U2HkNR3ADS1VEeA7OcMDoFbdaRpwsVUCnLWWs3-m9sayQ-9U97uqbZ-fpmxTdE8Tw16ZaIABj58Kvx1vEgORqCwmK94A=w1036-h372-no




riêng hàm DefWindowProcW thì sửa như vầy
Mã:
#If Win64 Then
Private Declare PtrSafe Function DefWindowProcW Lib "user32" (ByVal HWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As [COLOR=#ff0000][B]LongPtr[/B][/COLOR]) As Long
#Else
Private Declare Function DefWindowProcW Lib "user32" (ByVal HWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As LongPtr) As Long
#End If

vì hàm StrPtr(sUniText) trên máy 64bit trả về kiểu LongLong
ngoài hằng số Win64 ra thì còn có hằng số VBA7 nữa
VBA7 để check máy sử dụng office 2010 trở lên
office 2010 trở lên thì từ khóa Ptrsafe được dùng chung cho cả 2 hệ 32 bit và 64 bit
office 2007 trở xuống thì không có từ khóa Ptrsafe , LongPtr ,....
đại khái tôi sửa mấy chỗ đó thì máy 64bit như tôi chạy được . chưa dám nói là đã test hết 100% addin
bạn có thể sửa lại như trên xem có bị lỗi trên office 32 bit không nhé
Rất hay, mình sửa mãi vẫn không được.
 
ủa vậy là sao ? sửa như vậy là máy 32 bit điếc luôn à ?


Không vẫn chạy nhưng đoạn code này tìm mãi không ra. Để về xem lại, và cài Excel 64bit test thử mới được.
#If Win64 Then
Private Declare PtrSafe Function DefWindowProcW Lib "user32" (ByVal HWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As LongPtr) As Long
#Else
Private Declare Function DefWindowProcW Lib "user32" (ByVal HWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As LongPtr) As Long
#End If
 
Không vẫn chạy nhưng đoạn code này tìm mãi không ra. Để về xem lại, và cài Excel 64bit test thử mới được.
#If Win64 Then
Private Declare PtrSafe Function DefWindowProcW Lib "user32" (ByVal HWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As LongPtr) As Long
#Else
Private Declare Function DefWindowProcW Lib "user32" (ByVal HWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As LongPtr) As Long
#End If
Hôm nay mới xem được, cái này của bác hay quá
 
Bây giờ Office 64bit cũng dần phổ biến lắm rồi! Mong tác giả hỗ trợ cho phiên bản mới này với! Thực sự có rất nhiều người cần đó ạ! Bác đã ngâm cứu xong cho bản 32bit rồi mong hãy bớt chút thời gian cho bản 64 bit cho những người như chúng em được xài cùng với ạ! - Dẫu biết để làm thì tác giả phải cài lại Win 64bit và Office 64bit, có chút mất thời gian, hi vọng tác giả sẽ khắc phục được!

Cảm ơn tác giả về phần mềm hữu ích này!
Đã được cập nhật cho bản Excel 64Bit, bạn nào dùng Excel 64Bit dùng thử và cho nhận xét.
https://www.mediafire.com/folder/jh5i997mgpgjn/Add-Ins_Excel
 
ủa sao addin không còn bị tình trạng project unviewable nữa vậy bạn ? --=0--=0
 
ủa sao addin không còn bị tình trạng project unviewable nữa vậy bạn ? --=0--=0
nói làm chi vậy cha. để em còn vô tham khảo code này nọ nữa chứ. vụ project unviewable này căng quá. bản quyền cũng không pá nổi. )(&&@@-0-/. &&&%$R
em cũng tính làm y chang vậy mà không biết cách đây
còn 1 cái nữa. là có mấy add ins sau khi thêm vô mà không thấy gì cả. trong khi đó nó vẫn chạy tò tí te
 
nói làm chi vậy cha. để em còn vô tham khảo code này nọ nữa chứ. vụ project unviewable này căng quá. bản quyền cũng không pá nổi. )(&&@@-0-/. &&&%$R
em cũng tính làm y chang vậy mà không biết cách đây
còn 1 cái nữa. là có mấy add ins sau khi thêm vô mà không thấy gì cả. trong khi đó nó vẫn chạy tò tí te

bạn thích làm addin thì tự nghiên cứu mà học hỏi . sao phải lợi dụng lúc sơ ý của người khác . bản lĩnh để ở đâu ?
đặt password với project unviewable về cơ bản không có gì khác nhau . nhưng đây không phải nơi trao đổi về phá mật khẩu file excel
những addin không nhìn thấy code đơn giản vì addin đó không viết bằng ngôn ngữ VBA
trong các file addin của Nguyễn Duy Tuân cũng đã nêu rõ là addin được viết bằng Delphi
 
Đã test và chạy tốt trên Office 2013 bản 64 bit của em rồi ạ! Cảm ơn bác nhiều lắm!

Từ ngày lên Office 2013, khi cần dùng chức năng nào đó như Convert font, sắp xếp họ tên... em toàn phải cài sẵn 1 máy ảo, cần thì mở lên sửa ở đó, sau đó copy về máy thật làm. Giờ thì tiện quá rồi! Cảm ơn tác giả nhiều lắm.

Mấy nữa có Office 2016, hy vọng bác tiếp tục hỗ trợ cho phiên bản mới! Chúc bác luôn mạnh khỏe, công tác tốt, thành công trong cuộc sống, công việc!

Một lần nữa cảm ơn bác!
 
nói làm chi vậy cha. để em còn vô tham khảo code này nọ nữa chứ. vụ project unviewable này căng quá. bản quyền cũng không pá nổi. )(&&@@-0-/. &&&%$R
em cũng tính làm y chang vậy mà không biết cách đây
Tham khảo code này nọ trên diễn đàn đầy, còn mở Project người khác giống như mớ bồng bông xem mệt lắm.
Muốn tạo VBA project unviewable cũng dễ lắm, bạn tạo Topic đi sẽ có người trả lời ngay.
còn 1 cái nữa. là có mấy add ins sau khi thêm vô mà không thấy gì cả. trong khi đó nó vẫn chạy tò tí te
Theo mình biết thì tạo bằng VB6 dịch ra DLL và đăng ký thế là xong, nhưng trình độ của mình thì chịu
Cảm ơn bạn có nhã ý mời cafe, nhưng chắc chờ dịp khác, mình thì không thích xem đua xe.
 
Cám ơn tác giả đã update thêm bản cho Office 2013 x64 }}}}}
Hôm qua mình cài lại Office 2013 x86 để test, thấy hay quá định dùng luôn x86. Giờ lại có x64, quá đẹp.
Hy vọng bạn sẽ support cho các Office 2016.

Nhưng mình có một câu hỏi nhỏ là lúc mình convert font TCVN3 sang font Unicode thì những ký tự trắng của mình nó cũng bị mất đi luôn
Ví dụ của mình là
Mã:
     nội dung
thì convert sang font Unicode nó chỉ còn lại như thế này ( tức là bị mất đi ký tự khoảng trắng bạn ạ )
Mã:
nội dung
vnTools_Excel.jpg
 
Lần chỉnh sửa cuối:
Cám ơn tác giả đã update thêm bản cho Office 2013 x64 }}}}}
Hôm qua mình cài lại Office 2013 x86 để test, thấy hay quá định dùng luôn x86. Giờ lại có x64, quá đẹp.
Hy vọng bạn sẽ support cho các Office 2016.

Nhưng mình có một câu hỏi nhỏ là lúc mình convert font TCVN3 sang font Unicode thì những ký tự trắng của mình nó cũng bị mất đi luôn
Ví dụ của mình là
Mã:
     nội dung
thì convert sang font Unicode nó chỉ còn lại như thế này ( tức là bị mất đi ký tự khoảng trắng bạn ạ )
Mã:
nội dung
vnTools_Excel.jpg
Do trong khi chuyển đổi Font mình đã cắt đi những khoảng trắng không cần thiết rồi. Đó là suy nghĩ của mình thôi không biết nhu cầu người khác có giống không, mình thấy những khoảng trắng đưa vào chuỗi là không có ý nghĩa mà còn làm cho việc trang trí văn bản xấu đi.
Theo góp ý của bạn thì chắc có lẻ mình chuyển Font chữ phải giữ nguyên khoảng trắng, vậy phải tạo thêm tiện ích là xóa khoảng trắng thừa nửa để nhu cầu sử dụng sẽ phù hợp hợn.
 
Do trong khi chuyển đổi Font mình đã cắt đi những khoảng trắng không cần thiết rồi. Đó là suy nghĩ của mình thôi không biết nhu cầu người khác có giống không, mình thấy những khoảng trắng đưa vào chuỗi là không có ý nghĩa mà còn làm cho việc trang trí văn bản xấu đi.
Theo góp ý của bạn thì chắc có lẻ mình chuyển Font chữ phải giữ nguyên khoảng trắng, vậy phải tạo thêm tiện ích là xóa khoảng trắng thừa nửa để nhu cầu sử dụng sẽ phù hợp hợn.

À, bởi vì khi mình dùng Excel, các biến của mình có chứa ký tự khoảng trắng, nên khi convert từ font TCVN3 sang Unicode thì bị xóa mất ký tự khoảng trắng, làm cho sai lệch biến dẫn đến không thực hiện được công thức.
Nếu bạn code thêm tùy chọn lọc bỏ khoảng trắng riêng ra thì là tốt nhất, còn convert font thì cứ giữ nguyên lại ký tự là đẹp nhất.
Thank you
 
À, bởi vì khi mình dùng Excel, các biến của mình có chứa ký tự khoảng trắng, nên khi convert từ font TCVN3 sang Unicode thì bị xóa mất ký tự khoảng trắng, làm cho sai lệch biến dẫn đến không thực hiện được công thức.
Nếu bạn code thêm tùy chọn lọc bỏ khoảng trắng riêng ra thì là tốt nhất, còn convert font thì cứ giữ nguyên lại ký tự là đẹp nhất.
Thank you
đó chỉ là 1 phần nhỏ có nhu cầu như bác. chương trình của bác giaiphap là viết chung cho mọi người dùng. nếu bác muốn giữ lại khoảng trắng sau khi chuyển font có thể dùng cái này. phím tắt ctrl +Q để khởi động.
 

File đính kèm

Test addin excel 2013 x64 kết quả như sau :
Tình hình là mình test chức năng convert font TVCN3 sang Unicode bị những lỗi sau.
1. Khi convert bị xóa ký tự khoảng trống ( trước mình đã report rồi)
2. Convert ngày tháng bị lôi. Cụ thể ngày 12/08/2015 sau khi convert bị chuyển thành 08/12/08/2015 nhưng nếu là ngày 18/05/2015 thì vẫn giữa nguyên là ngày 18/05/2015. Việc bị loạn định dạng ngày tháng này khiên cho sai các công thức liên quan.

Mình gửi kèm cả file cho các bạn test ( file đính kèm hoặc tải tại link này : https://copy.com/ZBygIkyO3pmkHr8l )
 

File đính kèm

Test addin excel 2013 x64 kết quả như sau :
Tình hình là mình test chức năng convert font TVCN3 sang Unicode bị những lỗi sau.
1. Khi convert bị xóa ký tự khoảng trống ( trước mình đã report rồi)
2. Convert ngày tháng bị lôi. Cụ thể ngày 12/08/2015 sau khi convert bị chuyển thành 08/12/08/2015 nhưng nếu là ngày 18/05/2015 thì vẫn giữa nguyên là ngày 18/05/2015. Việc bị loạn định dạng ngày tháng này khiên cho sai các công thức liên quan.

Mình gửi kèm cả file cho các bạn test ( file đính kèm hoặc tải tại link này : https://copy.com/ZBygIkyO3pmkHr8l )
Trước hết cảm ơn bạn đã góp ý, đúng là sai thật. Để mình chỉnh sửa lại. Bạn đợi vài ngày nửa do lúc này bận quá.
 
Sửa lại phần đọc số thành chữ

Qua học hỏi từ diễn đàn mình mò mẫm, thao khảo từ các thành viên và mới viết xong Add-Ins chạy trên Excel 2007 và 2013.
Hình ảnh của Add-Ins như sau:
View attachment 145111
Đây là hình ảnh trên Excel 2007
View attachment 145728
View attachment 145729
Các bạn tải về tại địa chỉ sau
https://www.mediafire.com/folder/jh5i997mgpgjn/Add-Ins_Excel
Cao thủ nào dùng thử và đóng góp, nhận xét để mình hoàn thiện sản phẩm.
Trong phần đọc số thành chữ của phần mềm bạn có thể bỏ dấu phẩy ""," đi được không?
Ví dụ thế này mình thấy nó đọc như vậy là không đúng: 10.000.000 <=> "Mười triệu, đồng". Mình muốn nó phải thế này: "Mười triệu đồng". Mong bạn có thể sửa lỗi này cho phiên bản tiếp.
 
B tool vit khá hay, đy đ. Thy có th thêm công c highlighter vào b công c không, thy cái này cũng nhiu ngưi dùng, đ b công c hoàn chnh, đy đ hơn.
 
B tool vit khá hay, đy đ. Thy có th thêm công c highlighter vào b công c không, thy cái này cũng nhiu ngưi dùng, đ b công c hoàn chnh, đy đ hơn.
Công cụ highlighter là khi chọn một ô thì cột và dòng chứa ô đó sẽ đổi màu đúng không? Giả sử các ô trên dòng và cột đó có màu sẳn và khác nhau thì chọn ô khác, màu của nó có trở lại như cũ không? Trình độ của mình thì không làm được chuyện trả lại màu như lúc ban đầu. Bạn có cách nào hướng dẫn để mình hoàn thiện tiện ích. Tiện ích đang nâng cấp và thêm một số chức năng nên hơi lâu, mong các bạn thông cảm!
 
Test addin excel 2013 x64 kết quả như sau :
Tình hình là mình test chức năng convert font TVCN3 sang Unicode bị những lỗi sau.
1. Khi convert bị xóa ký tự khoảng trống ( trước mình đã report rồi)
2. Convert ngày tháng bị lôi. Cụ thể ngày 12/08/2015 sau khi convert bị chuyển thành 08/12/08/2015 nhưng nếu là ngày 18/05/2015 thì vẫn giữa nguyên là ngày 18/05/2015. Việc bị loạn định dạng ngày tháng này khiên cho sai các công thức liên quan.

Mình gửi kèm cả file cho các bạn test ( file đính kèm hoặc tải tại link này : https://copy.com/ZBygIkyO3pmkHr8l )
Đã khắc phục xong
Trong phần đọc số thành chữ của phần mềm bạn có thể bỏ dấu phẩy ""," đi được không?
Ví dụ thế này mình thấy nó đọc như vậy là không đúng: 10.000.000 <=> "Mười triệu, đồng". Mình muốn nó phải thế này: "Mười triệu đồng". Mong bạn có thể sửa lỗi này cho phiên bản tiếp.
Cũng giải quyết xong.
Các bạn vào tải bản cập nhật mới của Add-Ins, mình mới thêm một số chức năng về chuyển mã Unicode.
https://www.mediafire.com/folder/jh5i997mgpgjn/Add-Ins_Excel
 
Cảm ơn anh về bộ tool, anh cho em xin thêm chức năng:
Anh thêm chức năng X[SUP]2[/SUP], hoặc X[SUP]3[/SUP] (vidu m2 em bấm “ X[SUP]2[/SUP]”=m[SUP]2[/SUP]; m3 em bấm “ X[SUP]2[/SUP]”= m[SUP]3[/SUP]) thì hiện ra luôn không phải ra bảng thông báo,dùng chuột quét đối tượng mất thời gian.
Xin chân thành cảm ơn anh về bộ tool
 
Cảm ơn tác giả về phần mềm rất tiện ích, hỗ trợ tốt trên các bản Office mới nhất lẫn 64 bit! Đúng là tuyệt vời vì những addins cũ không còn dùng được cho Office mới nữa!

Mong tác giả điều chỉnh chức năng sắp xếp họ tên theo vùng chọn chứ không nên để theo cột như hiện giờ vì trong 1 cột B chẳng hạn chứa danh sách tổng thể toàn đơn vị, nhưng bộ phận 1 chiếm từ dòng 1-20, bộ phận 2 từ 21-50... Theo yêu cầu thực tế thì chỉ được sắp xếp họ tên theo bộ phận, không xếp theo cả đơn vị. Nếu xếp theo cột thì sẽ lộn xộn hết cả lên.

Em có đính kèm tiện tích sắp xếp như yêu cầu để tác giả tham khảo tích hợp vào Add ins của mình để người dùng bình thường như em không cần phải cài thêm Addins khác, chỉ cần vào Ribbon Tiện ích Việt là dùng được.

Hi vọng tác giả sẽ cập nhật phiên bản mới hỗ trợ linh hoạt hơn trong sử dụng!

Một lần nữa cảm ơn tác giả tiện ích tuyệt vời này!
 

File đính kèm

Lần chỉnh sửa cuối:
Cảm ơn tác giả về phần mềm rất tiện ích, hỗ trợ tốt trên các bản Office mới nhất lẫn 64 bit! Đúng là tuyệt vời vì những addins cũ không còn dùng được cho Office mới nữa!

Mong tác giả điều chỉnh chức năng sắp xếp họ tên theo vùng chọn chứ không nên để theo cột như hiện giờ vì trong 1 cột B chẳng hạn chứa danh sách tổng thể toàn đơn vị, nhưng bộ phận 1 chiếm từ dòng 1-20, bộ phận 2 từ 21-50... Theo yêu cầu thực tế thì chỉ được sắp xếp họ tên theo bộ phận, không xếp theo cả đơn vị. Nếu xếp theo cột thì sẽ lộn xộn hết cả lên.

Em có đính kèm tiện tích sắp xếp như yêu cầu để tác giả tham khảo tích hợp vào Add ins của mình để người dùng bình thường như em không cần phải cài thêm Addins khác, chỉ cần vào Ribbon Tiện ích Việt là dùng được.

Hi vọng tác giả sẽ cập nhật phiên bản mới hỗ trợ linh hoạt hơn trong sử dụng!

Một lần nữa cảm ơn tác giả tiện ích tuyệt vời này!
Sắp xếp theo vùng chọn mà bạn, bạn cứ chọn vùng cần sắp xếp (Ví dụ từ dòng 1 đến dòng 20, dòng 21 trở về sau không chọn), chọn cột sắp xếp và ra lệnh cho nó sắp xếp, thì vùng chọn sẽ bị tác động, còn vùng không chọn (Từ dòng 21 trở về sau) sẽ không bị tác động.
 
Vâng! Em đã làm được rồi ạ! Tại em thấy nó có sắp xếp theo cột nên hoảng quá không dám thử, Thanks tác giả nhiều!
 
Dùng trên office 2016 lỗi tùm lum.
 
Bản này của bạn final chưa thế?
 
Cho mình hỏi, máy mình bị lỗi khi khởi động nó cứ Loading cái addin Vntool hoài, khi gở addin bỏ thì khởi động bình thường.
Tình trạng này có thể do bản Office cài thiếu thư viện hay sao chứ mình cài nhiều máy đâu thấy bị vậy đâu. Bạn update lại bản Office thử xem có khắc phục được không.
Dùng trên office 2016 lỗi tùm lum.
Nó bị lỗi ở chổ nào vậy bác, máy mình dùng Office 2016 32bit chạy rất mượt mà. Trong quá trình sử dụng nếu có lỗi bác có thể cho mình biết lỗi ở lệnh nào (Chuyển font, xóa dòng, tự động lưu, ẩn sheet...) để mình khắc phục nhằm hoàn thiện tiện ích.
 
Ko biết khi nào 4rum mình có bài về office 2016 nhở.
 
Dùng trên office 2016 lỗi tùm lum.

Bạn này phán như đúng rồi ấy! Lỗi gì thì nói cụ thể hoặc chụp lấy cái hình minh họa.

Mình xài Office 2016 bản 64bit vẫn bình thường, dùng các chức năng như trên 2013, chẳng thấy bị gì cả. Nếu bạn vẫn bị thì thử cài lại Office xem sao, chưa thấy an phàn nàn không dùng được.

mình cũng muốn dùng, nhưng đợi khi nào office 2013 xảy ra lỗi thì cài luôn cho tiện ...
a01.gif
(hic, chiều nay mới chạy ra ngoài tiệm băng đĩa hỏi, họ vẫn chưa có bản này
a43.gif
)

Bạn có Internet thì lên mạng mà download về, cài vào chứ chờ mua đĩa làm gì cho lâu? Nếu xài 3g thì ra tiệm net gần chỗ ở, tốn 2k để kéo về, hàng nóng thì phải thử liền, để lâu nguội mất!
 
Chỉnh sửa lần cuối bởi điều hành viên:
góp ý thêm cho thầy giaiphap,
ở phần ẩn giá trị có thể thêm chức năng ẩn trong khoảng nào đó không.
ví dụ: >-2 <2 thì số -1,0,1 bị ẩn
tại mục ẩn sheet thì thấy chỉ có hiện thôi chứ chả thấy ẩn. thầy có thể bổ xung thêm
+Ẩn tất cả (chỉ chừa mỗi sheet hiện hành)
+Ẩn tùy chọn ( hiện ra bảng check để chọn các sheet cần ẩn- 2 tùy chọn là ẩn thường và siêu ẩn)
góp ý thêm
em gõ 1 vài ký tự ở các ô trong cột A
sau đó chọn nguyên cột A- chọn xóa hàng trống----> quay tít tù lù không ngưng (Not Responding-test trên 2016 32bit)
có thể máy em yếu nên bị vậy-mong thầy có thể test lại (em nghĩ là nó phải duyệt qua tất cả 1048576 ô luôn nên mới chậm vậy- có thể mặc định khi chọn như vậy thì nó sẽ lấy ô có giá trị cuối cùng không)
ở phần tách ghép họ tên (tại sao lại không phải là cắt xong rồi dán giá trị vừa cắt được vào ô bên cạnh mà lại phải chèn thêm cột nữa vậy thầy)
ở phần định dạng số: em thấy có một vài ngân hàng lại thích dùng kiểu này 1.123.456 chứ không phải dấu "," thầy ạ. (nếu có thể thì mong thầy bổ xung- không quan trọng thì có thể bỏ qua)
định dạng giờ: thầy có thể bổ cung thêm kiểu này được không? "1 giờ 2 phút"
nếu những góp ý không đâu của em có phần không thực tế thì thầy có thể bỏ qua không cần đọc (Ad có thể xóa bài)
 
Lần chỉnh sửa cuối:
góp ý thêm cho thầy giaiphap,
ở phần ẩn giá trị có thể thêm chức năng ẩn trong khoảng nào đó không.
ví dụ: >-2 <2 thì số -1,0,1 bị ẩn
tại mục ẩn sheet thì thấy chỉ có hiện thôi chứ chả thấy ẩn. thầy có thể bổ xung thêm
+Ẩn tất cả (chỉ chừa mỗi sheet hiện hành)
+Ẩn tùy chọn ( hiện ra bảng check để chọn các sheet cần ẩn- 2 tùy chọn là ẩn thường và siêu ẩn)
góp ý thêm
em gõ 1 vài ký tự ở các ô trong cột A
sau đó chọn nguyên cột A- chọn xóa hàng trống----> quay tít tù lù không ngưng (Not Responding-test trên 2016 32bit)
có thể máy em yếu nên bị vậy-mong thầy có thể test lại (em nghĩ là nó phải duyệt qua tất cả 1048576 ô luôn nên mới chậm vậy- có thể mặc định khi chọn như vậy thì nó sẽ lấy ô có giá trị cuối cùng không)
ở phần tách ghép họ tên (tại sao lại không phải là cắt xong rồi dán giá trị vừa cắt được vào ô bên cạnh mà lại phải chèn thêm cột nữa vậy thầy)
ở phần định dạng số: em thấy có một vài ngân hàng lại thích dùng kiểu này 1.123.456 chứ không phải dấu "," thầy ạ. (nếu có thể thì mong thầy bổ xung- không quan trọng thì có thể bỏ qua)
định dạng giờ: thầy có thể bổ cung thêm kiểu này được không? "1 giờ 2 phút"
nếu những góp ý không đâu của em có phần không thực tế thì thầy có thể bỏ qua không cần đọc (Ad có thể xóa bài)
Trước tiên thì cảm ơn những góp ý của bạn. Có những ý rất hay sẽ "ngâm cứu" lại và hoàn thiện trong phiên bản sau.
Tuy nhiên có một số góp ý bạn nói chưa chính xác cho lắm.
1. Có mục ẩn Sheet chứ sau lại không (Bạn có thể xem lại).
2. Ẩn thường thì có sẳn, mà mình nghĩ ai sử dụng excel cũng biết.
3. Định dạng số là dấu "," hay dấu "." là do định dạng của Windows (Mặc dù mình ghi dấu "," nhưng nếu windows định dạng là dấu "." thì nó sẽ chuyển sang dấu ".").
4. Tách ghép họ tên: Nếu ghép thì trong code không hề chèn cột còn nếu tách thì dĩ nhiên phải thêm cột chứ (1 tách ra làm 2 mà).
Còn những góp ý còn lại hữu ích, sẽ chỉnh sửa theo nhu cầu sử dụng của bạn.
Bản thân mình viết ra và sử dụng thì chẳng bao giờ thấy thiếu xót, người khác sử dụng mới thấy thiếu xót, thấy cái dở và góp ý thành thật cảm ơn, và mong nhận được nhiều sự đóng góp hơn từ các bạn.
 
Lần chỉnh sửa cuối:
Qua học hỏi từ diễn đàn mình mò mẫm, thao khảo từ các thành viên và mới viết xong Add-Ins chạy trên Excel 2007 đến 2013.
Hình ảnh của Add-Ins như sau:
View attachment 145111
Đây là hình ảnh trên Excel 2007
View attachment 145728
View attachment 145729
Các bạn tải về tại địa chỉ sau
https://www.mediafire.com/folder/jh5i997mgpgjn/Add-Ins_Excel
Cao thủ nào dùng thử và đóng góp, nhận xét để mình hoàn thiện sản phẩm.
Mình vừa nâng cấp lên và sửa một số lỗi các bạn góp ý.

Cảm ơn bác, rất hữu ích.
 
Mình vừa mới update Add-Ins theo góp ý của langtuchungtinh360 kèm theo khắc phục một số lỗi phát sinh trong quá trình sử dụng, mong được sự góp ý của các bạn.
 
Add in này là đuôi exe.
Chỗ mình lại ko cài được file exe. Bạn cho nó thành xla được không?
 
Add in này là đuôi exe.
Chỗ mình lại ko cài được file exe. Bạn cho nó thành xla được không?
Thì cài đặt bình thường đi xong vào đường dẫn của nó Copy lấy cái Add-ins đó ra nơi khác. xong gỡ bỏ hết đi thì có một cái Add-ins có đuôi là *.xla
 
Thì cài đặt bình thường đi xong vào đường dẫn của nó Copy lấy cái Add-ins đó ra nơi khác. xong gỡ bỏ hết đi thì có một cái Add-ins có đuôi là *.xla
Bác kieumanh đừng đùa nửa mà, đây là Add-ins cho Execl 2007, 2010, 2013, 2016 thì làm gì có đuôi xla, chỉ có file *.xlam thôi.
Đã được cập nhập mới, và thêm file *.xlam cho kbw1 sử dụng luôn nếu không cài được file *.exe
 
Bác kieumanh đừng đùa nửa mà, đây là Add-ins cho Execl 2007, 2010, 2013, 2016 thì làm gì có đuôi xla, chỉ có file *.xlam thôi.
Đã được cập nhập mới, và thêm file *.xlam cho kbw1 sử dụng luôn nếu không cài được file *.exe
vậy thì cài xong vào copy file *.xlam đó thôi .... tại mình vọc tới lui cái Add-ins của bạn để ngâm cứu code rồi mà........--=0
 
Cảm ơn các bạn đã quan tâm, nhưng vấn đề ở đây không đơn giản như các bạn nghĩ đâu. Mình cũng đang tìm hiểu để lập trình trên Excel 64bit đây, nhưng sau những lệnh trên 64bit có gì đó khác so với 32bit. Mình cũng nhờ anh Nguyễn Duy Tuân chỉ giáo nhưng vẫn chưa tìm ra được giải pháp.
Để vài ngày nữa rảnh cài lại máy bản 64 bit thử xem có cải tiến được gì không.

Uả, không biết bạn hỏi bao giờ? Nếu có chủ đề nào vướng mắc bạn inbox và gửi link thì mình mới biết vì nhiều lúc không đọc kỹ hết các bài viết trên diễn đàn.
 
Uả, không biết bạn hỏi bao giờ? Nếu có chủ đề nào vướng mắc bạn inbox và gửi link thì mình mới biết vì nhiều lúc không đọc kỹ hết các bài viết trên diễn đàn.
Cảm ơn anh rất nhiều, lần trườc em có hỏi anh và được anh trả lời rồi. Sau đó em mài mò và cũng tìm ra được giải pháp, bây giờ nó chạy được trên Office cả 32bit và 64bit luôn rồi ạ.
 
Em có 1 bảng tính cần phải xử lý 2 thông tin: Ngày tháng năm sinh, trình độ, yêu cầu là:
- Phân tích số liệu cán bộ theo độ tuổi (việc này dùng hàm Year để bóc năm sau đó lọc (Filter) rồi đếm bằng tay có bao nhiêu trường hợp là được nhưng như vậy thủ công quá), liệu tác giả có thể thêm chức năng lọc theo năm sinh, hoặc theo số liệu bất kỳ rồi báo tổng số được không ạ?

- Đếm xem có bao nhiêu người có trình độ Trên Đại học, Đại học, Cao đẳng, Trung cấp, Sơ cấp, Chưa qua đào tạo? (Cơ quan em có nhiều người học nhiều trường khác nhau như: ĐH Luật, ĐH KHXH, CĐ SP, TC Luật, TC Y tế...) em thường dùng hàm Left để cắt 2 chữ rồi lọc, rồi đếm bằng tay - trước giờ vẫn làm vậy

Cách làm trên thủ công ở chỗ phải chèn thêm 1 cột để bóc Năm sinh hoặc Trình độ ra sau đó mới lọc, rồi lại mất công đếm xem có bao nhiêu trường hợp thỏa mãn điều kiện nữa (vì nó sắp xếp rải rác, không liên tục, sau khi lọc số thứ tự không đúng nữa)

Ngoài ra còn lọc theo một số tiêu chí như Công việc đang làm, bộ phận công tác...

Nếu có thể mong thầy bổ sung thêm chức năng Lọc có báo cáo kết quả sau khi lọc, điều kiện lọc linh hoạt như mô tả để khỏi phải chèn thêm cột, tiện sử dụng

Em xin chân thành cảm ơn!
 
Em có 1 bảng tính cần phải xử lý 2 thông tin: Ngày tháng năm sinh, trình độ, yêu cầu là:
- Phân tích số liệu cán bộ theo độ tuổi (việc này dùng hàm Year để bóc năm sau đó lọc (Filter) rồi đếm bằng tay có bao nhiêu trường hợp là được nhưng như vậy thủ công quá), liệu tác giả có thể thêm chức năng lọc theo năm sinh, hoặc theo số liệu bất kỳ rồi báo tổng số được không ạ?

- Đếm xem có bao nhiêu người có trình độ Trên Đại học, Đại học, Cao đẳng, Trung cấp, Sơ cấp, Chưa qua đào tạo? (Cơ quan em có nhiều người học nhiều trường khác nhau như: ĐH Luật, ĐH KHXH, CĐ SP, TC Luật, TC Y tế...) em thường dùng hàm Left để cắt 2 chữ rồi lọc, rồi đếm bằng tay - trước giờ vẫn làm vậy

Cách làm trên thủ công ở chỗ phải chèn thêm 1 cột để bóc Năm sinh hoặc Trình độ ra sau đó mới lọc, rồi lại mất công đếm xem có bao nhiêu trường hợp thỏa mãn điều kiện nữa (vì nó sắp xếp rải rác, không liên tục, sau khi lọc số thứ tự không đúng nữa)

Ngoài ra còn lọc theo một số tiêu chí như Công việc đang làm, bộ phận công tác...

Nếu có thể mong thầy bổ sung thêm chức năng Lọc có báo cáo kết quả sau khi lọc, điều kiện lọc linh hoạt như mô tả để khỏi phải chèn thêm cột, tiện sử dụng

Em xin chân thành cảm ơn!
mình nghĩ vụ này bạn nên hỏi trong topic khác. chứ addins này phục vụ 1 cách tổng quát cho nhiều người. còn vấn đề của bạn chỉ phục vụ cho mỗi bạn thì mình thấy không liên quan gì đến addins này cả. vấn đề của bạn mình nghĩ chả khó khăn gì đâu. bạn cứ mở topic mới và hỏi kèm theo file thì mọi người sẽ nhiệt tình giúp đỡ thôi
 
mình nghĩ vụ này bạn nên hỏi trong topic khác. chứ addins này phục vụ 1 cách tổng quát cho nhiều người. còn vấn đề của bạn chỉ phục vụ cho mỗi bạn thì mình thấy không liên quan gì đến addins này cả. vấn đề của bạn mình nghĩ chả khó khăn gì đâu. bạn cứ mở topic mới và hỏi kèm theo file thì mọi người sẽ nhiệt tình giúp đỡ thôi

Ồ! Bạn hiểu sai ý của mình rồi! Thật ra mình không hỏi mà là mình đề xuất tính năng cho Addins, nói tổng quát nó là thế này: Thêm tính năng lọc dữ liệu dạng số, dạng text (phức tạp hơn thông thường là dữ liệu phi chuẩn) có thống kê được bao nhiêu dữ liệu thỏa điều kiện sau khi lọc xong!

Mình lấy ví dụ cho dễ hiểu thôi, bạn không để ý mỗi vấn đề mình đều đưa cách làm của mình là dùng hàm gì ah? (Year, Left), để thống kê thì dùng CountIf nữa là ra thôi.

Theo mình biết thì việc trích lọc dữ liệu, thống kê là việc làm thường xuyên của người làm việc với Excel, nhược điểm của phần mềm excel là không linh hoạt theo yêu cầu, tác giả đang phát triển addins mình có ý tưởng thì đóng góp, nếu tác giả thấy có ích thì đưa vào, không thì thôi.
 
Lần chỉnh sửa cuối:
Có anh chị nào tải tiện ích này về rồi thì gửi mail cho em cái. em vào tải nhưng link bị hỏng hết rồi ạ: mail em là: Buiconglinh172@gmail.com. Em cảm ơn ạ
 

Bài viết mới nhất

Back
Top Bottom