Меняем символы в словах на 180, разворачиваем с конца на начало

Excel - Эксель - окончание сделать началом

Я долго искал простое решение для решения следующих проблем:

  • эксель конец ячейки началом
  • отсортировать текст начиная с конца
  • отсортировать текст с окончания
  • развернуть текст
  • текст начало слова делаем концом сделать началом
  • скрипт текст начало слова делаем концом сделать началом
  • скрипт текстовый файл конец строки сделать началом
  • конец строки сделать началом
  • эксель конец ячейки началом
  • эксель окончание сделать началом 180
  • Эксель - Excel развернуть на 180

При этом в экселе явно можно было такое делать, просто в силу сложности программы такой функции там не могло не быть. Однако стандартно решить проблему перевертывая содержимого ячеек не удавалось.Перерыв пол интернета.. однако уж решив писать скрипт самостоятельно, я все же нашел элементарное решение. Помог сайт: http://www.tixey.ru/blog/347 -за что ему огромное спасибо.

Но там приведено решения данной проблемы для продвинутого пользователя, я решил сделать это все более подробно, включив в него все принсрины проблемных моментов без преодоления которых функция не заработает:

Итак, решения проблемы элементарного разворота - переворота, слова, строки, ячейки с конца на начало - наоборот (рисунки сделаны в натуральную величину, если что то не видно откройте его в новой вкладке отдельно):

Добавляем в Excel вкладку «Разработчик»

отображение вкладки

 

Появляется на панели вкладка «Разработчик», заходим на нее, жмем кнопку слева «VisualBasic»:

Создаем модуль, щелкнув левой кнопкой мышки по "VBAProject - название вашего файла" (вызвав контекстное меню):

Вставляем код в окно с права Module1(Code):

Function STRrev(Texto As String) As String
STRrev = STRreverse(Texto)
End Function

Меняем формат экселевского файла с .xlsx на .xlsm (с поддержкой макросов)

Разрешаем выполнение макросов:

Вставляем в свободное поле формулу: =STRrev()

В "()" вставляем номер ячейки содержимое которой нужно развернуть с конца на начало.

 

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