Разделить Текст

$sString = 'Фамилия:ИВАНОВ, Имя:  Сергей, Отчество:    Юрьевич.'

$sF = StringRegExpReplace($sString, '(?s).*?\QФамилия:\E\s*(.*?)(,|\.).*', '\1')
$sI = StringRegExpReplace($sString, '(?s).*?\QИмя:\E\s*(.*?)(,|\.).*', '\1')
$sO = StringRegExpReplace($sString, '(?s).*?\QОтчество:\E\s*(.*?)(,|\.).*', '\1')

MsgBox(0, '', $sF & @LF & $sI & @LF & $sO)

$sString = 'Фамилия:ИВАНОВ, Имя:  Сергей, Отчество:    Юрьевич.'

$aString = StringRegExp($sString, ':\s*(.*?)(?:,|\.)', 3)
If IsArray($aString) And UBound($aString) = 3 Then
	$sF = $aString[0]
	$sI = $aString[1]
	$sO = $aString[2]
	MsgBox(0, '', $sF & @LF & $sI & @LF & $sO)
EndIf

#include <array.au3>
$s = 'Фамилия:ИВАНОВ, Имя:  Сергей, Отчество:    Юрьевич.'
$pat = 'Фамилия:\s*(.+),\s*Имя:\s*(.+),\s*Отчество:\s*(.+)\.'
$a = StringRegExp($s, $pat, 1)
$F = $a[0]
$I = $a[1]
$O = $a[2]
;_ArrayDisplay($a)
MsgBox(64, 'ФИО', $F & ' ' & $I & ' ' & $O)

$sI = StringRegExpReplace($sString, '(?s).*?\QИмя:\E\s*(.*?)(,|\.).*', '\1')

$s = 'Фамилия:ИВАНОВ, Имя:  Сергей, Отчество:    Юрьевич.'

$sPattern="[А-Яа-я\w]+"

$a = StringRegExp($s, $sPattern,3)
$F = $a[1]
$I = $a[3]
$O = $a[5]
MsgBox(64, 'ФИО', $F & ' ' & $I & ' ' & $O)

$F1 = йкцукфыова ;Начало "фыаыуц", конец "рдлорсмяд"
$F2 = кщшгпам ; Начало: "фщшуцн"  до "шщнысвщн"
$F3 = гразщыфвгшзшщоячсдорм ;
$...

$string = 'В этой строке мы будем искать слово между "мы " и " искать".'
$start = 'мы '
$end = ' искать'
$sPattern = '(?s).*?\Q' & $start & '\E(.*?)\Q' & $end & '\E.*'
;$sPattern = '(?s).*?' & $start & '(.*?)' & $end & '?.*'
$source = StringRegExpReplace($string, $sPattern, '\1')
MsgBox(0, 'Найдено:', $source)

$s = 'Фамилия:ИВАНОВ, Имя:  Сергей, Отчество:    Юрьевич.'

;$sFind="Фамилия"
;$sFind="Имя"
$sFind="Отчество"

$sPattern=".*" & $sFind & ".+?([А-Яа-я\w]+).*"
$sRezult=StringRegExpReplace($s, $sPattern, "\1",1)
MsgBox(64, $sFind, $sRezult)

$sRezult=StringRegExpReplace($txt, ".+?аыуц(.+)рдлорсм.+", "\1",1)
MsgBox(64, "", $sRezult)

