Musste ich mir erstellen. Vielleicht braucht es der ein oder andere ja mal.
Spoiler anzeigen
Func utf($code)
Local $Array[196][2]=[['\u0021','!'],['\u0022','""'],['\u0023','#'],['\u0024','$'],['\u0025','%'], _
['\u0026','&'],['\u0027',"'"],['\u0028','('],['\u0029',')'],['\u002a','*'],['\u002b','+'], _
['\u002c',','],['\u002d','-'],['\u002e','.'],['\u002f','/'],['\u0030','0'],['\u0031','1'], _
['\u0032','2'],['\u0033','3'],['\u0034','4'],['\u0035','5'],['\u0036','6'],['\u0037','7'], _
['\u0038','8'],['\u0039','9'],['\u003a',':'],['\u003b',';'],['\u003c','<'],['\u003d','='], _
['\u003e','>'],['\u003f','?'],['\u0040','@'],['\u0041','a'],['\u0042','b'],['\u0043','c'], _
['\u0044','d'],['\u0045','e'],['\u0046','f'],['\u0047','G'],['\u0048','H'],['\u0049','I'], _
['\u004a','J'],['\u004b','K'],['\u004c','L'],['\u004d','M'],['\u004e','N'],['\u004f','O'], _
['\u0050','P'],['\u0051','Q'],['\u0052','R'],['\u0053','S'],['\u0054','T'],['\u0055','U'], _
['\u0056','V'],['\u0057','W'],['\u0058','X'],['\u0059','Y'],['\u005a','Z'],['\u005b','['], _
['\u005c','\'],['\u005d','],'],['\u005e','^'],['\u005f','_'],['\u0060','`'],['\u0061','a'], _
['\u0062','b'],['\u0063','c'],['\u0064','d'],['\u0065','e'],['\u0066','f'],['\u0067','g'], _
['\u0068','h'],['\u0069','i'],['\u006a','j'],['\u006b','k'],['\u006c','l'],['\u006d','m'], _
['\u006e','n'],['\u006f','o'],['\u0070','p'],['\u0071','q'],['\u0072','r'],['\u0073','s'], _
['\u0074','t'],['\u0075','u'],['\u0076','v'],['\u0077','w'],['\u0078','x'],['\u0079','y'], _
['\u007a','z'],['\u007b','{'],['\u007c','|'],['\u007d','}'],['\u007e','~'],['\u00a1','¡'], _
['\u00a2','¢'],['\u00a3','£'],['\u00a4','¤'],['\u00a5','¥'],['\u00a6','¦'],['\u00a7','§'], _
['\u00a8','¨'],['\u00a9','©'],['\u00aa','ª'],['\u00ab','«'],['\u00ac','¬'],['\u00ae','®'], _
['\u00af','¯'],['\u00b0','°'],['\u00b1','±'],['\u00b2','²'],['\u00b3','³'],['\u00b4','´'], _
['\u00b5','µ'],['\u00b6','¶'],['\u00b7','·'],['\u00b8','¸'],['\u00b9','¹'],['\u00ba','º'], _
['\u00bb','»'],['\u00bc','¼'],['\u00bd','½'],['\u00be','¾'],['\u00bf','¿'],['\u00c0','À'], _
['\u00c1','Á'],['\u00c2','Â'],['\u00c3','Ã'],['\u00c4','Ä'],['\u00c5','Å'],['\u00c6','Æ'], _
['\u00c7','Ç'],['\u00c8','È'],['\u00c9','É'],['\u00ca','Ê'],['\u00cb','Ë'],['\u00cc','Ì'], _
['\u00cd','Í'],['\u00ce','Î'],['\u00cf','Ï'],['\u00d0','Ð'],['\u00d1','Ñ'],['\u00d2','Ò'], _
['\u00d3','Ó'],['\u00d4','Ô'],['\u00d5','Õ'],['\u00d6','Ö'],['\u00d7','×'],['\u00d8','Ø'], _
['\u00d9','Ù'],['\u00da','Ú'],['\u00db','Û'],['\u00dc','Ü'],['\u00dd','Ý'],['\u00de','Þ'], _
['\u00df','ß'],['\u00e0','à'],['\u00e1','á'],['\u00e2','â'],['\u00e3','ã'],['\u00e4','ä'], _
['\u00e5','å'],['\u00e6','æ'],['\u00e7','ç'],['\u00e8','è'],['\u00e9','é'],['\u00ea','ê'], _
['\u00eb','ë'],['\u00ec','ì'],['\u00ed','í'],['\u00ee','î'],['\u00ef','ï'],['\u00f0','ð'], _
['\u00f1','ñ'],['\u00f2','ò'],['\u00f3','ó'],['\u00f4','ô'],['\u00f5','õ'],['\u00f6','ö'], _
['\u00f7','÷'],['\u00f8','ø'],['\u00f9','ù'],['\u00fa','ú'],['\u00fb','û'],['\u00fc','ü'], _
['\u00fd','ý'],['\u00fe','þ'],['\u00ff','ÿ'],['\r\n',''],['\/','/'],['\"','"'],['%22','"'], _
['"','"'],[''',"'"],['&','&'],['max-width:480px','width="50" height="50"']]
For $i = 0 to UBound($Array) -1
$code = StringReplace($code, $Array[$i][0], $Array[$i][1])
Next
Return $code
EndFunc