※ ChatGPTを利用し、要約された質問です(原文:VBAで文字列を圧縮、復号したい)
VBAで文字列を圧縮、復号したい
このQ&Aのポイント
VBAを使用して、文字列を圧縮し、復号する方法について教えてください。
以下のサイトで紹介されているJavaScriptの方法と同様のことをVBAで実現することは可能でしょうか?
データの復号をする必要があり、エクセルで処理を行いたいと考えています。Base64で圧縮された文字列を正しく復号する方法をVBAで実現したいです。
以下のサイトと同じことをVBAで実現できないでしょうか?
JavaScriptで文字列を圧縮する
https://setchi.hatenablog.com/entry/2013/11/09/114432
元の文字列:エクセル
圧縮された文字列:U3U1VrUwUnW0UIUy3KAMJycww1jV0QkA
復号された文字列:エクセル
データの復号をすることになり、エクセルで処理を行いたいと思ってます、データは圧縮された文字列Base64のようで、サイトなどで調べVBAでBase64の復号を試しましたが正しく文字列にならず、上記のサイトで試したところ正常な文字列に復号されました。これをなんとかVBAで実現したいと思っとおります、何卒、ご教授お願いします。
お礼
早速のアドバイスありがとうございます、アドバイスのように「VBA deflate inflate」でネット検索し複数のサイトから「base64文字列→Byte配列へ変換」「inflateで解凍→Byte配列」「Byte配列→文字列化」のコーディング例を探し実装したところ、望みどうりの文字列に復号することができました、ありがとうございました。