Short script found somewhere on the Internet for encoding URL in VBA: