Паттерн поиска пробелов между буквами.

StringRegExpReplace($text, '[a-zA-ZА-Яа-я-ё]' & ' ' & '[a-zA-ZА-Яа-я-ё]', '')

StringStripWS()

$Text = 'Т е с т t e s t'
$Pattern = '\s'
$Rez = StringRegExpReplace($Text, $Pattern, '')
ConsoleWrite($Rez&@LF)

;#######################

$Text = 'Т е с т t e s t'
$Pattern = '\s'
$aRez = StringRegExp($Text, $Pattern, 3)
ConsoleWrite('Всего найдено '&UBound($aRez)&' пробелов'&@LF)

;#######################

$Text = 'Т е с т t e s t'
ConsoleWrite(StringStripWS($Text, 8)&@LF)

$sString = 'f d x ф ы ё' & @TAB & 'Ё я, цю .' & @CRLF & 'a s, o. (0, 3 ), f d x ф ы ё Ё я, цю .'

$sString = StringRegExpReplace($sString, '(?s)(?<=[A-Za-zЁёА-Яа-я])\h+(?=[A-Za-zЁёА-Яа-я])', '')
ConsoleWrite($sString & @LF)

$sText = 'Т е с т t e s t Т е с т t e s t Т е с т t e s t'
$sText=StringRegExpReplace($sText, '(?i)(?<=[A-Z]) (?=[A-Z])|(?<=[А-яЁё]) (?=[А-яЁё])', '')
MsgBox(0, 'Сообщение', $sText)