|
Как проще всего перевести расчет из xls в 1с? | ☑ | ||
---|---|---|---|---|
0
БалбесВ1с
12.07.12
✎
10:02
|
Есть файл - http://rghost.ru/39165591
В нем рассчитываются теплофизические св-ва воды и пара. Рассчитываются как я понял по таблицам и немного вычислений.Как проще всего преобразовать эти вычисления в язык 1с? Например вот такое выражение =ЕСЛИ(ИЛИ(K25=1;K30=1;K31=1);ЕСЛИ(F35>L25;ЕСЛИ(K32=0;I36+(I36-L32)/(L25-F32)*(F35-L25);ЕСЛИ(K33=0;I36+(I36-L33)/(L25-F33)*(F35-L25);ЕСЛИ(K34=0;I36+(I36-L34)/(L25-F34)*(F35-L25);"Расчет для данной ситуации не предусмотрен")));ЕСЛИ(K29=0;L29+(L29-G36)/(F29-L25)*(F35-F29);ЕСЛИ(K28=0;L28+(L28-G36)/(F28-L25)*(F35-F28);ЕСЛИ(K27=0;L27+(L27-G36)/(F27-L25)*(F35-F27);"Расчет для данной ситуации не предусмотрен"))));L30+(L31-L30)/(F31-F30)*(F35-F30)) |
|||
1
Нуф-Нуф
12.07.12
✎
10:03
|
оставить заднице функцию сидения на стуле, и подключить к работе голову и руки
|
|||
2
Нуф-Нуф
12.07.12
✎
10:04
|
капец. ну чем люди думаю заводя подобные темы???
|
|||
3
Tatitutu
12.07.12
✎
10:04
|
вопрос понятен, а проблема в чем ?
|
|||
4
БалбесВ1с
12.07.12
✎
10:07
|
(3)Это что мне столько переменных заводить? И так прямо и писать как в xls?
|
|||
5
БалбесВ1с
12.07.12
✎
10:08
|
Там таблица 600 на 600.
|
|||
6
Бертыш
12.07.12
✎
10:09
|
(5) Таблицу перенеси копированием в макет 1с
|
|||
7
БалбесВ1с
12.07.12
✎
10:12
|
(6)Попробую.Спасибо.
|
|||
8
БалбесВ1с
12.07.12
✎
10:25
|
(6)Нубский вопрос - 1с не открывает макет пока не запустишь excel и не включишь макросы.Как это обойти?
|
|||
9
AndyD
12.07.12
✎
10:27
|
в экселе разреши все макросы
|
|||
10
БалбесВ1с
12.07.12
✎
10:31
|
(9)Страшно!
|
|||
11
kyrgyz
12.07.12
✎
10:34
|
(0) Ну ты даешь... Переведи всю логику из екселя в 1С. При переводе все что в екселе хранилось преврятятся в справочники в константы и в РС.
|
|||
12
Eugene_life
12.07.12
✎
10:34
|
(10) Будь мужиком, включи все макросы!
|
|||
13
Reset
12.07.12
✎
10:37
|
Автор, нет простой кнопки.
Придется (1) делать, и активно. |
|||
14
Reset
12.07.12
✎
10:38
|
Т.е. тебе ПРИДЕТСЯ разобраться, что делается в этих формулах.
|
|||
15
БалбесВ1с
12.07.12
✎
10:40
|
(14)Я и так знаю что там делается.
|
|||
16
БалбесВ1с
12.07.12
✎
10:41
|
(14)По огромным таблицам(типа Брадиса) при известных давлении и температуре (воды или перегретого пара) высчитывается энтальпия.
|
|||
17
Прохожий
12.07.12
✎
10:42
|
(0) Перечисляй денег нам и оставайся на Мисте.
Не забудь свою cf скинуть |
|||
18
kyrgyz
12.07.12
✎
10:43
|
(17) НАдеюсь не надо всю таблицу типа брадиса грузить в 1С и там хранить. НАвернятка есть базовые пару формул. Изучи предмет и постановка задачи автоматом у тебя сложиться и нарисуется схема разработки.
|
|||
19
Прохожий
12.07.12
✎
10:43
|
(10) Используй комп главбуха.
|
|||
20
Прохожий
12.07.12
✎
10:44
|
У него админ прокачивает +200 ко всем магиям обычно
|
|||
21
Прохожий
12.07.12
✎
10:45
|
(14) Если поступить как советуют в (17), то не придется...
|
|||
22
Прохожий
12.07.12
✎
10:47
|
(18) Любая таблица проводок средней фирмы за месяц больше Брадиса в разы.
Что раньше всю жизнь делал один умный, то теперь куча дураков за раз легко переплюнет. |
|||
23
БалбесВ1с
13.07.12
✎
11:04
|
Спасибо огромное Бертыш
Все получилось и работает! Перем MSExcel Экспорт; Процедура Расчет (Элемент) АктивныйДокумент = ПолучитьМакет("Макет"); MSExcel = АктивныйДокумент.Получить(); Книга = MSExcel.Application.Workbooks(1); Страница=Книга.Worksheets(1); ЛистСданнымиИмя=СокрЛП(Строка(Страница.Name())); Страница.Range("E4").Value = Температура; Страница.Range("E5").Value = Давление; Энтальпия = Страница.Range("D15").Value; MSExcel.Application.Workbooks(1).Windows(1).Visible =false; // true; MSExcel.Application.Visible = false; //true; MSExcel.Activate(); //MSExcel.PrintPreview(); КонецПроцедуры Еще только в попытку это засунуть а то вдруг екзеля нет. |
|||
24
БалбесВ1с
13.07.12
✎
11:23
|
Подскажите как закрыть открытый excel?
При тестировании всплыл косячок) Если открыт екзель (любой файл, то процедура оттуда данные берет почему то. |
|||
25
БалбесВ1с
13.07.12
✎
11:53
|
Может пригодится кому - закрытие открытого excel без вопросов.
MSExcel = ПолучитьCOMОбъект(,"Excel.Application"); MSExcel.DisplayAlerts = 0; MSExcel.Quit(); |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |