Đưa tính năng dịch của Google vào Excel và Word! (1 người xem)

paulsteigel · 14/11/18

Từ nhu cầu của một vài bạn liên quan đến việc dịch tài liệu, tôi chuẩn bị một công cụ nhỏ và xin chia sẻ cho các bạn làm văn phòng, hy vọng nó sẽ giúp các bạn phải làm việc với Tiếng Anh đỡ vất vả khi copy/paste trên web với tính năng dịch của Google.
Công cụ này được viết cho Office 2007 trở lên. nếu các bạn có nhu cầu với Office 2003 thì có thể chuyển biên dịch lại 2 tập tin Normal.dotm và Tools.xla về Office 2003 nhé.
Cách cài đặt các bạn xem trên video dưới đây. Khi cần dịch, chọn vùng nhấn Ctrl+Shift+E (dịch Việt Anh) và Ctrl+Shiff+V (Anh việt)
Trên Word
MEDIA=youtube]aIX9exItbMs[/MEDIA]
Trên Excel

Cách cài đặt như sau:
1. Tải file đính kèm về, giải nén ra một thư mục ví dụ C:\Tools
2. Tắt hoàn toàn Word nhé
vào run (Winkey+R) gõ %userprofile%AppData\Roaming\Microsoft\Templates
để vào thư mục template của Word theo chỉ dẫn ở đây (sau đó thoát hoàn toàn word
https://www.experts-exchange.com/articles/29466/Finding-the-Office-Templates-Folder.html
Lưu lại bản Normal.dotm hiện tại của bạn bằng cách đổi tên thành Old_normal.dotm
3. Copy file Normal.dotm trong thư mục tools vừa tải về vào, ghi vào thư mục templates.
Khởi động word và bạn có thể bắt đầu dùng công cụ, lưu ý là phải để chế độ macro enable nhé!
4. Với excel thì bạn cài add in thông thường.
+ Khởi động excel, chọn file/options/addins
+ vào mục addins, chọn Go, Add, Browse và trỏ đến file Tools.xla.
Chúc các bạn vui vẻ
==============cập nhập mới==================
Hiện tại, công cụ này đã được cập nhập và có thể thiết lập để dịch Anh/Việt/Nhật.
Các nút chuyển sau khi thiết lập đã được đổi là
Ctrl+Shift+T = Dịch theo thiết lập của người dùng từ ngôn ngữ A->B
Ctrl+Shift+R = dịch ngược lại từ B sang A và
Ctrl+Shft+B = Bật hộp thoại thiết lập ngôn ngữ dịch

saobekhonglac · 14/11/18

paulsteigel đã viết:
Từ nhu cầu của một vài bạn liên quan đến việc dịch tài liệu, tôi chuẩn bị một công cụ nhỏ và xin chia sẻ cho các bạn làm văn phòng, hy vọng nó sẽ giúp các bạn phải làm việc với Tiếng Anh đỡ vất vả khi copy/paste trên web với tính năng dịch của Google.
Công cụ này được viết cho Office 2007 trở lên. nếu các bạn có nhu cầu với Office 2003 thì có thể chuyển biên dịch lại 2 tập tin Normal.dotm và Tools.xla về Office 2003 nhé.
Cách cài đặt các bạn xem trên video dưới đây. Khi cần dịch, chọn vùng nhấn Ctrl+Shift+E (dịch Việt Anh) và Ctrl+Shiff+V (Anh việt)
Trên Word
MEDIA=youtube]aIX9exItbMs[/MEDIA]
Trên Excel

Cái này có lâu rồi mà, mình cũng có 1 file tải trên GPE

paulsteigel · 14/11/18

saobekhonglac đã viết:
Cái này có lâu rồi mà, mình cũng có 1 file tải trên GPE

Cảm ơn bạn - mình tìm không ra nên quyết định chia sẻ một tool nhỏ thôi! Nếu có rồi thì nó là môt sự bổ sung thôi!
Trong công cụ này mình có đưa ra một tiếp cận mới trong lập trình kết nối web tận dụng được tính năng đa luồng của ứng dụng để không gây treo máy kết hợp với Winhttp, XmlHttp mà không dùng đến Internetbrowser khá nặng.
Toàn bộ ứng dụng được viết trong một Class và class này có khả năng bắt sự kiện khi nhận được trả lời từ máy chủ google. nên khi chọn nhiều cell/ range nhiều paragraphs, công cụ sẽ tạo nhiều phiên làm việc đồng thời với nhiều Cell và đoạn văn và trả về kết quả liên tục khi có phản hồi.
Nó khắc phục được vài nhược điểm của một số công cụ đã có khác.
Tất nhiên từ office 2013 giở lên thì chúng ta không cần làm việc này nữa! Office đã có hẳn công cụ này nhúng trong các ứng dụng rồi!
Chúc các coder vui vẻ!

befaint · 14/11/18

Đọc từ trên xuống dưới thấy mỗi khúc này vui vẻ!!!

Sau khi anh Mai cồ 'đẻ' Office 2019 thì hôm nay 'đẻ' thêm Office 2006..!

paulsteigel · 14/11/18

befaint đã viết:
Đọc từ trên xuống dưới thấy mỗi khúc này vui vẻ!!!

Sau khi anh Mai cồ 'đẻ' Office 2019 thì hôm nay 'đẻ' thêm Office 2006..!

View attachment 207645

Cảm ơn bạn đã nhắc! Mình đã sửa để tuân thủ quy định!
Chúc bạn vui vẻ!

lamvu211 · 14/11/18

Cảm ơn anh ^^. Hy vọng anh có thể thêm tính năng "undo" nữa thì sẽ tốt hơn.

paulsteigel · 14/11/18

lamvu211 đã viết:
Cảm ơn anh ^^. Hy vọng anh có thể thêm tính năng "undo" nữa thì sẽ tốt hơn.

Bạn hoàn toàn có thể undo sau khi dịch xong mà, nếu văn bản dài, bạn sẽ không thấy nó undo chỗ nào vì các paragraph được dịch liên tục và không theo thứ tự nào cả, tùy theo tốc độ trả lời của Google.
Theo dõi dễ nhất là chọn một câu hoàn chỉnh trong một đoạn văn và dịch, xong bấm Ctrl+Z sẽ thấy tác dụng.
Trong Excel thì mình sẽ ngâm cứu và sớm update
Có gì bạn cứ hỏi nhé

hoangtuaotrang_hp_vn · 15/11/18

paulsteigel đã viết:
Bạn hoàn toàn có thể undo sau khi dịch xong mà, nếu văn bản dài, bạn sẽ không thấy nó undo chỗ nào vì các paragraph được dịch liên tục và không theo thứ tự nào cả, tùy theo tốc độ trả lời của Google.
Theo dõi dễ nhất là chọn một câu hoàn chỉnh trong một đoạn văn và dịch, xong bấm Ctrl+Z sẽ thấy tác dụng.
Trong Excel thì mình sẽ ngâm cứu và sớm update
Có gì bạn cứ hỏi nhé

chấm bài để hóng update của bác ạ, hihi

paulsteigel · 16/11/18

hoangtuaotrang_hp_vn đã viết:
chấm bài để hóng update của bác ạ, hihi

Mình tranh thủ chèn tính năng Undo vào Addin trong excel (lười nên copy code tại trang www.jkp-ads.com)
Các bạn quan tâm test giúp và góp ý thêm giùm!

lamvu211 · 16/11/18

paulsteigel đã viết:
Mình tranh thủ chèn tính năng Undo vào Addin trong excel (lười nên copy code tại trang www.jkp-ads.com)
Các bạn quan tâm test giúp và góp ý thêm giùm!

Em vừa test, kết quả thế này:
1. Nếu sau khi dịch xong, undo sẽ trả về giá trị trước đó, nhưng chỉ undo được 1 lần.
2. Vấn đề gặp phải: Nếu mình có sửa file hay làm gì trước đó, sau đó dùng tổ hợp phím để dịch, undo sẽ chỉ hoạt động 1 lần trả về giá trị trước khi dịch, còn đối với những thay đổi trước đó nữa sẽ không thể undo tiếp được.

paulsteigel · 16/11/18

