Извличането на думи от текстови низове на Excel се нарича синтактичен анализ.
Отворете Excel, след което въведете изречение, съдържащо поне три думи, в която и да е от клетките в първия работен лист. Ще разделите това изречение на отделни думи.
Щракнете върху заглавието на менюто „Данни“, след което щракнете върху бутона „Текст в колони“. Тази функция разделя текст, чиито думи са разделени със знак, който задавате.
Щракнете върху квадратчето за отметка „Интервал“, след което щракнете върху бутона „Край“. Excel ще раздели изречението, което сте написали на отделни колони. Всяка колона ще съдържа по една дума от изречението.
Въведете функцията, минус кавичките, "=индекс([МАСИВ],1,[БРОЙ ДУМА ЗА ИЗВЛЕЧВАНЕ])" в клетка под низа от разделени думи. Заменете термина "МАСИВ" с диапазона, съдържащ низа от думи. Например, ако думите заемат клетки от "A1" до "C1", въведете текста "A1:C1" на мястото на текста "ARRAY". Заменете текста „НОМЕР НА ДУМА ЗА ИЗВЛЕЧВАНЕ“ с номера на думата, която искате да извлечете от изречението. Например, ако искате да извлечете третата дума от диапазона "A1:C1", въведете "3" за последния аргумент.
Отворете нова електронна таблица на Excel, след което въведете произволна последователност от три или повече думи в клетка F4. Ще използвате кратка програма на Visual Basic, за да извлечете дума от това изречение.
Щракнете върху заглавието на менюто „Разработчик“, след което щракнете върху бутона „Visual Basic“. Ще се отвори средата за програмиране на Excel.
Поставете следната програма в прозореца, който се показва. Сърцето на тази подпрограма е функцията "split", която разделя изречение на отделни думи, както прави командата "Text to Columns".
Sub Macro1() Dim ar, str1, n str1 = Range("F4") n = Range("F5") - 1 ar = Split (str1, " ") MsgBox "Номер на думата " & n + 1 & " е " & ar (n) Край Под
Щракнете върху бутона "Макроси" в раздела "Разработчик", след което щракнете двукратно върху функцията "Макро1". Ще се появи поле за съобщение, указващо думата, която вашата програма е извлекла от изречението, което сте въвели в стъпка 1.
