|
|
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
подскажите, с помощью какой функции Excel можно вычислять результат текстовой формулы, введенной в другую ячейку. например в А1 ввожу "1+5-14*48" и хочу чтобы в В1 вычислялся результат "-246" (без ввода "=1+5-14*48" т.е моя задача, что бы в А1 был текс формулы, а в В1 - результат вычислений ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 22.07.2006, 08:11:30 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
Может быть, есть что-нибудь встроенное (Вы ведь смотрели в справочном руководстве?). А так - надо все ручками. Написать собственную VBA-функцию и - вперед. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.07.2006, 06:28:04 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
Когда был макроязык в Экселе, была функция "ВЫЧИСЛИТЬ" - она решала именно эти задачи. Найди ее аналог в VBA или сделай ее сам. Достаточно простая задача. А вообще, я думаю, применительно к конкретной задачи, можно обойтись изменив структуру таблицы. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.07.2006, 08:09:12 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
Правильно говорят про формулу ВЫЧИСЛИТЬ. Как ее использовать, я писал здесь . Либо написать аналог функции на VBA. Код: plaintext 1. 2. 3. A1 = "1+5-14*48" B1 = =fnEvaluate(A1) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.07.2006, 08:28:24 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
а как написать аналог функции на VBA? через макросы? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 25.07.2006, 20:37:56 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
и как можно преобазовать формулу в ячейке А1 в текст формулы в ячейку В1 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 25.07.2006, 20:40:19 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
Блин, так тебе ж написал Ashton! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 25.07.2006, 21:41:48 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
Zoya2006а как написать аналог функции на VBA? через макросы? См. мой пост выше. Zoya2006и как можно преобазовать формулу в ячейке А1 в текст формулы в ячейку В1 Код: plaintext 1. 2. 3. 4. 5. 6. 7. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.07.2006, 08:33:21 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
Код: plaintext 1. 2. 3. 4. 5. 6. 7. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.07.2006, 09:04:26 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
если в B1 нужно значение формулы, то так Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.07.2006, 09:08:25 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
ВЫ ИЗВИНИТЕ МЕНЯ, Я ПЛОХО В ЭТОМ РАЗБИРАЮСЬ! делала так: Создание макроса с использованием Microsoft Visual Basic 1. В меню Сервис Microsoft Excel выберите команду Макрос, а затем — Редактор Visual Basic. 2. В меню Insert выберите команду Module. 3. Введите или скопируйте программу в окно программы модуля. 4. Чтобы запустить данный макрос из окна модуля, нажмите кнопку F5. 5. Когда макрос будет создан, выберите команду Close and Return to Microsoft Excel в меню File. получилось в Visual Basic: Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next Application.EnableEvents = False Range("B1").FormulaLocal = "=" & Range("A1").Value Range("B1") = Evaluate(Range("B1").Formula) If Err.Number <> 0 Or IsError(Range("B1")) Then _ Range("B1") = "Опаньки, плохи дела с формулой в A1" Application.EnableEvents = True End Sub Sub мой() End Sub НЕ РАБОТАЕТ (ЧТО НЕ ТАК?) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 26.07.2006, 21:15:54 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
БОЛЬШОЕ СПАСИБО, У МЕНЯ ПОЛУЧИЛОСЬ!!! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.07.2006, 20:12:10 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
Я написала аналог функции на VBA. Public Function fnEvaluate( _ ByRef rng As Range) fnEvaluate = Application.Evaluate(rng.Value) End Function Работает только с простыми вычислениями (10-8+2),а (0,33*0,95) не вычисляет... Почему? и что делать? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.07.2006, 20:53:59 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
Zoya2006Работает только с простыми вычислениями (10-8+2),а (0,33*0,95) не вычисляет... Почему? и что делать?Замени запятые на точки. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 27.07.2006, 23:11:14 |
|
||
|
помощь в Excel (вычислять результат текстовой формулы)
|
|||
|---|---|---|---|
|
#18+
Код: plaintext 1. 2. 3. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.07.2006, 08:55:21 |
|
||
|
|

start [/forum/topic.php?fid=61&msg=33878339&tid=2184554]: |
0ms |
get settings: |
7ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
44ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
52ms |
get tp. blocked users: |
2ms |
| others: | 201ms |
| total: | 337ms |

| 0 / 0 |
