вставка знач. из Ax в Excel в именованую ячейку

[Denicce]

Каким образом заставить Axapta не отражать ошибку при попытке определить COM объект xApplication.Range("Bookmark"), если не существует именованной ячейки "Bookmark" в шаблоне? Можно через try сделать, по крайней мере, отчет до конца дойдет, но в конце выдастся блок ошибок про неопределенные Range. Некрасиво это.

Есть идеи?

[AndyD]

У объекта Application MS Excel есть коллекция Names, в которой находится список Named Range. Перед вызовом проверяйте этот список.

[Владимир Максимов]

Ну, я сделал примерно так. Метод в ComExcelDocument_RU

PHP код:

// Существует ли указанный Range в листе Excel
// Возвращает true или false
// Имеет смысл при использовании именованных ячеек
// bookMark -> Excel bookmark name
public boolean rtg_existsRange(MSOfficeBookMark_RU bookMark,int _workSheetId = 1)
{
    COM         comRange,
                comWorkSheet,
                comApplication;

    boolean     existsRange = false;
    str         strRange;
    ;

    if (m_comDocument)
    {
        comWorkSheet   = this.getWorkSheet(_workSheetId);
        comApplication = m_comDocument.application();
        comWorkSheet.activate();

        if (comWorkSheet && comApplication)
        {
            try
            {
                // Ошибка в Range генерит сообщение об ошибке, которое не подавляется Try...Catch
                // comRange = comApplication.range(bookMark);
                // Поэтому использую "макроподстановку" Evaluate
                comRange = comApplication.evaluate(bookMark);
                // В объекте comRange нет метода Error(), поэтому штатно прочитать ошибку не получается
                // Конвертирую объект в строку и ищу в нем ключевое слово "ERROR"
                strRange = comRange.toString();
                if (strScan(strRange,'ERROR',1,strLen(strRange)) == 0)
                {
                    existsRange = true;
                }
            }
            catch (exception::Error)
            {
                existsRange = false;
            }
        }
    }
    return existsRange;
} 


[Denicce]

Спасибо!!!

[Denicce]

Я немного другое решение придумал. Чтобы каждый раз не проверять в документе существование Name, я все Names загоняю в List сразу после открытия шаблона, потом уже через ф-ию inRange() проверяю имя ячейки в List.toString().
Не знаю, какой способ быстрее.

PHP код:

void prepareCellNamesList()
{
    COM     comNames, comName;
    List    list;
    int i;
    ;

    list = new List(Types::String);
    comNames = m_comDocument.Names();

    for (i=1; i<=comNames.count(); i++)
    {
        comName = comNames.Item(i);
        list.addEnd(comName.Name());
    }

    namesList = strRem(list.toString(), "<>");
}

// ADD by KDV (7-Сен-2005)  // KDV_LIZ_

boolean checkCellName(BookMark _bookMark)
{
    if (namesList)
        return inRange(namesList, _bookMark);
    else
        return true;
} 


это два новых метода в COMExcelDocument_RU

и в ClassDeclaration объявил
Str namesList; // именованые ячейки

[Владимир Максимов]

Лично мне представляется такая логика крайне некорректной. Не в смысле кода, а именно сама идея.

Чтобы метод checkCellName() отработал корректно, ты должен предварительно, отдельным процессом, запустить на выполнение метод prepareCellNamesList().

Т.е., по "правильному", необходимо принудительно запускать метод prepareCellNamesList() изнутри собственно checkCellName(), если объект namesList не заполнен. А чтобы отличить "не заполненный", от "пустого", нужна еще одна переменная, определяющая сам факт выполнения метода prepareCellNamesList()

Кстати, гораздо разумнее использовать для этой цели объект-контейнер, а не символьную строку. Тогда поиска элемента - это функция ConFind() без дополнительного программирования.

В общем, как-то это "коряво" организовано. Лично я просто вернул бы из метода prepareCellNamesList() полученный список (RETURN namesList) и разбирался бы с полученным списком уже во вне класса COMExcelDocument_RU

Ну, и явная ошибка в методе checkCellName(). Почему, если НЕТ списка именованных ячеек возвращается true? Должно быть false.

[Denicce]

я метод prepare запускаю один раз, перед первой вставкой значения в именованную ячейку.

а вот если нет списка поименованных ячеек, я возвращаю true специально, чтобы не выполнять проверку. Идея в том, что не всегда адресация идет по поименованным ячейкам в Excel. иногда просто адресация, "A1" и т.д. Тогда надо true возвращать.

ну, тут еще подумать надоть.