lamvu211 đã viết:
Em vừa test, kết quả thế này:
1. Nếu sau khi dịch xong, undo sẽ trả về giá trị trước đó, nhưng chỉ undo được 1 lần.
2. Vấn đề gặp phải: Nếu mình có sửa file hay làm gì trước đó, sau đó dùng tổ hợp phím để dịch, undo sẽ chỉ hoạt động 1 lần trả về giá trị trước khi dịch, còn đối với những thay đổi trước đó nữa sẽ không thể undo tiếp được.

Cái này e là khó, vì ngay khi chạy tính năng dịch, undo của Excel đã bị xóa hoàn toàn! Mình nghĩ, khó tìm ra một cách tiếp cận phù hợp vì bản thân Excel nó đã được thiết lập ra như vậy!
Với yêu cầu này, mình sợ là không làm được! Mong các bạn thông cảm

lamvu211 · 19/11/18

paulsteigel đã viết:
Cái này e là khó, vì ngay khi chạy tính năng dịch, undo của Excel đã bị xóa hoàn toàn! Mình nghĩ, khó tìm ra một cách tiếp cận phù hợp vì bản thân Excel nó đã được thiết lập ra như vậy!
Với yêu cầu này, mình sợ là không làm được! Mong các bạn thông cảm

Em nghĩ nếu được anh có thể tạo code mở 1 file excel tạm thời và đưa kết quả dịch vào đó thay vì dịch trực tiếp trên file, như thế có thể vẫn giữ được các tính năng trên file gốc như bình thường. Em không hiểu nhiều về code nên chỉ nghĩ ý tưởng vậy thôi.

paulsteigel · 19/11/18

lamvu211 đã viết:
Em nghĩ nếu được anh có thể tạo code mở 1 file excel tạm thời và đưa kết quả dịch vào đó thay vì dịch trực tiếp trên file, như thế có thể vẫn giữ được các tính năng trên file gốc như bình thường. Em không hiểu nhiều về code nên chỉ nghĩ ý tưởng vậy thôi.

Thực ra, mình đánh giá cao ý tưởng của bạn, tuy nhiên do phải thao tác với VBA nên cứ chạy mã VBA thì Danh sách undo hiện thời đã bị mất nên tạo ra bản mới cũng không khác gì cả. Ngoài ra, công cụ này được thiết lập để tạo ra sự tiện lợi tại chỗ (giống như chuyển mã sang unicode...vv) ngay trên Excel nên nếu chuyển sang một file mới thì giá trị của nó sẽ mất đi.
Xét về thao tác người dùng, việc lưu lại những thay đổi trước khi chạy một ứng dụng nào đó là điều nên làm. Còn việc tích lũy các thay đổi để kiểm duyệt một thể sau đó thường là thói quen không phù hợp, dễ mất mát dữ liệu.
Anh nghĩ, ở giai đoạn hiện tại, khó mà tìm được giải pháp tuyệt đối cho nhiều nhu cầu khác nhau. Nên, tạm thời để như vậy dài dài vậy!
Hy vọng em thông cảm!

paulsteigel · 30/1/19

Công cụ hỗ trợ google dịch trên Excel đã được nâng cấp với 3 ngôn ngữ Anh, Nhật, Việt, các bạn xem và tải file tại bài đầu https://www.giaiphapexcel.com/diend...a-google-vào-excel-và-word.139010/post-891650
Với các bạn phải thường xuyên làm việc với những ngôn ngữ này trên Excel, đây có thể là một công cụ có ích nho nhỏ. Chúc các bạn vui vẻ, mạnh khỏe, làm việc hiệu quả và thành công nhân dịp năm mới sắp tới

===========Một vài điều bàn thêm về lập trình==============
Trong công cụ có sử dụng đối tượng xmlHttp để thực hiện việc gửi truy vấn đến máy chủ của google. Để tránh việc treo máy và đợi lâu khi thực hiện tôi đã viết thành một Class và vận dụng đối tượng XmlHttp theo cách đồng thời gửi yêu cầu dịch và chờ có kết quả thì sẽ cập nhập nội dung của Cell liên quan. Cái khó ở đây là việc thiết lập một class để nó có thể theo sát việc gửi thông tin và chờ, bắt được sự kiện khi có trả lời từ máy chủ Google của đối tượng XmlHttp.
Sau khi sục sạo, đọc tài liệu thì tôi đã tìm được giải pháp là thiết lập một thủ tục để Class này thực hiện một cách mặc định khi đối tượng XMLHTTP thay đổi trạng thái với thủ tục Sub ReadyStateChangeHandler() (Export Class này ra ngoài, dùng texteditor thêm dòng Attribute ReadyStateChangeHandler.VB_UserMemId = 0 vào ngay sau thủ tục này rồi import lại vào Môi trường viết code VBA).
Cách làm này giúp chúng ta có thể gửi hàng trăm truy vấn xong rồi đợi và kết quả sẽ cập nhập liên tục vào các ô trong vùng được chọn mà không bắt người dùng phải chờ đợi. Cách này cũng tận dụng lợi thế phân luồng của máy tính nên tốc độ được cải thiện tương đối.
Xin chia sẻ cùng các bạn

batman1 · 31/1/19

paulsteigel đã viết:
Trong công cụ có sử dụng đối tượng xmlHttp để thực hiện việc gửi truy vấn đến máy chủ của google. Để tránh việc treo máy và đợi lâu khi thực hiện tôi đã viết thành một Class và vận dụng đối tượng XmlHttp theo cách đồng thời gửi yêu cầu dịch và chờ có kết quả thì sẽ cập nhập nội dung của Cell liên quan. Cái khó ở đây là việc thiết lập một class để nó có thể theo sát việc gửi thông tin và chờ, bắt được sự kiện khi có trả lời từ máy chủ Google của đối tượng XmlHttp.
Sau khi sục sạo, đọc tài liệu thì tôi đã tìm được giải pháp là thiết lập một thủ tục để Class này thực hiện một cách mặc định khi đối tượng XMLHTTP thay đổi trạng thái với thủ tục Sub ReadyStateChangeHandler()

Tiếc là bạn không đọc được bài của tôi gần 1 năm trước.
Bài #37
https://www.giaiphapexcel.com/diend...ds-file-từ-web-về-máy-tính.105631/post-844181

Trích

Chính vì thế tôi phục vụ sự kiện ReadyStateChange
Tức trong lớp clsXMLHTTPHandler có dòng
Mã:

XmlHttpRequest.OnReadyStateChange = Me

Như thế thì khi sảy ra sự kiện OnReadyStateChange thì code callback sẽ được gọi. Để thiết lập EventCallback (trong class clsXMLHTTPHandler) là callback và sẽ được gọi thì phải có chút thủ thuật *. Chính vì thế mà tôi đính kèm tập tin clsXMLHTTPHandler.cls chứ không dâng cho bạn code ở dạng văn bản.
Trong EventCallback thì code kiểm tra ReadyState và Status của đối tượng. Nếu Status là 200 thì gọi sub SaveFile (được truyền khi gọi phương thức Send của đối tượng request) - dùng Application.Run. code của SaveFile sẽ ghi tập tin.

* Bạn không thể viết
Mã:

XmlHttpRequest.OnReadyStateChange = Me.EventCallback

với hàm ý là code EventCallback sẽ phục vụ sự kiện OnReadyStateChange, để khi sự kiện OnReadyStateChange sảy ra thì code EventCallback sẽ được thực hiện. Vậy thì bằng cách nào "thông báo" là EventCallback chính là để phục vụ sự kiện OnReadyStateChange? Bằng cách cho EventCallback là thuộc tính mặc định của class clsXMLHTTPHandler. Nhưng cho bằng cách nào?
Bằng cách: sau khi có code của class clsXMLHTTPHandler thì chọn nó và từ menu File chọn Remove class clsXMLHTTPHandler -> chọn Yes để lưu lại clsXMLHTTPHandler.cls ở thư mục nào đó -> mở tập tin clsXMLHTTPHandler.cls vd. bằng notepad -> sau dòng Sub EventCallback() thì thêm 1 dòng
Mã:

