The macro
Imports System

Public Class ClipboardFusionHelper

Public Shared Function ProcessText(text As String) As String
text = BFS.Clipboard.CopyText
text = text.ToUpper
BFS.Dialog.ShowMessageInfo(text) 'for debug
BFS.Clipboard.PasteText(text)
Return text
End Function

End Class

The HotKeys is Ctrl+Win+Up

if I select string as "jksfjdkfgjkdjgk kflsdkfslklsfklsl", the result is empty

So, CopyText doesn't work stable. If I Select a plain text (without space) and Push HotKes once, twice or more times, in same times еоу result is empty.

Thank you, All is working correctly.