[omegastripes]

после этой команды в скрипте желательно поставить небольшую паузу, если данные буфера обмена требуется использовать незамедлительно. »

Можно вызвать метод Run с аргументом <WaitOnReturn> = True для ожидания выполнения команды.
Код

... wsh.Run "cmd.exe /C <nul set /p ""="&dataclip &""" | CLIP", False ...»

изменить вот так:

Код:

wsh.Run "cmd.exe /C <nul set /p ""="&dataclip &""" | CLIP", 0, True

Код

Код: CreateObject("WScript.Shell").Run "mshta.exe ""javascript:clipboardData.setData('text','" & StrTextToCB & "');close();""", 2 »

соответственно:

Код:

CreateObject("WScript.Shell").Run "mshta.exe ""javascript:clipboardData.setData('text','" & StrTextToCB & "');close();""", 0, True