Attribute EventCallback.VB_UserMemId = 0

Bạn mở tập tin CLS của tôi thì sẽ thấy dòng thêm này.

-> lưu lại và đóng notepad -> menu File chọn Import -> chọn tập tin vừa sửa.

Như vậy thì EventCallback sẽ là mặc định và khi sảy ra sự kiện OnReadyStateChange thì mặc định của đối tượng được "đưa vào" OnReadyStateChange sẽ được gọi. Do ta có
Mã:

XmlHttpRequest.OnReadyStateChange = Me

nên khi sảy ra OnReadyStateChange thì mặc định của Me, tức clsXMLHTTPHandler, sé được gọi. Mà mặc định của clsXMLHTTPHandler chính là EventCallback. Thế thôi.

paulsteigel · 31/1/19

batman1 đã viết:
Tiếc là bạn không đọc được bài của tôi gần 1 năm trước.
Bài #37
https://www.giaiphapexcel.com/diend...ds-file-từ-web-về-máy-tính.105631/post-844181

Trích

Cảm ơn bác,
Công nhận là tiếc rằng em không được đọc bài của bác như gửi kèm. Tuy nhiên, dù sao thì Internet cũng đã đưa em đến cái mà bác đề cập trong bài viết bác đính kèm khi em nảy sinh câu hỏi, làm thế nào để class có thể kiểm soát sự kiện của XmlHttp như một ActiveX như kiểu Raise Event.
Phần này em tìm kiếm được ở trang http://dailydoseofexcel.com/archives/2006/10/09/async-xmlhttp-calls/ khi viết một ứng dụng nhỏ cho phép tải và quản trị file bằng vba + XmlHttp mà không cần dùng IE trên google drive.
Trên thực tế việc tìm kiếm các bài viết bằng tiếng Việt liên quan đến việc này ra kết quả hạn chế nên em hay tìm luôn bằng tiếng Anh. Mạng Internet mở ra những cánh cửa kiến thức để đôi khi mọi người lại gặp nhau ở nơi thật gần gũi.
Mong sao những giải pháp mở sẽ ngày càng được chia sẻ nhiều hơn!
Xin cảm ơn bác và chúc bác năm mới mạnh khỏe, hạnh phúc và tiếp tục có nhiều cống hiến cho cộng đồng!

tam888 · 31/1/19

paulsteigel đã viết:
Cảm ơn bác,
Công nhận là tiếc rằng em không được đọc bài của bác như gửi kèm. Tuy nhiên, dù sao thì Internet cũng đã đưa em đến cái mà bác đề cập trong bài viết bác đính kèm khi em nảy sinh câu hỏi, làm thế nào để class có thể kiểm soát sự kiện của XmlHttp như một ActiveX như kiểu Raise Event.
Phần này em tìm kiếm được ở trang http://dailydoseofexcel.com/archives/2006/10/09/async-xmlhttp-calls/ khi viết một ứng dụng nhỏ cho phép tải và quản trị file bằng vba + XmlHttp mà không cần dùng IE trên google drive.
Trên thực tế việc tìm kiếm các bài viết bằng tiếng Việt liên quan đến việc này ra kết quả hạn chế nên em hay tìm luôn bằng tiếng Anh. Mạng Internet mở ra những cánh cửa kiến thức để đôi khi mọi người lại gặp nhau ở nơi thật gần gũi.
Mong sao những giải pháp mở sẽ ngày càng được chia sẻ nhiều hơn!
Xin cảm ơn bác và chúc bác năm mới mạnh khỏe, hạnh phúc và tiếp tục có nhiều cống hiến cho cộng đồng!

Nếu bạn có ứng dụng khác thì có vẻ hay hơn, có ý tưởng nào không, vì dịch như thế này cũng hay, nhưng có google translate thì cũng khá tốt rồi

paulsteigel · 31/1/19

tam888 đã viết:
Nếu bạn có ứng dụng khác thì có vẻ hay hơn, có ý tưởng nào không, vì dịch như thế này cũng hay, nhưng có google translate thì cũng khá tốt rồi

Cảm ơn bạn đã nhắc! Đáng tiếc là tôi không có ứng dụng nào khác thú vị cả, đây chỉ là một chia sẻ nhỏ với mong muốn nó có thể giúp ích được ai đó cần! Nếu không cần thiết và làm tốn tài nguyên, thì mong BQT xóa hộ tôi thread này. Đọc góp ý của bạn xong, mình cũng muốn xóa thread đi lắm nhưng không được giao quyền nên đành để vậy!
Năm mới sắp đến, chúc bạn và các thành viên diễn đàn mạnh khỏe và có nhiều đóng góp cho diễn đàn và cuộc sống!

tam888 · 31/1/19

paulsteigel đã viết:
Cảm ơn bạn đã nhắc! Đáng tiếc là tôi không có ứng dụng nào khác thú vị cả, đây chỉ là một chia sẻ nhỏ với mong muốn nó có thể giúp ích được ai đó cần! Nếu không cần thiết và làm tốn tài nguyên, thì mong BQT xóa hộ tôi thread này. Đọc góp ý của bạn xong, mình cũng muốn xóa thread đi lắm nhưng không được giao quyền nên đành để vậy!
Năm mới sắp đến, chúc bạn và các thành viên diễn đàn mạnh khỏe và có nhiều đóng góp cho diễn đàn và cuộc sống!

Không nhắc gì bạn cả, mà là muốn xem có ý tưởng khác không
Còn cứ để đi bạn cũng 1 cách để hiểu thêm ứng dụng web vào VBA -Excel

babyheomoi · 21/2/19

Bạn ơi, bạn update thêm bản 64bit được không? em mở máy 64 bit thử thì báo chưa hỗ trợ!

babyheomoi · 26/2/19

Máy em xài word 2010 64bit thì không bị, nhưng word 2016 64 bit thì bị lỗi này!
Anh em xem hỗ trợ giúp em nha

ngockylanvn · 24/6/19

Cảm ơn ad vì bài viết hay! Tuy nhiên khi add in mình bị báo lỗi này mà không biết cách xử lý! Mong các cao nhân chỉ giáo nhé
Cảm ơn mọi người trước! Mình đang chờ tin mọi người như lửa đốt

lenolim · 23/7/19

paulsteigel đã viết:
Từ nhu cầu của một vài bạn liên quan đến việc dịch tài liệu, tôi chuẩn bị một công cụ nhỏ và xin chia sẻ cho các bạn làm văn phòng, hy vọng nó sẽ giúp các bạn phải làm việc với Tiếng Anh đỡ vất vả khi copy/paste trên web với tính năng dịch của Google.
Công cụ này được viết cho Office 2007 trở lên. nếu các bạn có nhu cầu với Office 2003 thì có thể chuyển biên dịch lại 2 tập tin Normal.dotm và Tools.xla về Office 2003 nhé.
Cách cài đặt các bạn xem trên video dưới đây. Khi cần dịch, chọn vùng nhấn Ctrl+Shift+E (dịch Việt Anh) và Ctrl+Shiff+V (Anh việt)
Trên Word
MEDIA=youtube]aIX9exItbMs[/MEDIA]
Trên Excel

