まことさん、こんにちは。

＞ユーザオブジェクトに関してはカスタムで作成しており、
＞Ｗに貼り付けようとすると「クラス定義の為、ウインドウ上に配置できません」といわれる状態です。
＞
＞そこで、関数のみを作成して実行してみたところ・・
＞動きました。！(^^)
＞
＞しかし、元データが\"5\"くらいならいいんですが、 do ? loop until を使って、\"5#8<@Fg}\"を対象に
＞した場合、５分たっても終了しませんでした。（結局、強制終了させました）
＞
＞といった状況です。
＞とりあえずは変換されたという事で・・

すみません。ループ脱出条件がまずいようです。
blobmid関数は取り出すデータが無い場合は、空のblobを返し、これは
nullではないようです。
そこでデータ無しのチェックのblob変数を定義して(スクリプト作った
時に想定していたようで、->昨日のことなのに、もう忘れている ^_^;
end_chekという変数を定義してました)、スクリプトを下記のように変
更してください。

get_blob = blobmid(terget_blob, blob_count, 1)
    if end_check = get_blob then <----(条件変更)
    else
-------------------
    blob_count ++
    end if
loop until end_check = get_blob<----(条件変更)

200byte程度の変換をテストしてみましたが、OKでした。
この変換ロジックも、汎用関数としてリリースしたいと思います。(^o^)/
(他に使う人がいるのだろうか?)