Текст в ячейке задом наперёд

Текст в ячейке задом наперёд 

Добрый день, уважаемые читатели блога! Продолжаем серию уроков по Microsoft Excel и сегодня мы отойдём от привычного создания макросов, рассмотрения приёмов, различных тонкостей. 

Поговорим о пользовательских функциях, то есть о функциях, которые может создавать сам пользователь, оперируя переменными Excel.

Перед нами стоит задача - отобразить текст в ячейке (произвольный) в обратном порядке. Пример: "Привет!", - в соседней ячейке появится: "!тевирП". 

В таком случае можно использовать макрос, но количество действий, его (макроса) постоянный вызов не улучшат, а затруднят работу с таблицей. 

Текст в ячейке задом наперёд

Воспользуемся возможностью создания своих функций. Благо для этого нам подойдёт алгоритм создания макроса. 

Добавляем новый модуль в наш документ:

  1. Вкладка "Разработчик", блок кнопок "Код", кнопка "Visual Basic";
  2. Далее "Insert" - > "Module".

Текст в ячейке задом наперёд

 

Добавим следующий текст в наш модуль:

 

Function dhReverseText(strText As String) As String
Dim i As Integer

For i = Len(strText) To 1 Step -1
dhReverseText = dhReverseText & Mid(strText, i, 1)
Next i
End Function

Текст в ячейке задом наперёд

 

Разберём где у нас что:

  • "Function dhReverseText(strText As String) As String" - название функции и объявление её типом строка;
  • "Dim i As Integer" - объявление переменной i;
  • "For i = Len(strText) To 1 Step -1" - для каждой переменной i типа строка устанавливаем обратный порядок расположения символов (Len - возвращает количество символов в ячейке);
  • "dhReverseText = dhReverseText & Mid(strText, i, 1)" - указываем функции, что двигаться нужно от конца к началу;
  • "Next i" - обработка следующего символа.

 

Прелестью такого подхода является работа с функцией, мы можем вводить её как простую формулу.

 

Текст в ячейке задом наперёд

 

Результат будет такой.

 

Текст в ячейке задом наперёд

 

Мы создали первую собственную функцию! 

 

Если остались вопросы - посмотрите наше новое видео:

 

Вам также может понравиться статья - Вставка гиперссылок на листы таблицы.

 

 

Post Author: Иван

Добавить комментарий