Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
Пользователсая функция на заменить в формуле
 
#1
23.01.2009 14:29:26
Люди! Я знаю это возможно но сама не могу.  
Помогите пожалуйста создать пользовательскую формула, которая заменяет в формуле один текст на другой текст и выдает результат этой замены.  
Подробный описательный пример я привела в файле - примере.
Работать надо не 12 часов, а головой.
 
 
 
#2
23.01.2009 15:20:08
существует несколько вариантов (зависит от того, как звучит исходная задача)  
 
- использовать функцию ДВССЫЛ, и тогда только в одной ячейке столбца нужно указывать, олд или нью...  
=ВПР($A2;ДВССЫЛ(C$1&"!$A:$B");2;0) - формула для С2  
 
- если нужно сделать один раз, то проще использовать правка - заменить
 
 
 
#3
23.01.2009 15:35:37
Это очень прикольная и интересная возможность знания о которой мне очень пригодятся. Спасибо T@nd@  
 
Для текущей задачи мне нужна именно пользовательская формула созданная через VBA,  
Потому что нужен именно текст, значение выдаваемое формулой, я вручную буду копировать и заменять на то место, где была старая формула в примере это в ячейку С2  
 
Можно такую сделать?
Работать надо не 12 часов, а головой.
 
 
 
#4
23.01.2009 16:53:19
Люди, ну помогите!
Работать надо не 12 часов, а головой.
 
 
 
#5
25.01.2009 17:54:14
Народ, неужели никто не поможет?  
 
Как вообще в переменную выдать формулу из ячейки, а не значение, которое она возвращает? range("C1").text и range("C1").value - выдают значение, которое возвращается ячейкой. Как выудить саму формулу?
 
 
 
#6
25.01.2009 17:59:06
насчет формулы:  
Worksheets("Sheet1").Range("A1").Formula = "=$A$4+$A$10"
 
 
 
#7
25.01.2009 18:04:39
допустим хочешь чтоб в ячейку вставлялась формула:  
ActiveWorkbook.Sheets("List12").Range("A5").Formula = "=((B3-1.5)*A28*A29)/(((F3+273)*A30*E3)^0.5)"
 
 
 
#8
25.01.2009 18:07:30
North_Rain наоборот, в ячейке С1 есть формула "=A1+B1",  
есть переменная пусть её имя будет iFormula$ - в неё надо ввести формулу, которая в Ячейке С1 "=A1+B1",  
например если бы мне нужно было значение, я бы написала  
iFormula = range("C1").text но мне необходима именно сама формула "=A1+B1".  
Знает кто?
 
 
 
#9
25.01.2009 18:13:08
iFormula$ =range("C1").formula  
так не прокатывает? набери справку по этой команде F1 . может там что нить. а то я сам пару раз испоьзовал таку вставку. может и неправильно быть.
 
 
 
#10
25.01.2009 18:15:48
вот так??  
Sub sdf()  
Dim a As String  
a = Range("A3").Formula  
MsgBox a  
 
End Sub
 
 
 
#11
25.01.2009 18:27:16
Да! оно, спасибо.
 
 
 
#12
25.01.2009 18:29:19
Может, кто подскажет, как пользовательскую формулу сделать по теме топика?
 
 
 
#13
25.01.2009 18:38:52
че то у меня в опере, ваша тема с моим ником все сообщения вылезли:)): прикольно:)
 
 
 
#14
25.01.2009 21:56:51
Неужели безнадега?
 
 
 
#15
26.01.2009 07:55:37
Ну да. Мне кажется что Вы неправильно выбрали метод решения задачи. Зачем Вам измененная формула? Не проще скопировать старую , а потом сделать замену по "ctrl+H". Или как вариант "правка-связи" если ссылки на другую книгу.
 
 
 
#16
27.01.2009 21:27:06
Function ФормулаЗаменить()  
   iC2 = Range("C2").FormulaLocal  
   iB1 = Range("B1").FormulaLocal  
   iC1 = Range("C1").FormulaLocal  
   MyStr = Replace(iC2, iB1, iC1)  
   ФормулаЗаменить = "" & MyStr & ""  
End Function
At odd moments: VBA, VB6, VB.NET, Java, Java for Android, Java Script, Action Script, Windows Scriping Host
 
 
 
Страницы: 1
Читают тему
Наверх