7.7 Выгрузка в *.xls

Тема в разделе "Общие вопросы "1С:Предприятие 7.7"", создана пользователем ZEMA, 9 дек 2009.

  1. TopicStarter Overlay
    ZEMA
    Offline

    ZEMA Опытный в 1С

    Регистрация:
    5 окт 2007
    Сообщения:
    231
    Симпатии:
    0
    Баллы:
    26
    Всем привет.
    Выгрузку из базы 1С "бух" делаю в EXL.
    Возникает проблемка:если в exele в ячейку вставляю до момента выгрузки формулу, то у меня выгрузка около 10 мин происходит. стоит убрать формула и 10 сек. обработка и готово. не знаете что можно придумать? Может можно программно сначала выгрузить данные, а затем вставить например функцию
  2. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    21.520
    Симпатии:
    407
    Баллы:
    104
    Можно. К ячейке можно обращаться по OLE


    НашЛист.Cells(НомСтр, НомКол).Formula = Формула;


    Для ускорения вывода информации в Excel можно отключить обновление экрана.
    НашЛист.ScreenUpdating = 0;
    НашЛист.EnableEvents = 0;
    НашЛист.Visible = 0;
    Затем, когда таблица будет сформирована, вновь включить обновление экрана.
    НашЛист.ScreenUpdating = 1;
    НашЛист.EnableEvents = 1;
    НашЛист.Visible = 1;

    А если использовать FormulaLocal еще быстрее будет
  3. TopicStarter Overlay
    ZEMA
    Offline

    ZEMA Опытный в 1С

    Регистрация:
    5 окт 2007
    Сообщения:
    231
    Симпатии:
    0
    Баллы:
    26
    а если не сложно можете сказа как будет выглядить формула "=ПоискПОЗ(А4;Е:Е;0)".
    Я пишу WorkSheet.Cells(ш,10).FormulaR1C1 ="=ПОИСКПОЗ(R["+Строка(ш)+"]C;RC[5]:RC[5];0)";-что-то не выходит
  4. Бухгалтерский угодник
    Offline

    Бухгалтерский угодник Администраторы Команда форума Администратор

    Регистрация:
    29 дек 2008
    Сообщения:
    21.520
    Симпатии:
    407
    Баллы:
    104
    что именно отображается в exel?
  5. TopicStarter Overlay
    ZEMA
    Offline

    ZEMA Опытный в 1С

    Регистрация:
    5 окт 2007
    Сообщения:
    231
    Симпатии:
    0
    Баллы:
    26
    Спасибо. Тема закрыта.Через макросы проверил. выглядит примерно так "=MATCH(RC[-8],C[-6],0)"

Поделиться этой страницей