Encode/Decode a byte array to/from Base64 format

**jeff_123** · 05-29-2014, 07:30 AM

Hi
I am trying to make an encode/decode function to use in excel from base64 to array of bytes
I want to put string encoded in base64 in cell1 and get result in cell2 with decoded array of bytes and vice versa
i find some codes
http://www.nonhostile.com/howto-enco...base64-vb6.asp
and a code here
https://stackoverflow.com/questions/...sing-excel-vba

using the code above to convert A1
A1 = a03060fa564665
ENCODEBASE64(A1) -> YTAzMDYwZmE1NjQ2NjU= (which is correct result for string "a03060fa564665" not the array of bytes)
while correct result i need is oDBg+lZGZQ==

i know the issue is converting string to array of bytes but i couldn't fix it myself

example
if cell1= a03060fa564665
result1= oDBg+lZGZQ==
if cell2= oDBgm1BGaQ==
result2= a030609b504669

any help please
thanks in advance

**jeff_123** · 05-31-2014, 04:54 AM

i find one code to encode and decode base64

Please Login or Register  to view this content.

and i managed to make the function to decode base64 to give me array of bytes

Please Login or Register  to view this content.

now if cell2 = oDBgm1BGaQ==
i get result2= A030609B504669

but now am facing problem writing the reverse function to convert array of bytes to base64 string
if cell1= a03060fa564665
result1= oDBg+lZGZQ==
any idea please