Методы автоматизации при работе в MS Excel. Синявская Г.А. - 15 стр.

UptoLike

Составители: 

15
1.8.3. Операции со строками
Для данных типа String существует только одна операцияконкатенация.
Пример:
Петр&” “&Иванович
Результат:
Петр Иванович”.
Для работы со строками существует большое количество функций. В ка-
честве примера приведем некоторые из них:
q Len(<строка>) – Возвращает длину строки.
Пример:
Sub Proba()
Dim n As Integer, strY As String
strY = Worksheets("Лист1").Range("a1")
n = Len(strY)
Worksheets("Лист1").Range("a2") = n
End Sub
В ячейку Лист1!А2 записывается количество символов строки, введенной в ячейку А1.
q Left(<строка>,<длина>) – Выделяет из аргумента <строка> указанное ко-
личество символов слева.
Пример:
В ячейках листаПервыйвведена информация:
А1: Первый урок
А2: =НАЙТИ(" ";A1)
Процедура Proba1() выделяет из предложения, введенного в ячейку А1, первое слово и посы-
лает его в ячейку А3.
Sub Proba1()
Dim n As Integer, strY As String
Dim strZ As String
strY = Worksheets("Первый").Range("a1")
n = Worksheets("Первый").Range("a2")
strZ = Left(strY, n - 1)
Worksheets("Первый").Range("a3") = strZ
End Sub
q Mid(<строка>,<старт>[,<длина>]) выделяет из аргумента <строка> под-
строку с указанным числом символов, начиная с позиции <старт>. Если ар-
гумент <длина> опущен, выделяется подстрока от позиции <старт> до конца
строки.
Пример:
Если добавить в процедуру Proba1() два оператора:
strZ = Mid(strY, n + 1)
Worksheets("Первый").Range("a4") = strZ ,
то в ячейку А4 запишется оставшаяся часть предложения.
Или другой пример:
1.8.3.    Операции со строками
         Для данных типа String существует только одна операция – конкатенация.
Пример:
“Петр”&” “&”Иванович”
Результат:
“Петр Иванович”.
      Для работы со строками существует большое количество функций. В ка-
честве примера приведем некоторые из них:
     q      Len(<строка>) – Возвращает длину строки.

Пример:
      Sub Proba()
      Dim n As Integer, strY As String
      strY = Worksheets("Лист1").Range("a1")
      n = Len(strY)
      Worksheets("Лист1").Range("a2") = n
      End Sub
В ячейку Лист1!А2 записывается количество символов строки, введенной в ячейку А1.

     q      Left(<строка>,<длина>) – Выделяет из аргумента <строка> указанное ко-
            личество символов слева.

Пример:
В ячейках листа “Первый” введена информация:
А1: Первый урок
А2: =НАЙТИ(" ";A1)
Процедура Proba1() выделяет из предложения, введенного в ячейку А1, первое слово и посы-
лает его в ячейку А3.
       Sub Proba1()
       Dim n As Integer, strY As String
       Dim strZ As String
       strY = Worksheets("Первый").Range("a1")
       n = Worksheets("Первый").Range("a2")
       strZ = Left(strY, n - 1)
       Worksheets("Первый").Range("a3") = strZ
       End Sub

     q      Mid(<строка>,<старт>[,<длина>]) – выделяет из аргумента <строка> под-
            строку с указанным числом символов, начиная с позиции <старт>. Если ар-
            гумент <длина> опущен, выделяется подстрока от позиции <старт> до конца
            строки.
Пример:
Если добавить в процедуру Proba1() два оператора:
      strZ = Mid(strY, n + 1)
      Worksheets("Первый").Range("a4") = strZ ,
то в ячейку А4 запишется оставшаяся часть предложения.
Или другой пример:




                                              15