Hiện tại không có chức năng riêng trong Excel hoặc VBA để mã hóa và giải mã văn bản Base64, mặc dù đây là một yêu cầu phổ biến. Điều này sẽ đảm bảo rằng dữ liệu được vận chuyển mà không bị thay đổi theo bất kỳ cách nào. Trong bài viết này, chúng tôi sẽ trình bày các ví dụ khác nhau để giải mã Base64 trong Excel
Mục lục ẩn
Tải sách bài tập thực hành
Base64 là gì?
2 ví dụ khác nhau để giải mã Base64 trong Excel
1. Áp dụng Mã VBA Excel cho Chuỗi giải mã HTML
2. Tạo hàm do người dùng xác định trong Excel để giải mã Base64
Cách mã hóa Base64 trong Excel
Những điều cần ghi nhớ
Sự kết luận
Tải sách bài tập thực hành
Bạn có thể tải sách bài tập về và thực hành với chúng
Giải mã Base64. xlsm
Base64 là gì?
Dữ liệu nhị phân được dịch sang định dạng văn bản ASCII bằng phương pháp mã hóa và giải mã Base64. 6 bit dữ liệu chính xác được cấu thành bởi các chữ số Base64. Do đó, các chữ số 4, 6 bit có thể chứa 3, byte 8 bit [3*8=24]. Bạn có thể khá chắc chắn rằng dữ liệu sẽ đến ở phía bên kia của dây mà không bị hỏng vì thông thường bạn có thể tin tưởng vào 64 ký tự giống nhau có trong nhiều bộ ký tự
Dữ liệu nhị phân có thể được biểu diễn trong chuỗi ASCII bằng Base64. Hành động chuyển đổi một biểu diễn base64 của một chuỗi văn bản trông lạ trở lại thành dữ liệu văn bản hoặc nhị phân ban đầu được gọi là “giải mã base64. ”
2 ví dụ khác nhau để giải mã Base64 trong Excel
Một tập lệnh La Mã bao gồm các chữ cái, số, dấu cộng và dấu gạch chéo có thể được tạo bằng kỹ thuật mã hóa Base64. Nó cho phép bạn chuyển đổi ảnh, biểu tượng cảm xúc và thậm chí cả ký tự tiếng Trung thành văn bản “có thể đọc được” để có thể lưu trữ hoặc gửi đi nơi khác. Hãy xem các ví dụ để giải mã Base64 trong Excel
1. Áp dụng Mã VBA Excel cho Chuỗi giải mã HTML
Khả năng kết hợp các tệp ảnh hoặc thậm chí các tài nguyên nhị phân khác vào các tài nguyên văn bản như tệp HTML và CSS khiến Base64 trở nên đặc biệt phổ biến trên World Wide Web
CÁC BƯỚC
- Đầu tiên, hãy chuyển đến tab Nhà phát triển từ dải băng
- Thứ hai, nhấp vào Visual Basic từ danh mục Mã để mở Trình chỉnh sửa Visual Basic. Hoặc nhấn ALT+F11 để mở Visual Basic Editor
- Điều này sẽ xuất hiện trong Visual Basic Editor nơi chúng tôi viết mã của mình
- Thứ ba, nhấp vào Mô-đun từ thanh menu thả xuống Chèn
- Thao tác này sẽ tạo một Mô-đun trong sổ làm việc của bạn
- Và, sao chép và dán mã VBA được hiển thị bên dưới
Mã VBA
Public Function HtmlDecode[StringToDecode As Variant] As String
Set HFile = CreateObject["htmlfile"]
Set a = HFile.createElement["T"]
a.innerHTML = StringToDecode
HtmlDecode = a.innerText
End Function
- Hơn nữa, nhấn CTRL + S để lưu tệp
- Bây giờ, quay lại trang tính Excel và chèn công thức vào ô đã chọn nơi bạn muốn giải mã văn bản của mình
=HtmlDecode[B5]
- Sau đó, nhấn phím Enter từ bàn phím của bạn
- Kéo biểu tượng Fill Handle xuống để sao chép công thức trên phạm vi. Hoặc, để Tự động điền phạm vi, nhấp đúp vào biểu tượng dấu cộng [+]
- Cuối cùng, bạn sẽ thấy kết quả
2. Tạo hàm do người dùng xác định trong Excel để giải mã Base64
Hãy xem một ví dụ khác để giải mã Base64 trong Excel VBA
CÁC BƯỚC
- Tương tự như vậy, trong Ví dụ-1, chuyển đến tab Nhà phát triển > Visual Basic > Chèn > Mô-đun
- Sau đó, sao chép và dán mã VBA bên dưới
Mã VBA
Function Decoding[b64$]
Dim i
With CreateObject["Microsoft.XMLDOM"].createElement["b64"]
.DataType = "bin.base64": .Text = b64
i = .nodeTypedValue
With CreateObject["ADODB.Stream"]
.Open: .Type = 1: .Write i: .Position = 0: .Type = 2: .Charset = "utf-8"
Decoding = .ReadText
.Close
End With
End With
End Function
- Để lưu tệp, nhấn CTRL + S
- Quay lại trang tính Excel ngay bây giờ và đặt công thức vào ô chứa văn bản bạn muốn giải mã
=Decoding[B5]
- Hơn nữa, nhấn phím Enter
LƯU Ý. Khi kết thúc chức năng Base64, dấu bằng “=” biểu thị phần đệm. Tất cả các bit thường được mã hóa và kích thước tính bằng byte được chia cho ba [bit chia hết cho 24].
- Để sao chép công thức trong phạm vi, hãy kéo biểu tượng Fill Handle xuống dưới. Ngoài ra, bạn có thể nhấp đúp vào dấu cộng [+] để Tự động điền phạm vi
- Cuối cùng, bạn có thể xem kết quả
Cách mã hóa Base64 trong Excel
Mã hóa chủ yếu là chuyển đổi dữ liệu thành định dạng mà chúng tôi cần cho các yêu cầu xử lý thông tin khác nhau. Hãy xem cách chúng tôi có thể mã hóa base64 trong Excel
CÁC BƯỚC
- Để bắt đầu, hãy nhấp vào tab Nhà phát triển trên ruy-băng
- Thứ hai, khởi chạy Visual Basic Editor bằng cách nhấp vào Visual Basic
- Ngoài ra, bạn có thể truy cập Visual Basic Editor bằng cách nhấn ALT+F11
- Hoặc, nhấp chuột phải vào trang tính và chọn Xem mã từ menu
- Tiếp theo, chọn Mô-đun từ hộp thả xuống bên dưới Chèn
- Và cửa sổ visual basic sẽ hiện ra
- Viết mã ở đó
Mã VBA
Function Encoding[text$]
Dim i
With CreateObject["ADODB.Stream"]
.Open: .Type = 2: .Charset = "utf-8"
.WriteText text: .Position = 0: .Type = 1: i = .Read
With CreateObject["Microsoft.XMLDOM"].createElement["b64"]
.DataType = "bin.base64": .nodeTypedValue = i
Encoding = Replace[Mid[.text, 5], vbLf, ""]
End With
.Close
End With
End Function
- Lưu tệp bằng cách nhấn CTRL+S trên bàn phím của bạn
- Hơn nữa, quay lại trang tính và chèn công thức sau vào đó
=Encoding[B5]
- Do đó, nhấn phím Enter
- Sau đó, kéo biểu tượng Fill Handle để sao chép công thức trên phạm vi. Hoặc, nhấp đúp vào dấu cộng [+]. Điều này cũng nhân đôi công thức
- Và đó là nó. Bạn sẽ nhận được kết quả của bạn
Những điều cần ghi nhớ
- Bạn nên bắt đầu bằng cách xóa mọi ký tự đệm khỏi phần cuối của chuỗi được mã hóa. Sau đó, bạn chuyển đổi từng ký tự base64 trở lại thành nhị phân 6 bit tương đương. Để chuyển đổi dữ liệu về định dạng ban đầu, trước tiên bạn phải chia các bit thành các khối có kích thước byte [8 bit]
- Trong khi sử dụng mã VBA, đảm bảo bạn lưu tệp của mình với. phần mở rộng xlsm
Sự kết luận
Các ví dụ trên sẽ hỗ trợ bạn giải mã Base64 trong Excel. Hy vọng điều này sẽ giúp bạn. Vui lòng cho chúng tôi biết trong phần nhận xét nếu bạn có bất kỳ câu hỏi, đề xuất hoặc phản hồi nào. Hoặc bạn có thể lướt qua các bài viết khác của chúng tôi trong ExcelDemy. blog com