日本語をURLエンコードする、よく使うサブルーチンライブラリ
URLのオプションにURLを含ませる場合 URL をエンコードして送ることがよくあります。
そのURLをエンコードするサブルーチン。
日本語をURLエンコードする関数
書式 Function UrlEncode(mySource As Variant) As String
‘mySource : 対象URL
使用例
Dim url , eurl
url = "https://vba.yuzumaru.co.jp/"
eurl = StrUrl.UrlEncode(url )
結果
eurl "https%3A%2F%2Fvba.yuzumaru.co.jp%2F"