Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
есть ли формула которая бы написала слова наоборот? EXCEL 2003
 
#1
27.06.2011 18:07:35
У меня EXCEL 2003  
 
есть ли формула которая бы написала слова наоборот?    
 
Например:    КЕНГУРУ      -     УРУГНЕК  
            ПРИБАЛТИКА   -     АКИТЛАБИРП  
   и т.д. и т.п.  
 
???
 
 
 
#2
27.06.2011 18:11:13
Нет.  
Но есть функция в VBA, которую можно использовать в UDF.
 
 
 
#3
27.06.2011 18:14:40
Function ReverseString(r As Range)  
ReverseString = StrReverse®  
End Function
 
 
 
#4
27.06.2011 18:51:44
БАХТИ, есть такая формула, но я Вам ее не покажу, так как не отписываетесь в своих темах.
 
 
 
#5
27.06.2011 18:59:33
просто я тут очень недавно (второй раз)... захожу в другие приложения этого сайта и потом чё-то скорость сёдня совсем мучает.
 
 
 
#6
27.06.2011 19:01:49
{quote}{login=kim}{date=27.06.2011 06:51}{thema=}{post}БАХТИ, есть такая формула, но я Вам ее не покажу, так как не отписываетесь в своих темах.{/post}{/quote}  
 
честно говоря эта формула мне не нужна в практическом смысле просто интересно я как-то пробовал через длстр пстр левсимв правсимв ... не получилось тогда
 
 
 
#7
27.06.2011 19:07:09
В этой теме http://www.planetaexcel.ru/forum.php/plex.php?thread_id=28874 Вам тоже ответы не нужны?  
Для чего тогда вообще создавать темы?
 
 
 
#8
27.06.2011 19:17:27
{quote}{login=kim}{date=27.06.2011 07:07}{thema=}{post}В этой теме http://www.planetaexcel.ru/forum.php/plex.php?thread_id=28874 Вам тоже ответы не нужны?  
Для чего тогда вообще создавать темы?{/post}{/quote}  
 
на той теме я уже объявил благодарность всем    
Как поставить синий треугольник извещаюший о получении полного ответа на свой вопрос?  
 
Когда я работаю в других приложениях этого сайта (например приемы или блог) как я могу сразу узнавать о том что кто-то ответил на мой вопрос в форуме?  
это можно как-то настроить?
 
 
 
#9
27.06.2011 19:23:44
Функциональность данного движка форума ограничена.  
Синие треугольнички расставляют модераторы, увидев полную удовлетворенность топикстартера. Или при закрытии темы в случае каких-либо нарушений.
 
 
 
#10
27.06.2011 19:26:31
{quote}{login=kim}{date=27.06.2011 07:23}{thema=}{post}Функциональность данного движка форума ограничена.  
Синие треугольнички расставляют модераторы, увидев полную удовлетворенность топикстартера. Или при закрытии темы в случае каких-либо нарушений.{/post}{/quote}    
ясно
 
 
 
#11
27.06.2011 20:39:57
Билл Джелен "Применение VBA и макросов в  Microsoft Excel"  
Запись содержимого ячейки в обратном порядке, пользовательская функция  
 
Function ReverseContents(myCell As Range, Optional IsText As Boolean = True)  
     
   Dim i As Integer  
   Dim OrigString As String, NewString As String  
   OrigString = Trim(myCell) 'Удалить символы пробела в начале и конце строки.  
   For i = 1 To Len(OrigString)  
       'Запись исходной строки в обратном порядке путем добавления  
       'строки NewString после символа исходной строки.  
       NewString = Mid(OrigString, i, 1) & NewString  
   Next i  
   If IsText = False Then  
       ReverseContents = CLng(NewString)  
   Else  
       ReverseContents = NewString  
   End If  
End Function
 
 
 
#12
27.06.2011 22:31:24
Здравствуйте!  
А что за аргумент UDF ReverseContents "IsText"?  
Каким он может быть?
 
 
 
#13
27.06.2011 22:47:17
True/False  
Т.е. если переворачиваем числа, то ставим False и получаем на выходе число.
 
 
 
#14
27.06.2011 22:57:27
Спасибо!
 
 
 
#15
27.06.2011 23:10:33
К формульному варианту Димы добавил небольшую хитрость, теперь F9 жать не нужно :)  
В желтой ячейке вводим слово, в синей получаем результат.
 
 
 
#16
27.06.2011 23:17:51
Но надо включить итерации...
 
 
 
#17
27.06.2011 23:20:26
Серега, Дима уже это говорил на своем сайте, посчитал лишним повторять :)
 
 
 
#18
27.06.2011 23:27:25
Не работает. Ругается на циклическую ссылку и результата нет.
 
 
 
#19
27.06.2011 23:28:07
Итерации не включал и не буду :)
 
 
 
#20
27.06.2011 23:28:37
Единственное что хочется добавить, количество итераций должно быть гарантированно большим длины строки вводимого значения, я установил 10000.
 
 
 
#21
27.06.2011 23:30:58
{quote}{login=Hugo}{date=27.06.2011 11:28}{thema=}{post}Итерации не включал и не буду :){/post}{/quote}  
Это дело личное. Только не понятно, чем обоснован страх перед итерациями? :)
 
 
 
#22
27.06.2011 23:40:57
{quote}{login=kim}{date=27.06.2011 11:30}{thema=Re: }{post}{quote}{login=Hugo}{date=27.06.2011 11:28}{thema=}{post}{/post}{/quote} чем обоснован страх перед итерациями? :){/post}{/quote}  
Виктор обидится.
 
 
 
#23
27.06.2011 23:44:33
Мда, чего-то давненько Повелитель итераций не появлялся ;) Может он не знает, что сайт отремонтировали?
 
 
 
#24
27.06.2011 23:51:24
Нет - просто в лесу Wi-Fi отрубили.
 
 
 
#25
28.06.2011 00:56:03
У меня в лесу Wi-FI как видите работает:)  
Про итерации пошутил - включил, попробовал, заработало, выключил.  
А если серьёзно - я их не знаю, поэтому опасаюсь. Ничего не поломается, если включенными оставить?
 
 
 
#26
28.06.2011 00:59:14
Надо выключать.
 
 
 
#27
28.06.2011 01:02:09
Ну вот...  
Лучше уж UDF :)
 
 
 
#28
02.07.2011 01:46:00
{quote}{login=kim}{date=27.06.2011 11:44}{thema=}{post}Мда, чего-то давненько Повелитель итераций не появлялся{/post}{/quote}  
Сам такой (как показать язык?) :)
 
 
 
Страницы: 1
Читают тему
Наверх