Cách cài đặt như sau:
1. Tải file đính kèm về, giải nén ra một thư mục ví dụ C:\Tools
2. Tắt hoàn toàn Word nhé
vào run (Winkey+R) gõ %userprofile%AppData\Roaming\Microsoft\Templates
để vào thư mục template của Word theo chỉ dẫn ở đây (sau đó thoát hoàn toàn word
https://www.experts-exchange.com/articles/29466/Finding-the-Office-Templates-Folder.html
Lưu lại bản Normal.dotm hiện tại của bạn bằng cách đổi tên thành Old_normal.dotm
3. Copy file Normal.dotm trong thư mục tools vừa tải về vào, ghi vào thư mục templates.
Khởi động word và bạn có thể bắt đầu dùng công cụ, lưu ý là phải để chế độ macro enable nhé!
4. Với excel thì bạn cài add in thông thường.
+ Khởi động excel, chọn file/options/addins
+ vào mục addins, chọn Go, Add, Browse và trỏ đến file Tools.xla.
Chúc các bạn vui vẻ
==============cập nhập mới==================
Hiện tại, công cụ này đã được cập nhập và có thể thiết lập để dịch Anh/Việt/Nhật.
Các nút chuyển sau khi thiết lập đã được đổi là
Ctrl+Shift+T = Dịch theo thiết lập của người dùng từ ngôn ngữ A->B
Ctrl+Shift+R = dịch ngược lại từ B sang A và
Ctrl+Shft+B = Bật hộp thoại thiết lập ngôn ngữ dịch

Cho tôi xin hỏi tác giả vấn đề là:
Tác giả có thể tạo bảng lựa chon bảng dịch cho 1 ngôn ngữ bất kỳ không. (Từ tiếng việt dịch ra 1 ngôn ngữ bất kỳ (Anh, Pháp, Đức ....)

hoangtuaotrang_hp_vn · 20/11/19

paulsteigel đã viết:
Từ nhu cầu của một vài bạn liên quan đến việc dịch tài liệu, tôi chuẩn bị một công cụ nhỏ và xin chia sẻ cho các bạn làm văn phòng, hy vọng nó sẽ giúp các bạn phải làm việc với Tiếng Anh đỡ vất vả khi copy/paste trên web với tính năng dịch của Google.
Công cụ này được viết cho Office 2007 trở lên. nếu các bạn có nhu cầu với Office 2003 thì có thể chuyển biên dịch lại 2 tập tin Normal.dotm và Tools.xla về Office 2003 nhé.
Cách cài đặt các bạn xem trên video dưới đây. Khi cần dịch, chọn vùng nhấn Ctrl+Shift+E (dịch Việt Anh) và Ctrl+Shiff+V (Anh việt)
Trên Word
MEDIA=youtube]aIX9exItbMs[/MEDIA]
Trên Excel

Cách cài đặt như sau:
1. Tải file đính kèm về, giải nén ra một thư mục ví dụ C:\Tools
2. Tắt hoàn toàn Word nhé
vào run (Winkey+R) gõ %userprofile%AppData\Roaming\Microsoft\Templates
để vào thư mục template của Word theo chỉ dẫn ở đây (sau đó thoát hoàn toàn word
https://www.experts-exchange.com/articles/29466/Finding-the-Office-Templates-Folder.html
Lưu lại bản Normal.dotm hiện tại của bạn bằng cách đổi tên thành Old_normal.dotm
3. Copy file Normal.dotm trong thư mục tools vừa tải về vào, ghi vào thư mục templates.
Khởi động word và bạn có thể bắt đầu dùng công cụ, lưu ý là phải để chế độ macro enable nhé!
4. Với excel thì bạn cài add in thông thường.
+ Khởi động excel, chọn file/options/addins
+ vào mục addins, chọn Go, Add, Browse và trỏ đến file Tools.xla.
Chúc các bạn vui vẻ
==============cập nhập mới==================
Hiện tại, công cụ này đã được cập nhập và có thể thiết lập để dịch Anh/Việt/Nhật.
Các nút chuyển sau khi thiết lập đã được đổi là
Ctrl+Shift+T = Dịch theo thiết lập của người dùng từ ngôn ngữ A->B
Ctrl+Shift+R = dịch ngược lại từ B sang A và
Ctrl+Shft+B = Bật hộp thoại thiết lập ngôn ngữ dịch

Bác ơi, em dùng Excel 2019 (64 bit), chỉ nhấn được Ctrl+Shift+B = Bật hộp thoại thôi, còn Ctrl+Shift+T hay Ctrl+Shift+R đều không có gì xảy ra cả

(

YenLV · 11/12/19

hoangtuaotrang_hp_vn đã viết:
Bác ơi, em dùng Excel 2019 (64 bit), chỉ nhấn được Ctrl+Shift+B = Bật hộp thoại thôi, còn Ctrl+Shift+T hay Ctrl+Shift+R đều không có gì xảy ra cả (

Đây là bản của Bác paulsteigel đã update cho win 64 Bit gửi cho mình. Bạn download về dùng nhé, cảm ơn Bác Paulsteigel !

hai197995 · 26/9/20

laivanyen8 đã viết:
Đây là bản của Bác paulsteigel đã update cho win 64 Bit gửi cho mình. Bạn download về dùng nhé, cảm ơn Bác Paulsteigel !

Bác cho e hỏi sao của e CTR SHIFT T ko dịch nhưng CTR SHIFT B vẫn ra bảng chọn dịch ạ . Help e

hoangnt0205 · 17/2/21

Anh em hội có ai có file mới cho office 2019 không ạ? Cho em xin với

paulsteigel · 17/2/21

hoangnt0205 đã viết:
Anh em hội có ai có file mới cho office 2019 không ạ? Cho em xin với

Hiện tại Google không cho dùng free chức năng dịch nữa, mình đã update sang sử dụng bing (bản trả phí). Bing dịch cũng kém lắm. Nói chung công cụ này mình chỉ nghĩ để hỗ trợ bạn nào cần để xem thêm thôi.
Mình không update bản mới lên trang đầu được nên phải đính tạm ở đây! Không rõ tại sao diễn đàn lại không còn tính năng sửa các bài cũ nữa!

befaint · 17/2/21

paulsteigel đã viết:
Hiện tại Google không cho dùng free chức năng dịch nữa

Thông tin đó từ đâu vậy bạn?

paulsteigel · 17/2/21

befaint đã viết:
Thông tin đó từ đâu vậy bạn?

Nếu bạn dùng trên web-browser thì không có vấn đề gì nhưng dùng API thì bạn không còn dùng được nữa, google giới hạn số query đến máy chủ nên chỉ sau một vài dòng dịch công cụ dịch sẽ không hoạt động nữa, tất cả các phản hồi nó nhận được từ google là từ chối dịch tiếp. Nếu muốn dùng API thì phải dùng Google Cloud Translation Service (dịch vụ thông dịch đám mây) và cái này thì phải trả tiền. Mình đã thử vận dụng cấu trúc truy vấn của trình duyệt nhưng cứ vài thời gian Google lại thay đổi tham số của Script nên lại phải mất công làm lại thuật toán truy vấn dịch. Vì lẽ đó, mình bỏ google và chuyển sang bing.
Ví dụ: trước đây, để dịch chỉ cần dòng GET này với google:

ASP.net:

"https://translate.google.com/translate_a/single?client=webapp&" & _
    "sl=auto&tl=" & rtlTo & "&hl=" & rtlFrom & "&dt=at&dt=bd&dt=ex&dt=ld&dt=md&dt=qca&dt=rw&dt=rm&dt=sos&" & _
    "dt=ss&dt=t&otf=1&pc=1&ssel=0&tsel=4&kc=2&tk=74429.519717&client=tw-ob&q="

Giờ thì cách đó không được nữa.
Hiện tại mình đã chuyển sang dùng bing với thủ tục truy vấn dịch như sau:

ASP.net:

Sub BingConnect()
    ' Using microsoft translation
    On Error Resume Next
    Dim URL As String, getParam As String
    getParam = JsonText(rtlObj.Value)
    URL = "https://api.cognitive.microsofttranslator.com/translate?api-version=3.0&from=" & rtlFrom & "&to=" & rtlTo
    
    With xhrObj
        .Open "POST", URL, True
        .setRequestHeader "Ocp-Apim-Subscription-Key", "API-Key"
        .setRequestHeader "Ocp-Apim-Subscription-Region", "southeastasia"
        .setRequestHeader "Content-Type", "application/json; charset=UTF-8"
        .send getParam
        'curl -X POST "https://api.cognitive.microsofttranslator.com/translate?api-version=3.0&to=zh-Hans&toScript=Latn"
        '-H "Ocp-Apim-Subscription-Key: <client-secret>" -H "Content-Type: application/json; charset=UTF-8"
        '-d "[{'Text':'Hello, what is your name?'}]"
        Debug.Print .ResponseText
    End With
End Sub

Vài lời chia sẻ!

befaint · 17/2/21

paulsteigel đã viết:
Nếu bạn dùng trên web-browser thì không có vấn đề gì nhưng dùng API thì bạn không còn dùng được nữa, google giới hạn số query đến máy chủ nên chỉ sau một vài dòng dịch công cụ dịch sẽ không hoạt động nữa, tất cả các phản hồi nó nhận được từ google là từ chối dịch tiếp.

Từ khóa đây nhé. Hàng hịn, miễn phí và KHÔNG giới hạn.

"Google Translate Ajax API"

paulsteigel · 17/2/21

befaint đã viết:
Từ khóa đây nhé. Hàng hịn, miễn phí và KHÔNG giới hạn.

"Google Translate Ajax API"

Đáng tiếc là cái này của google đã dừng từ đầu năm 2021 - hiện tại google suite cho bật cái này nhưng tính phí hàng tháng! Mình đã dùng googleapp từ 2005 (khi còn cho free) giờ chuyển sang dùng google suite basic cho non-profit nhưng tính năng dịch đã chuyển sang nền tảng cloud và người dùng không được dùng miễn phí không giới hạn như trước nữa.
Nếu mà có cái này chắc mình đã phải thấy từ lâu rồi! Vì cách đây mấy tháng mình phải nghiên cứu ròng rã bắt chước browser nhưng cuối cùng phải chuyển sang dùng API vì google kiểm soát chặt hơn việc khai thác gói hỗ trợ dịch không qua các sản phẩm của google (chrome, chronium, android app...vv)
Nếu bạn có bằng chứng về việc này thì chia sẻ - mình sẽ update ngay

Chưa biết đích xác ngày nào nhưng từ đầu 2021, một loạt bạn bè có kêu là công cụ hết dịch được

Cloud Translation documentation | Google Cloud

Allows programatic integration with Google Translate.

cloud.google.com

Mình đã thử nhiều cách và cuối cùng đều dẫn đến phải kích hoạt chế độ thanh toán và dùng thử 90 ngày! sau đó là 1.8 M/ tháng cho 250MB tài liệu dịch! Bảng giá dịch của họ đơi! https://cloud.google.com/translate/pricing
Cũng có một anh bạn đã thiết lập riêng 1 proxy để hỗ trợ bà con nhưng proxy này chạy hơi chậm.

Google Translate and TTS Client

Translate and TTS multiple languages simultaneously

google-translate-proxy.herokuapp.com

Đây là nơi bạn ý chia sẻ

GitHub - guyrotem/google-translate-server: Google Translate Proxy API

Google Translate Proxy API. Contribute to guyrotem/google-translate-server development by creating an account on GitHub.

github.com

Đã định thiết lập một server riêng cho việc này nhưng thấy nó cũng vô bổ nên mình dừng lại và chuyển sang bing cho nhanh! Vừa miễn phí (Microsoft cung cấp tài trợ cho đơn vị mình - NGO mà)

befaint · 17/2/21

paulsteigel đã viết:
Đáng tiếc là cái này của google đã dừng từ đầu năm 2021

Vẫn chạy ầm ầm mà.

Thử code nhanh được vầy, bạn thử xem có vấn đề gì không.

Ấn vào bức ảnh để download >>

paulsteigel · 17/2/21

befaint đã viết:
Vẫn chạy ầm ầm mà.

Thử code nhanh được vầy, bạn thử xem có vấn đề gì không.

Ấn vào bức ảnh để download >>

View attachment 254229

Bạn thử tầm 200-500 querry cùng lúc xem - nó sẽ dừng làm việc ngay! Vì trên tool mình sử dụng gửi đồng thời nhiều query cùng lúc để xử lý dịch nhiều cell đồng thời nên có thể google kiểm soát việc này, không cho lạm dụng gửi quá nhiều truy vấn cùng lúc.
Nếu dùng tuần tự thì mình cho là không có vấn đề gì ngay với cái chuỗi truy vấn cũ nhưng tốc độ chung giảm đi rất nhiều!
Ngó vào đây thì Google có kiểm soát việc này

Quotas and limits | Cloud Translation | Google Cloud

cloud.google.com

và thêm một chút thông tin dân mạng kêu ca!

Google translate api timeout

I have approximately 20000 pieces of texts to translate, each of which average around the length of 100 characters. I am using the multiprocessing library to speed up my API calls. And looks like b...

stackoverflow.com

befaint · 17/2/21

paulsteigel đã viết:
Bạn thử tầm 200-500 querry cùng lúc xem - nó sẽ dừng làm việc ngay!

Ngại quay video màn hình quá. Không biết làm sao mình mới TRỊU? @@

paulsteigel · 17/2/21

befaint đã viết:
Ngại quay video màn hình quá. Không biết làm sao mình mới TRỊU? @@

Mình từ lâu đã giải nghệ, chẳng qua là có vài bạn bè thỉnh thoảng vẫn hỏi, nhờ giúp. Tiện thể thì giúp thế thôi. Nói chung cũng không cần thiết phải mất thời gian của mọi người làm gì. Nếu bạn sẵn lòng thì thay vì cố gắng chứng minh việc làm được, hãy mần một công cụ tích hợp vào excel để mọi người cùng thừa kế. Giúp được một người phúc đẳng hà sa. Google dịch không tốt lắm nhưng có nhiều người thật sự vất vả khi phải giải quyết việc gì đó trong thời gian ngắn thì họ cậy vào nó.
Cái công cụ mình làm (từ 2015) lúc đó là theo nhờ vả của một người bạn, thấy hay ho thì gửi chia sẻ với mục tiêu giúp người dùng có thể nhúng ngay trên excel, chọn vùng, rồi dịch...
Với google API thì bắt buộc phải có credential, app-key/token, căn bản nhất là để có cái credential đó, phải mất khí hay không! Hiểu biết của mình vốn nông cạn nên đến đây không còn hướng giải quyết nào nữa nên phải dừng lại.
Cái gì cũng đến lúc kết thúc và cần có sự thay đổi. Mình xin phép dừng lại ở đây và chân thành xin lỗi những ai đã trót dùng cái công cụ vô dụng mình gửi lên. Mặc dù hiện tại nó đang dùng được với bing song có thể không lâu nữa nó lại tèo.
Hóng các cao nhân có ý tưởng gì thì vào cuộc vì cộng đồng!
Chân thành!

befaint · 17/2/21

paulsteigel đã viết:
cố gắng chứng minh việc làm được

Không phải là chứng minh gì cả. Vấn đề ở phát biểu của mình không rõ ràng, làm sai bản chất sự việc.
Ngay mấy trang mình dẫn ra để CHỨNG MINH vụ Google hết cho dùng đó, người ta cũng đều nói rõ dịch vụ gì, chứ không hề phát biểu chung chung như mình.

paulsteigel đã viết:
Giúp được một người phúc đẳng hà sa.

Mình theo chủ nghĩa duy vật biện chứng, vật chất là cái có trước, sinh ra và quyết định ý thức. Mấy cái tích phúc đức gì đó chưa bao giờ nghĩ tới.

paulsteigel đã viết:
thử tầm 200-500 querry cùng lúc xem

"Cùng lúc" thì phải code mệt nên chỉ chạy liên tục thôi.
Lúc đầu chạy thử 500 theo mình đề nghị nhưng phải xóa video quay lại 900, sợ bị nhắc ít.

Mình xem video nhé.

paulsteigel · 17/2/21

befaint đã viết:
Không phải là chứng minh gì cả. Vấn đề ở phát biểu của mình không rõ ràng, làm sai bản chất sự việc.
Ngay mấy trang mình dẫn ra để CHỨNG MINH vụ Google hết cho dùng đó, người ta cũng đều nói rõ dịch vụ gì, chứ không hề phát biểu chung chung như mình.

View attachment 254231

Mình theo chủ nghĩa duy vật biện chứng, vật chất là cái có trước, sinh ra và quyết định ý thức. Mấy cái tích phúc đức gì đó chưa bao giờ nghĩ tới.

"Cùng lúc" thì phải code mệt nên chỉ chạy liên tục thôi.
Lúc đầu chạy thử 500 theo mình đề nghị nhưng phải xóa video quay lại 900, sợ bị nhắc ít.
Mình xem video nhé.

Cảm ơn bạn đã mất thời gian vì sự không rõ ràng. Cũng xin thành thật xin lỗi để bạn tiêu tốn cả buổi tối vì việc này!

thuyyeu99 · 19/2/21

paulsteigel đã viết:
.. mần một công cụ tích hợp vào excel để mọi người cùng thừa kế.
....
Hóng các cao nhân có ý tưởng gì thì vào cuộc vì cộng đồng!
Chân thành!

"Mùng" cũng "Hóng" có công cụ như vậy hihihi

hoangnt0205 · 28/2/21

paulsteigel đã viết:
Hiện tại Google không cho dùng free chức năng dịch nữa, mình đã update sang sử dụng bing (bản trả phí). Bing dịch cũng kém lắm. Nói chung công cụ này mình chỉ nghĩ để hỗ trợ bạn nào cần để xem thêm thôi.
Mình không update bản mới lên trang đầu được nên phải đính tạm ở đây! Không rõ tại sao diễn đàn lại không còn tính năng sửa các bài cũ nữa!

em cảm ơn bác. Bác có email không? em xin được không bác

federera6 · 1/4/21

paulsteigel đã viết:
Mình từ lâu đã giải nghệ, chẳng qua là có vài bạn bè thỉnh thoảng vẫn hỏi, nhờ giúp. Tiện thể thì giúp thế thôi. Nói chung cũng không cần thiết phải mất thời gian của mọi người làm gì. Nếu bạn sẵn lòng thì thay vì cố gắng chứng minh việc làm được, hãy mần một công cụ tích hợp vào excel để mọi người cùng thừa kế. Giúp được một người phúc đẳng hà sa. Google dịch không tốt lắm nhưng có nhiều người thật sự vất vả khi phải giải quyết việc gì đó trong thời gian ngắn thì họ cậy vào nó.
Cái công cụ mình làm (từ 2015) lúc đó là theo nhờ vả của một người bạn, thấy hay ho thì gửi chia sẻ với mục tiêu giúp người dùng có thể nhúng ngay trên excel, chọn vùng, rồi dịch...
Với google API thì bắt buộc phải có credential, app-key/token, căn bản nhất là để có cái credential đó, phải mất khí hay không! Hiểu biết của mình vốn nông cạn nên đến đây không còn hướng giải quyết nào nữa nên phải dừng lại.
Cái gì cũng đến lúc kết thúc và cần có sự thay đổi. Mình xin phép dừng lại ở đây và chân thành xin lỗi những ai đã trót dùng cái công cụ vô dụng mình gửi lên. Mặc dù hiện tại nó đang dùng được với bing song có thể không lâu nữa nó lại tèo.
Hóng các cao nhân có ý tưởng gì thì vào cuộc vì cộng đồng!
Chân thành!

Cám ơn bác rất nhiều, sẽ có những người cần cái này của bác !

tvgtyb08 · 2/4/22

paulsteigel đã viết:
Từ nhu cầu của một vài bạn liên quan đến việc dịch tài liệu, tôi chuẩn bị một công cụ nhỏ và xin chia sẻ cho các bạn làm văn phòng, hy vọng nó sẽ giúp các bạn phải làm việc với Tiếng Anh đỡ vất vả khi copy/paste trên web với tính năng dịch của Google.
Công cụ này được viết cho Office 2007 trở lên. nếu các bạn có nhu cầu với Office 2003 thì có thể chuyển biên dịch lại 2 tập tin Normal.dotm và Tools.xla về Office 2003 nhé.
Cách cài đặt các bạn xem trên video dưới đây. Khi cần dịch, chọn vùng nhấn Ctrl+Shift+E (dịch Việt Anh) và Ctrl+Shiff+V (Anh việt)
Trên Word
MEDIA=youtube]aIX9exItbMs[/MEDIA]
Trên Excel

Cách cài đặt như sau:
1. Tải file đính kèm về, giải nén ra một thư mục ví dụ C:\Tools
2. Tắt hoàn toàn Word nhé
vào run (Winkey+R) gõ %userprofile%AppData\Roaming\Microsoft\Templates
để vào thư mục template của Word theo chỉ dẫn ở đây (sau đó thoát hoàn toàn word
https://www.experts-exchange.com/articles/29466/Finding-the-Office-Templates-Folder.html
Lưu lại bản Normal.dotm hiện tại của bạn bằng cách đổi tên thành Old_normal.dotm
3. Copy file Normal.dotm trong thư mục tools vừa tải về vào, ghi vào thư mục templates.
Khởi động word và bạn có thể bắt đầu dùng công cụ, lưu ý là phải để chế độ macro enable nhé!
4. Với excel thì bạn cài add in thông thường.
+ Khởi động excel, chọn file/options/addins
+ vào mục addins, chọn Go, Add, Browse và trỏ đến file Tools.xla.
Chúc các bạn vui vẻ
==============cập nhập mới==================
Hiện tại, công cụ này đã được cập nhập và có thể thiết lập để dịch Anh/Việt/Nhật.
Các nút chuyển sau khi thiết lập đã được đổi là
Ctrl+Shift+T = Dịch theo thiết lập của người dùng từ ngôn ngữ A->B
Ctrl+Shift+R = dịch ngược lại từ B sang A và
Ctrl+Shft+B = Bật hộp thoại thiết lập ngôn ngữ dịch

Anh ơi em tải có file đính kèm Tools.zip chỉ có file Tools.xlam cho Excel không thấy file Normal.dotm cho Word.
Với lại trên Excel (Office 365) khi em dịch nó ra "Error in translation" không dịch được ạ. Anh hướng dẫn em với. Cảm ơn anh.

paulsteigel · 11/1/23

Không biết tại sao mà tôi không thể sửa được bài viết số 1 để thay thế file cũ, tiện thể hôm trước có bạn hỏi, tôi có update lại công cụ cho Excel nên gửi kèm lên đây! Bản này đã sửa cho cả Office64. Riêng bản word tôi để tập tin zip, trong đó là Normal.dotm. Các bạn có thể copy đè lên tập tin này của word để dùng hoặc đổi tên thành Tools.dotm rồi cài thêm vào bộ template của Word là có thể dùng được ngay Ctrl+Shift+E để dịch đoạn text sang tiếng Anh, V sang tiếng Việt.
Chúc cộng đồng GPE năm mới vui vẻ, mạnh khoẻ và thành công.
Trân trọng

Nhatminh0208 · 12/1/23

paulsteigel đã viết:
Không biết tại sao mà tôi không thể sửa được bài viết số 1 để thay thế file cũ, tiện thể hôm trước có bạn hỏi, tôi có update lại công cụ cho Excel nên gửi kèm lên đây! Bản này đã sửa cho cả Office64. Riêng bản word tôi để tập tin zip, trong đó là Normal.dotm. Các bạn có thể copy đè lên tập tin này của word để dùng hoặc đổi tên thành Tools.dotm rồi cài thêm vào bộ template của Word là có thể dùng được ngay Ctrl+Shift+E để dịch đoạn text sang tiếng Anh, V sang tiếng Việt.
Chúc cộng đồng GPE năm mới vui vẻ, mạnh khoẻ và thành công.
Trân trọng

Dạ em chào Anh, em thử cho tệp excel thì nó báo lỗi khi em nhấn ctrl+Shift+B (như hình). Còn khi em nhấn dịch nó không thay đổi gì. Nhờ Anh xem giúp ạ. Em cám ơn.

paulsteigel · 12/1/23

Nhatminh0208 đã viết:
Dạ em chào Anh, em thử cho tệp excel thì nó báo lỗi khi em nhấn ctrl+Shift+B (như hình). Còn khi em nhấn dịch nó không thay đổi gì. Nhờ Anh xem giúp ạ. Em cám ơn.

Đây bạn nhé! Già rồi đâm ẩu nên quên mất khởi tạo giá trị cho biến!

paulsteigel · 15/1/23

Đáng tiếc là tính năng sửa bài viết cũ bị khoá sau 2 ngày thì phải nên không thể nào mở bài cũ ra xoá để tải mã nguồn mới lên (thế này cũng gián tiếp gây tốn nguồn lực máy chủ GPE). Bản mới này tôi có cập nhập thêm tính năng xử lý chuỗi nếu trong văn bản gốc có nhiều ký tự đặc biệt như nháy đơn, nháy kép, xuống dòng. Ngoài ra có thêm tính năng mới cho phép trộn kết quả dịch vào ô dữ liệu gốc.
Tặng các bạn cần dùng Google Translate ngày cuối năm!
Các bước cài đặt addin như bình thường
Khi chạy lần đầu, cần bấm tổ hợp Ctrl+Shift+B để vào cấu hình (hộp thoại sau sẽ hiện ra)

Từ lần sau chỉ cần chọn các ô cần dịch rồi bấm Ctrl+Shift+T là công cụ sẽ dịch theo lựa chọn đã thực hiện ở trên.

Kèm theo đây là tập tin Normal.dotm dành cho word để các bạn có thể sử dụng trực tiếp trong word. Bạn có thể tải về ghi đè lên tập tin Normal.Dotm trong thư mục %USERPROFILE%\AppData\Roaming\Microsoft\Templates (gõ dòng này vào hội thoại run của windows). Lưu ý, nếu bạn đã có các quy định riêng trong normal.dotm thì đổi tên tập tin Normal.dotm tôi đăng ở đây rồi chép vào thư mục in đậm vừa nêu là đã có thể sử dụng được tính năng dịch trên word trực tiếp.

Chọn đoạn cần dịch rồi bấm Ctrl+shift+E để dịch sang tiếng Anh, Ctrl+Shift+V để sang tiếng Việt. Tôi không đưa hộp thoại thiết lập vào vì cho rằng người dùng chủ yếu muốn dịch anh/việt. Trong thời gian tới nếu có người yêu cầu thêm ngôn ngữ thì tôi sẽ nâng cấp tiếp như trong excel. Công cụ này chỉ sử dụng tính năng dịch của google trong khi bản Excel còn dùng thêm tính năng của Bing.

cantl · 16/1/23

paulsteigel đã viết:
Đáng tiếc là tính năng sửa bài viết cũ bị khoá sau 2 ngày thì phải nên không thể nào mở bài cũ ra xoá để tải mã nguồn mới lên (thế này cũng gián tiếp gây tốn nguồn lực máy chủ GPE). Bản mới này tôi có cập nhập thêm tính năng xử lý chuỗi nếu trong văn bản gốc có nhiều ký tự đặc biệt như nháy đơn, nháy kép, xuống dòng. Ngoài ra có thêm tính năng mới cho phép trộn kết quả dịch vào ô dữ liệu gốc.
Tặng các bạn cần dùng Google Translate ngày cuối năm!
Các bước cài đặt addin như bình thường
Khi chạy lần đầu, cần bấm tổ hợp Ctrl+Shift+B để vào cấu hình (hộp thoại sau sẽ hiện ra)
View attachment 285751
Từ lần sau chỉ cần chọn các ô cần dịch rồi bấm Ctrl+Shift+T là công cụ sẽ dịch theo lựa chọn đã thực hiện ở trên.

Kèm theo đây là tập tin Normal.dotm dành cho word để các bạn có thể sử dụng trực tiếp trong word. Bạn có thể tải về ghi đè lên tập tin Normal.Dotm trong thư mục %USERPROFILE%\AppData\Roaming\Microsoft\Templates (gõ dòng này vào hội thoại run của windows). Lưu ý, nếu bạn đã có các quy định riêng trong normal.dotm thì đổi tên tập tin Normal.dotm tôi đăng ở đây rồi chép vào thư mục in đậm vừa nêu là đã có thể sử dụng được tính năng dịch trên word trực tiếp.

Chọn đoạn cần dịch rồi bấm Ctrl+shift+E để dịch sang tiếng Anh, Ctrl+Shift+V để sang tiếng Việt. Tôi không đưa hộp thoại thiết lập vào vì cho rằng người dùng chủ yếu muốn dịch anh/việt. Trong thời gian tới nếu có người yêu cầu thêm ngôn ngữ thì tôi sẽ nâng cấp tiếp như trong excel. Công cụ này chỉ sử dụng tính năng dịch của google trong khi bản Excel còn dùng thêm tính năng của Bing.

Tình hình thế này bác ạ, em muốn trên Word và Excel nó thế này, nếu được thì bác update thêm nhé:
- Bản dịch sẽ hiện trên 1 cửa sổ nhỏ, đồng thời tự động copy vào clipboard để người dùng quyết định xem có paste hay không, và cũng dễ dàng so sánh tiếng Việt và Google dịch.
Hiện em mới nghĩ ra ý này, có thể sau này em lại nghĩ quẩn ra ý khác nữa.

paulsteigel · 16/1/23

cantl đã viết:
Tình hình thế này bác ạ, em muốn trên Word và Excel nó thế này, nếu được thì bác update thêm nhé:
- Bản dịch sẽ hiện trên 1 cửa sổ nhỏ, đồng thời tự động copy vào clipboard để người dùng quyết định xem có paste hay không, và cũng dễ dàng so sánh tiếng Việt và Google dịch.
Hiện em mới nghĩ ra ý này, có thể sau này em lại nghĩ quẩn ra ý khác nữa.

Thế thì phải thêm tùy chọn vào cấu hình dịch rùi! Có nhiều người không muốn loằng ngoằng mà dịch luôn. Mình sẽ cân nhắc bổ sung vào cấu hình để người dùng lựa chọn dán kq dịch hoặc dịch ngay! Chắc vài hôm nữa có k quả

paulsteigel · 19/1/23

cantl đã viết:
Tình hình thế này bác ạ, em muốn trên Word và Excel nó thế này, nếu được thì bác update thêm nhé:
- Bản dịch sẽ hiện trên 1 cửa sổ nhỏ, đồng thời tự động copy vào clipboard để người dùng quyết định xem có paste hay không, và cũng dễ dàng so sánh tiếng Việt và Google dịch.
Hiện em mới nghĩ ra ý này, có thể sau này em lại nghĩ quẩn ra ý khác nữa.

Đây, gửi tặng bạn phần hiệu đính. Mình làm nhanh cho Word thôi còn Excel thì không làm vì thấy không hợp lý lắm.
Tổ hợp phím với Word đã thay đổi:
Ctrl+shift+T để gọi lệnh dịch
Ctrl+shift+B để thiết lập phương pháp dịch.
Một số màn hình như sau:
Màn hình hiệu đính

Bấm nút dịch chuyển để thực hiện dịch từng đoạn văn và hiệu đính
Màn hình thiết lập có thêm tuỳ chọn Xem điều chỉnh kết quả dịch

Chúc bạn và mọi người ăn tết vui vẻ nhá!

cantl · 21/1/23

paulsteigel đã viết:
Ctrl+shift+T để gọi lệnh dịch
Ctrl+shift+B để thiết lập phương pháp dịch.

Tình hình là nhấn tổ hợp Ctrl+shift+B nó ra thế này bác ạ. Nghỉ Tết xong lúc nào rảnh rỗi bác update tí nhé.
Còn cái Excel dù sao em vẫn muốn có 1 cửa sổ nhỏ giống như khi duyệt web, tra từ để nhớ dần dần, mưa lâu thấm đất, đòn đau nhớ đời. Nếu đa số mọi người không có nhu cầu thì em dùng vậy cũng được.
Chúc bác có cái Tết như ý nhé!

paulsteigel · 22/1/23

cantl đã viết:
Tình hình là nhấn tổ hợp Ctrl+shift+B nó ra thế này bác ạ. Nghỉ Tết xong lúc nào rảnh rỗi bác update tí nhé.
Còn cái Excel dù sao em vẫn muốn có 1 cửa sổ nhỏ giống như khi duyệt web, tra từ để nhớ dần dần, mưa lâu thấm đất, đòn đau nhớ đời. Nếu đa số mọi người không có nhu cầu thì em dùng vậy cũng được.
Chúc bác có cái Tết như ý nhé!

Cảm ơn bạn cantl. Tiện đầu năm có tí rảnh rỗi, tôi xem lại và sửa lỗi bạn nói. Hy vọng năm nay không để những bất cẩn nho nhỏ tái diễn!
Không để ý đến thủ tục if typeof ... is chekbox nên bị lỗi. Không muốn nghiên cứu thêm tại sao thuộc tính Type của checkbox trong form Settings lại bị hỏng!
Bản này tôi đã test mấy lỗi vớ vấn ý và ổn rùi cán bộ nhé!
Chúc mừng năm mới, chúc các bạn mạnh khoẻ, nhiệt huyết và có nhiều thành công trong cuộc sống nhé!

levanduyet · 24/5/23

Do paulsteigel không update được, nhờ tôi update. Mọi người xem tập tin đính kèm nhé.

Lê Văn Duyệt

cantl · 24/5/23

levanduyet đã viết:
Do paulsteigel không update được, nhờ tôi update. Mọi người xem tập tin đính kèm nhé.

Lê Văn Duyệt

Phiên bản này chỉ cập nhật Google chặn dịch phiên bản cũ phải không bác. Em vừa test lại phiên bản cũ, đợt trước dịch được, giờ thì không ra kết quả nên em đoán thế.
Các phím tắt không đổi ạ?

*_Henry_* · 24/5/23

paulsteigel đã viết:
Cảm ơn bạn cantl. Tiện đầu năm có tí rảnh rỗi, tôi xem lại và sửa lỗi bạn nói. Hy vọng năm nay không để những bất cẩn nho nhỏ tái diễn!
Không để ý đến thủ tục if typeof ... is chekbox nên bị lỗi. Không muốn nghiên cứu thêm tại sao thuộc tính Type của checkbox trong form Settings lại bị hỏng!
Bản này tôi đã test mấy lỗi vớ vấn ý và ổn rùi cán bộ nhé!
Chúc mừng năm mới, chúc các bạn mạnh khoẻ, nhiệt huyết và có nhiều thành công trong cuộc sống nhé!

cảm ơn đã chia sẻ

paulsteigel · 24/5/23

levanduyet đã viết:
Do paulsteigel không update được, nhờ tôi update. Mọi người xem tập tin đính kèm nhé.

Lê Văn Duyệt

Em cảm ơn cụ Duyệt đã giúp, nhưng mờ em nhờ cụ edit bài 51 hộ em để thay thế 2 file cơ chứ vì em không được quyền edit bài để tiết kiệm tài nguyên cho server. Cuối cùng thì em mới biết cụ cũng giống em, không edit được, kaka! Em thay mặt em, xin củm ơn cụ nhiều nhé.
Về lý do thay thế 2 công cụ này là vì API key đã thay đổi từ service account sang service account mới dùng cloudplatform cho NonProfits (bản cũ là bản thương mại hơi tốn xiền ạ). Đồng thời tôi cũng xử lý phần dịch trong bảng và các đối tượng shape (không xoá shape và gây lỗi dịch trong word nữa)

@cantl: Phiên bản này chỉ cập nhật Google chặn dịch phiên bản cũ phải không bác. Em vừa test lại phiên bản cũ, đợt trước dịch được, giờ thì không ra kết quả nên em đoán thế.
Các phím tắt không đổi ạ?

Đúng thế, có một số thay đổi về Key và một vài sửa đổi nhỏ @cantl ạ. Các phím tắt không thay đổi, bạn cứ theo hướng dẫn ở các bài trước để cài đặt hoặc có thể vào module mdlTranslate để thay thế 2 biến K1, K2 thành như sau:

JavaScript:

Global Const k1 = "AIzaSyCa-L87jxjFD-"
Global Const k2 = "A7ec_fdgZgFGkzdxhkxek"

Tôi đang định chuyển sang tiếp cận này.

Excel VBA Google Translate Function - Syntax Byte

In this article, you will learn how to implement a Google Translate function in Excel VBA. The function will use the Google Cloud Translation API. The API is free for a small amount of usage, after that you will need to pay to use the API but it is relatively inexpensive. More information is...

syntaxbytetutorials.com

Tuy nhiên, vướng là phần tương tác với PowerShell và cài đặt Google Cloud CLI sẽ hơi khó khăn cho người dùng nên tạm thời sẽ vẫn dùng tiếp cận API CloudTranslation của Google. Hiện tại, theo đánh giá thì API Key không tốn kém quá nhiều nên em vẫn chịu được ạ.
Xin cảm ơn các thành viên đã quan tâm.
PS: @OverAC, nhờ Bình xem xét bỏ chế độ tự khoá tính năng Sửa (Edit) bài sau một số thời gian như hiện tại. Vì vô hình chung, nếu sử dụng tính năng này thì sẽ làm tiêu tốn tài nguyên máy chủ hơi nhiều trong khi nhu cầu chỉ là sửa bài cũ và các tư liệu kèm theo.
Trân trọng

Maika8008 · 24/5/23

paulsteigel đã viết:
nhờ Bình xem xét bỏ chế độ tự khoá tính năng Sửa (Edit) bài sau một số thời gian như hiện tại. Vì vô hình chung, nếu sử dụng tính năng này thì sẽ làm tiêu tốn tài nguyên máy chủ hơi nhiều trong khi nhu cầu chỉ là sửa bài cũ và các tư liệu kèm theo.
Trân trọng

Bạn cố phấn đấu lên được 1 cấp nữa thì được edit bài #1

cantl · 24/5/23

Maika8008 đã viết:
Bạn cố phấn đấu lên được 1 cấp nữa thì được edit bài #1

Diễn đàn là nơi chia sẻ, chắc phải thêm món chia sẻ kinh nghiệm bác nhẩy?
_)(#;

HeSanbi · 25/5/23

paulsteigel đã viết:
phần tương tác với PowerShell và cài đặt Google Cloud CLI sẽ hơi khó khăn

Sử dụng google-translate-token trên Github đó bạn, tôi thấy người ta đã đơn giản hóa token và việc dịch rồi, mình lèo lái về VBA thôi.

Ví dụ nằm ở thư viện vscode-google-translate kho github. Hoặc GoogleTranslateFreeApi C#

tvgtyb08 · 15/8/23

levanduyet đã viết:
Do paulsteigel không update được, nhờ tôi update. Mọi người xem tập tin đính kèm nhé.

Lê Văn Duyệt

Em đang dùng 2 tool này nhưng khi mở file Excel nó lên thông báo dòng lệnh.

Có cách nào em tự sửa bỏ cái đó ở máy em đi được ko bác paulsteigel?

Đưa tính năng dịch của Google vào Excel và Word! (1 người xem)

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

Nhi bất hoặc!

File đính kèm

Thành viên mới

Nhi bất hoặc!

|||||||||||||

Nhi bất hoặc!

Thành viên mới

Nhi bất hoặc!

Thành viên tích cực

Nhi bất hoặc!

Thành viên mới

Nhi bất hoặc!

Thành viên mới

Nhi bất hoặc!

Nhi bất hoặc!

Thành viên gạo cội

Nhi bất hoặc!

Thành viên tích cực

Nhi bất hoặc!

Thành viên tích cực

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

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

Thành viên mới

Thành viên hoạt động

Thành viên tích cực

Thành viên chính thức

File đính kèm

Thành viên mới

Thành viên mới

Nhi bất hoặc!

File đính kèm

|||||||||||||

Nhi bất hoặc!

|||||||||||||

Nhi bất hoặc!

|||||||||||||

Nhi bất hoặc!

|||||||||||||

Nhi bất hoặc!

|||||||||||||

Nhi bất hoặc!

Trùm Nhiều Chuyện

Thành viên mới

Thành viên mới

Thành viên mới

Nhi bất hoặc!

File đính kèm

Thành viên mới

File đính kèm

Nhi bất hoặc!

File đính kèm

Nhi bất hoặc!

File đính kèm

!!! Giải thoát !!!

Nhi bất hoặc!

Nhi bất hoặc!

File đính kèm

!!! Giải thoát !!!

File đính kèm

Nhi bất hoặc!

File đính kèm

Hãy để gió cuốn đi.

File đính kèm

!!! Giải thoát !!!

Thành viên mới

Nhi bất hoặc!

Thành viên gạo cội

!!! Giải thoát !!!

Nam Nhân✨Hiếu Lễ Nghĩa Trí Tín✨

Thành viên mới

Thời gian đếm ngược.