Excel có thể giải mã Base64 không?

Ok, tôi đã thử mã Groovy và tôi nhận được một tệp excel với kết quả của dòng này trong mã Groovy tại đây.  

giải mã def = phản hồi2. giải mãBase64()

vui lòng xem ảnh chụp màn hình tệp excel đính kèm

trên ảnh chụp màn hình khác, tôi hiển thị chuỗi được mã hóa mà tôi cần giải mã và đó là nội dung của reponse2 trong dòng mã ở trên.  

Nó có thể được kiểm tra, chọn một ô từ cột "B. B", trong đó một chuỗi được mã hóa đã được trả về bởi mã trước đó và chạy thử nghiệm tiếp theo Sub

Sub testDecodeBase64()
  Debug.Print StrConv(DecodeBase64(ActiveCell.Value), vbUnicode)
End Sub

Nếu việc tạo tham chiếu có vẻ phức tạp, vui lòng trước khi chạy mã trên, hãy chạy mã tiếp theo để tạo tự động

A

AlexanderBB

Thành viên nổi tiếng

JoinedJul 1, 2009Messages1,804Phiên bản Office

  1. 2019
  2. 2016
Nền tảng
  1. các cửa sổ

  • Ngày 23 tháng 1 năm 2022
  • #1

Tôi cần trích xuất tệp đính kèm văn bản từ thư đến trong Thunderbird. Nó sẽ không làm điều này như một hoạt động hàng loạt. Tôi đã tạo một thói quen VBA lấy phần được mã hóa Base64 và chuyển nó tới

Mã VBA.

Function DecodeBase64(b64$)
    Dim b
    With CreateObject("Microsoft.XMLDOM").createElement("b64")
        .DataType = "bin.base64": .Text = b64
        b = .nodeTypedValue
        With CreateObject("ADODB.Stream")
            .Open: .Type = 1: .Write b: .Position = 0: .Type = 2: .Charset = "utf-8"
            DecodeBase64 = .ReadText
            .Close
        End With
    End With
End Function

But about 1 in 10 fail with error -2147024809. "The Parameter is incorrect".
However if I load the pattern into Base64 Decode and Encode - Online it decodes correctly. The pattern is:

NjM0QF4xOTQ2XkBeQmlsbGJvYXJkXkBeU000Nl8wMjBeQF5TTTQ2XzAxOF5AXjIxXkBeOV5A
XjEyXkBeMV5AXjJeQEBeVW5kZXIgVGhlIFdpbGxvdyBUcmVlXkBAXkJpbGx5IFJlaWReQEBA
QEBeXkBAQEBAXk1hY21lbG9kaWVzIEx0ZF5AMiwxMSwxOTQ1IDA6MDA6MDBANCwxLDE5NDYg
MDowMDowMEAyMiwzLDE5NDYgMDowMDowMEBeMTMsMTYsMTUsMTEsNyw1LDUsNSw1LDIsNCwz
LDUsNiw1LDgsMTEsMTIsMTQsMTQsMjBeQF4xNl5AXjE1XkBeMTFeQF43XkBeNV5AXjVeQF41
XkBeNV5AXjJeQF40XkBeM15AXjVeQF42XkBeNV5AXjheQF4xMV5AXjEyXkBeMTReQF4xNF5A
XjIwXkBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBA
QEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBA
QEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBAQEBeMTNeQDBAQEBAQF4xM15AQEBeM15AQEBeYSkg
RG9yb3RoeSBTcXVpcmVzICAoUGFybG9waG9uZaBGIDIxMDEpCmIpIEhhcnJ5IFJveSAgKFBh
cmxvcGhvbmWgRiAyMTA3KQpjKSBCaWxseSBDb3R0b24gIChSZXggMTAyMjkpXkBANjM2QDIw
QF5TaGVldE11c2ljXkBeMF5AXjBeQF4wXkBeMF5AMQ0K

Does anyone know what the problem might be ?

 

Hãy thử ứng dụng miễn phí của chúng tôi để chuyển đổi tài liệu của bạn trong vài giây. Chuyển đổi các tệp BASE64 sang EXCEL mà ngay cả người mới bắt đầu cũng có thể xử lý. Không cần cài đặt phần mềm máy tính để bàn như Microsoft Word, OpenOffice hoặc Adobe Acrobat. Tất cả các chuyển đổi bạn có thể thực hiện trực tuyến từ bất kỳ nền tảng nào. Windows, Linux, macOS và Android. Cho dù bạn đang sử dụng PC hay thiết bị di động cầm tay, bộ chuyển đổi BASE64 luôn có sẵn trực tuyến để thuận tiện cho bạn. Công cụ của chúng tôi hoạt động mà không cần đăng ký và hình ảnh xác thực và miễn phí

