アクセスしたHPにクリップボード経由で値をコピー貼り付けを以下の様なスクリプトで実行しています。

コピー貼り付けをする値にエンコードが必要な文字（"&","<","?","^","@"な特殊な文字）が入った値のときは旨く値がクリップボードにコピーされません（途中までのコピーだったり全くコピーされなかったり）。

特殊な文字を含まない場合は、コピー貼り付けは旨くいくます。

どなたか、アドバイスかヒントを頂けるとありがたいです。

試行錯誤していますが、旨くいっていません。

--------------------------

On Error Goto Timewaite
    
    Dim WshShell
    
    
    
    'インターネットエクスプローラーのオブジェクトを作成
    
    
    Set WshShell = CreateObject("WScript.Shell")    
    
    WshShell.Run ("chrome.exe -url " & "送り先のURL")
    
    
    
    '[フールド　A]をクリップボードにコピー
    
    Call CreateObject("Wscript.Shell").Run("%COMSPEC% /c echo " & txtＡ & "| clip",0)
    
    Sleep 0.1
    
Header:    
    
    Activateapp "開いたページのTitle"
    
    Sleep 0.1
    
    
    keybd_event 17,0,0,0  ' Ctrl key down
    keybd_event 86,0,0,0 ' A down
    keybd_event 86,0,2,0 ' A up
    keybd_event 17,0,2,0 ' Ctrl key up
    
    Sleep 0.1
    
    Call CreateObject("Wscript.Shell").Run("%COMSPEC% /c echo off | clip",0)
    
    Sleep 0.1
    
    keybd_event 9,0,0,0 ' TAB down
    keybd_event 9,0,2,0 ' TAB down
    
    Sleep 0.1
    
    Call CreateObject("Wscript.Shell").Run("%COMSPEC% /c  echo " & txtB & "| clip",0)
    
    Sleep 0.1
    
    keybd_event 17,0,0,0 ' Ctrl key down
    keybd_event 86,0,0,0 ' A down
    keybd_event 86,0,2,0 ' A up
    keybd_event 17,0,2,0 ' Ctrl key up
    
    Sleep 0.1
    
    Call CreateObject("Wscript.Shell").Run("%COMSPEC% /c echo off | clip",0)
    
    Sleep 0.1
    
    keybd_event 9,0,0,0 ' TAB down
    keybd_event 9,0,2,0 ' TAB up
    keybd_event 9,0,0,0 ' TAB down
    keybd_event 9,0,2,0 ' TAB up
    
    
    Sleep 0.1
    keybd_event 13,0,0,0 ' Enter down
    keybd_event 13,0,2,0 ' Enter down

 

--------------------------