Проверить наличие текста в формуле

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по Excel » Проверить наличие текста в формуле (Формулы/Formulas)

EvgenyD

Дата: Среда, 08.10.2014, 15:09 | Сообщение № 1

Группа: Пользователи

Ранг: Участник

Сообщений: 74

Репутация: 19 ±

Замечаний: 0% ±

Excel 2013

Здравствуйте! Подскажите, пожалуйста, как проверить наличие в формуле текста, а именно ссылки в виде именованного диапазона? Поиск и мой мозг результатов не дали. Пример прилагаю.

К сообщению приложен файл: _EvgenyD.xlsx (9.2 Kb)

Ответить

alex1248

Дата: Среда, 08.10.2014, 16:08 | Сообщение № 2

Группа: Проверенные

Ранг: Обитатель

Сообщений: 384

Репутация: 71 ±

Замечаний: 0% ±

Excel 2007, 2010

Можно с помощью соответствующей пользовательской функции.

К сообщению приложен файл: _EvgenyD-111.xlsm (13.5 Kb)

skype alex12481632
Qiwi +79276708519

Ответить

Rioran

Дата: Среда, 08.10.2014, 16:42 | Сообщение № 3

Группа: Авторы

Ранг: Ветеран

Сообщений: 903

Репутация: 290 ±

Замечаний: 0% ±

Excel 2013

Можно с помощью кнопки и макросов.

[vba]

Код

Sub Rio_Search()

Dim strX As String
Dim NameX As Name

strX = ActiveCell.FormulaLocal

For Each NameX In ThisWorkbook.Names
     If InStr(1, strX, NameX.Name) > 0 Then
         MsgBox "В формуле ячейки" & Chr(10) & Chr(10) & "R" & ActiveCell.Row & "C" & ActiveCell.Column & _
         Chr(10) & Chr(10) & " используется имя: " & Chr(10) & Chr(10) & NameX.Name
     End If
Next NameX

End Sub

[/vba]

К сообщению приложен файл: Rio_FF.xlsm (18.0 Kb)

Роман, Москва, voronov_rv@mail.ru
Яндекс-Деньги: 41001312674279

Ответить

EvgenyD

Дата: Среда, 08.10.2014, 16:44 | Сообщение № 4

Группа: Пользователи

Ранг: Участник

Сообщений: 74

Репутация: 19 ±

Замечаний: 0% ±

Excel 2013

alex1248, благодарю. Видимо получить текст формулы без VBA невозможно? Тогда пойду делать функцию под свою задачу.

Ответить

EvgenyD

Дата: Среда, 08.10.2014, 16:49 | Сообщение № 5

Группа: Пользователи

Ранг: Участник

Сообщений: 74

Репутация: 19 ±

Замечаний: 0% ±

Excel 2013

Rioran, спасибо за макрос, пригодится. Я не сомневался что задачу можно решить кодом, хотел понять возможность решения исключительно формулами, поэтому и написал на "Вопросы по Excel".

Ответить

Nic70y

Дата: Среда, 08.10.2014, 16:50 | Сообщение № 6

Группа: Друзья

Ранг: Экселист

Сообщений: 8791

Репутация: 2293 ±

Замечаний: 0% ±

Excel 2010

Цитата EvgenyD, 08.10.2014 в 16:44, в сообщении № 4

текст формулы

в 2013

Код

=Ф.ТЕКСТ()

ЮMoney 41001841029809

Ответить

EvgenyD

Дата: Среда, 08.10.2014, 16:56 | Сообщение № 7

Группа: Пользователи

Ранг: Участник

Сообщений: 74

Репутация: 19 ±

Замечаний: 0% ±

Excel 2013

Nic70y, полезная информация! Видимо "создатели" только к 2013 догадались о данной потребности. Но в моем случае не подходит, у самого 2010 и у пользователей 2010, а то и ниже.

Ответить

Serge_007

Дата: Среда, 08.10.2014, 18:44 | Сообщение № 8

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Цитата EvgenyD, 08.10.2014 в 16:56, в сообщении № 7

"создатели" только к 2013 догадались о данной потребности

Данная потребность возникает у мизерного количества пользователей

Цитата EvgenyD, 08.10.2014 в 16:56, в сообщении № 7

у самого 2010 и у пользователей 2010

Используйте Web App, в нем есть эта функция

[p.s.]Да, и посмотреть текст формул можно через Ctrl+H
Найти =
Заменить '=
Заменить все[/p.s.]

ЮMoney:41001419691823 | WMR:126292472390

Ответить

EvgenyD

Дата: Среда, 08.10.2014, 20:26 | Сообщение № 9

Группа: Пользователи

Ранг: Участник

Сообщений: 74

Репутация: 19 ±

Замечаний: 0% ±

Excel 2013

Serge_007,

Цитата

Используйте Web App, в нем есть эта функция

Не совсем понял, чем он тут поможет. Если один раз сделать и перевести в значения, то да, а если этот файл постоянно заполняется?
Посмотреть текст формулы не проблема, вопрос как его передать в др. формулу (без VBA и доп манипуляций, только штатными формулами).

В общем задача то уже решена с помощью пользовательской функции VBA.

Ответить

Serge_007

Дата: Среда, 08.10.2014, 20:38 | Сообщение № 10

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

Цитата EvgenyD, 08.10.2014 в 20:26, в сообщении № 9

Не совсем понял, чем он тут поможет

Как чем? Это решение Вашей задачи со всеми дополнительными условиями (без VBA, доступно всем с любой версией Excel, решение формулами, да ещё и бесплатно). Или оно Вам уже не нужно?

Цитата EvgenyD, 08.10.2014 в 20:26, в сообщении № 9

Если один раз сделать и перевести в значения, то да, а если этот файл постоянно заполняется?

Ну и пусть заполняется. Что это меняет?

Цитата EvgenyD, 08.10.2014 в 20:26, в сообщении № 9

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

Я уже ответил:

Цитата Serge_007, 08.10.2014 в 18:44, в сообщении № 8

Используйте Web App

Но Вам почему-то это решение не нравится...

Цитата EvgenyD, 08.10.2014 в 20:26, в сообщении № 9

задача то уже решена с помощью пользовательской функции VBA

Это не то что Вы просили, но раз решение есть, значит тема закрыта

ЮMoney:41001419691823 | WMR:126292472390

Ответить

EvgenyD

Дата: Среда, 08.10.2014, 20:57 | Сообщение № 11

Группа: Пользователи

Ранг: Участник

Сообщений: 74

Репутация: 19 ±

Замечаний: 0% ±

Excel 2013

Serge_007, я ни каким образом не ворочу нос от Web App, и оно мне не "не нравиться", я просто (вероятно) про него не знаю много? Как я понял это онлайн версия MS Office и все. Т.е. Вы подразумеваете просто всем пользователям работать с данным файлом через онлайн Excel? Или я совсем не про то подумал?
Буду благодарен, если поясните хоть немного, т.к. информация будет полезна на будущее (думаю не только мне).