Chuyển đổi trực tuyến nhanh chóng và đơn giản

Bạn đã quét tài liệu của mình và muốn chỉnh sửa nó ở định dạng EXCEL ngay bây giờ?

Chuyển đổi tài liệu của bạn trong hai lần nhấp chuột. Nó rất đơn giản và hoạt động trong vài giây. Chọn tệp bạn cần và nhấp vào nút 'Chuyển đổi'. Đó là tất cả. Tải xuống

Chuyển đổi là an toàn

Máy chủ của chúng tôi không lưu trữ thông tin của bạn và không lưu trữ dữ liệu của bạn trong một tệp. nếu bạn không xóa các tài liệu đã tải lên ngay lập tức, nó sẽ tự động xảy ra sau 24 giờ. Vì vậy, bạn có thể yên tâm khi biết rằng tài liệu và quyền riêng tư của mình được bảo vệ. Chúng tôi sẽ không chia sẻ hoặc chia sẻ bất kỳ dữ liệu nào của bạn với các bên khác

Chuyển đổi BASE64 phổ biến nhất

Chọn từ hơn 48 định dạng có sẵn để tạo tài liệu chuyển đổi của bạn

Bạn cũng có thể chuyển đổi sang nhiều định dạng có sẵn khác. Chuyển đổi sang EXCEL chỉ là một trong những định dạng được hỗ trợ. Hãy thử trình chuyển đổi BASE64 của chúng tôi sang các định dạng phổ biến

Base64 là một thuật ngữ chung cho một số lược đồ mã hóa tương tự mã hóa dữ liệu nhị phân bằng cách xử lý dữ liệu đó bằng số và dịch nó thành biểu diễn cơ sở 64. Thuật ngữ Base64 bắt nguồn từ mã hóa chuyển nội dung MIME cụ thể

Ví dụ Excel để mã hóa và giải mã base-64 một chuỗi

Dim bd As Chilkat.BinData
Set bd = Chilkat.NewBinData


s = "A friend called me up the other day and talked about investing in a dot-com that sells lobsters. Internet lobsters. Where will this end? --Donald Trump"


success = bd.AppendString(s,"utf-8")


strBase64 = bd.GetEncoded("base64")
Debug.Print strBase64

' To decode:
Dim bd2 As Chilkat.BinData
Set bd2 = Chilkat.NewBinData
success = bd2.AppendEncoded(strBase64,"base64")


decoded = bd2.GetString("utf-8")
Debug.Print decoded

Chúng tôi có thể chuyển đổi Excel sang Base64 không?

❓ Làm cách nào tôi có thể chuyển đổi tệp Excel sang BASE64? . kéo và thả hoặc nhấp vào bên trong vùng màu trắng. you need to add a file for conversion: drag & drop or click inside the white area. Sau đó nhấp vào nút 'Chuyển đổi' . Khi quá trình chuyển đổi hoàn tất, bạn có thể tải xuống kết quả của mình.

Có thể giải mã Base64 không?

Base64 không phải là mã hóa . Mặc dù có thể làm xáo trộn dữ liệu thực tế từ những người lướt web, nhưng bất kỳ ai có quyền truy cập vào dữ liệu được mã hóa base64 đều có thể dễ dàng giải mã dữ liệu đó .

Làm cách nào để chuyển đổi Base64 sang XLSX?

Cách chuyển đổi BASE64 .
#01. Nhập trang web PDF. Mở trang web BASE64 miễn phí và chọn Chuyển đổi ứng dụng
#02. Tải tệp lên. Nhấp vào bên trong khu vực thả để tải lên hoặc kéo và thả tệp
#03. giới hạn nhỏ. .
#04. Khởi chạy chuyển đổi. .
#05. Nhận kết quả
#06. tùy chọn email. .
#07. Hãy cẩn thận về việc lưu trữ kết quả

Làm cách nào để chuyển đổi Base64 sang CSV?

Đầu vào (Base64) - Dán Base64 của bạn vào đây. Tải lên Tải xuống Chuyển đổi Sao chép vào Clipboard là Tự động. Đầu ra (CSV) - CSV đã chuyển đổi. .
Dán đầu vào Base64 của bạn vào hộp nhập liệu bên trái và nó sẽ tự động chuyển đổi nó thành CSV
Đầu ra CSV là hộp bên phải