WinActivate("Microsoft Excel - ") ;Переходим В Microsoft Excel
Sleep(180)
Send("^{SPACE}") ;Выделяем строку на которой находится курсор
Sleep(180)
Send("^{INSERT}") ;Копируем
Sleep(333)
$DATA = ClipGet()
; $DATA = "Ячейка1	Ячейка2	Ячейка3	Ячейка4	Ячейка5	Ячейка6	Ячейка7	Ячейка8	Ячейка9	Ячейка10	Ячейка11	Ячейка12	Ячейка13	Ячейка14	Ячейка15	Ячейка16	Ячейка17	Ячейка18	Ячейка19	Ячейка20	Ячейка21	Ячейка22	Ячейка23	Ячейка24	Ячейка25	Ячейка26	Ячейка27	Ячейка28	Ячейка29	Ячейка30	Ячейка31	Ячейка32	Ячейка33	Ячейка34	Ячейка35	Ячейка36	Ячейка37	Ячейка38	Ячейка39	Ячейка40	Ячейка41	Ячейка42	Ячейка43	Ячейка44	Ячейка45	Ячейка46	Ячейка47	Ячейка48	Ячейка49	Ячейка50	Ячейка51	Ячейка52	Ячейка53	Ячейка54	Ячейка55	Ячейка56	Ячейка57	Ячейка58	Ячейка59	Ячейка60	Ячейка61	Ячейка62	Ячейка63	Ячейка64	Ячейка65	Ячейка66	Ячейка67	Ячейка68	Ячейка69	Ячейка70	Ячейка71	Ячейка72	Ячейка73	Ячейка74	Ячейка75	Ячейка76	Ячейка77	Ячейка78	Ячейка79	Ячейка80	Ячейка81	Ячейка82	Ячейка83	Ячейка84	Ячейка85	Ячейка86	Ячейка87	Ячейка88	Ячейка89	Ячейка90	Ячейка91	Ячейка92	Ячейка93	Ячейка94	Ячейка95	Ячейка96	Ячейка97	Ячейка98	Ячейка99	Ячейка100	Ячейка101	Ячейка102	Ячейка103	Ячейка104	Ячейка105	Ячейка106	Ячейка107	Ячейка108	Ячейка109	Ячейка110	Ячейка111	Ячейка112	Ячейка113	Ячейка114	Ячейка115	Ячейка116	Ячейка117	Ячейка118	Ячейка119	Ячейка120	Ячейка121	Ячейка122	Ячейка123	Ячейка124	Ячейка125	Ячейка126	Ячейка127	Ячейка128	Ячейка129	Ячейка130	Ячейка131	Ячейка132	Ячейка133	Ячейка134	Ячейка135	Ячейка136	Ячейка137	Ячейка138	Ячейка139	Ячейка140	Ячейка141	Ячейка142	Ячейка143	Ячейка144	Ячейка145	Ячейка146	Ячейка147	Ячейка148	Ячейка149	Ячейка150	Ячейка151	Ячейка152	Ячейка153	Ячейка154	Ячейка155	Ячейка156	Ячейка157	Ячейка158	Ячейка159	Ячейка160	Ячейка161	Ячейка162	Ячейка163	Ячейка164	Ячейка165	Ячейка166	Ячейка167	Ячейка168	Ячейка169	Ячейка170	Ячейка171	Ячейка172	Ячейка173	Ячейка174	Ячейка175	Ячейка176	Ячейка177	Ячейка178	Ячейка179	Ячейка180	Ячейка181	Ячейка182	Ячейка183	Ячейка184	Ячейка185	Ячейка186	Ячейка187	Ячейка188	Ячейка189	Ячейка190	Ячейка191	Ячейка192	Ячейка193	Ячейка194	Ячейка195	Ячейка196	Ячейка197	Ячейка198	Ячейка199	Ячейка200	Ячейка201	Ячейка202	Ячейка203	Ячейка204	Ячейка205	Ячейка206	Ячейка207	Ячейка208	Ячейка209	Ячейка210	Ячейка211	Ячейка212	Ячейка213	Ячейка214	Ячейка215	Ячейка216	Ячейка217	Ячейка218	Ячейка219	Ячейка220	Ячейка221	Ячейка222	Ячейка223	Ячейка224	Ячейка225	Ячейка226	Ячейка227	Ячейка228	Ячейка229	Ячейка230	Ячейка231	Ячейка232	Ячейка233	Ячейка234	Ячейка235	Ячейка236	Ячейка237	Ячейка238	Ячейка239	Ячейка240	Ячейка241	Ячейка242	Ячейка243	Ячейка244	Ячейка245	Ячейка246	Ячейка247	Ячейка248	Ячейка249	Ячейка250	Ячейка251	Ячейка252	Ячейка253	Ячейка254	Ячейка255	Ячейка256"
$Excel1 = "Ячейка1" ; тут должны быть формулы :) 
$Excel2 = {XXXXXXXXXXXXXX} ; Как тут быть?
$Excel3 = {XXXXXXXXXXXXXX} ; Как тут быть?
$Excel.. =

#include <Excel.au3>
#include <Array.au3>

$FilePath = @ScriptDir & "\111.xls" ;файл 111.xls" должен находиться в одной папке со скриптом
$oExcel = _ExcelBookOpen($FilePath, 0) ; открыть файл Excel (второй параметр 0 - не показывать Excel)

If @error = 1 Then
    MsgBox(16, "Ошибка!", "Невозможно создать объект Excel")
    Exit
ElseIf @error = 2 Then
    MsgBox(16, "Ошибка!", "Файл " & $FilePath & " не существует")
    Exit
EndIf

For $i = 1 To 14 ; с первого столбца по 14
$aArray = _ExcelReadArray($oExcel, 1, $i, 5, 1) ;Direction is Vertical (столбец за столбцом)
_ArrayDisplay($aArray, "Vertical")
Next

For $i = 1 To 5 ; с первой строки по 5
$aArray = _ExcelReadArray($oExcel, $i, 1, 14) ;Direction is Horizontal (построчно)
_ArrayDisplay($aArray, "Horizontal")
Next

_ExcelBookClose($oExcel)

$sRezult=StringRegExpReplace($txt, ".*?аыуц(.*)рдлорсм.*", "\1",1)
If @extended=0 Then Return; Желательно добавить проверку для случаев отсутствия самих "аыуц" или "рдлорсм"