Excel. Узнать по именованной ячейке на каком она листе?

[Poleax]

Excel. Узнать по именованной ячейке на каком она листе?
в VBA есть

MsgBox Range("test").Worksheet.Name

Как это получить из X++ ?

[Gustav]

Объект Application перед Range добавьте - мысленно или на бумажке - и проанализируйте, как можно получить
Только надо при этом, чтобы была активна та Workbook, в которой определено это имя "test".

PHP код:

MsgBox Application.Range("test").Worksheet.Name 


Можно еще через семейство Names: Application.ThisWorkbook.Names("test").RefersTo
и потом выкусывать имя листа из полной ссылки: =Sheet1!$B$2

[belugin]

http://axaptapedia.com/COM

[Eldar9x]

Цитата:

в VBA есть
X++:
MsgBox Range("test").Worksheet.Name
Как это получить из X++ ?

Так... так и получить:

COM ws;
;
ws = range.Worksheet();
        info(ws.Name());

[Gustav]

Цитата:

Сообщение от Eldar9x

Так... так и получить:

COM ws;
;
ws = range.Worksheet();
        info(ws.Name());

Это в том случае, если у него уже имеется этот range.
Но, как я понимаю, он хочет на вход своей будущей функции подать строку "test", а на выходе получить другую строку - имя листа. И пока ему непонятно как создать этот range, не зная имени листа. Ответ - создать от Application, который явно не указан в коде VBA, но который незримо присутствует: range = Application.Range("test").

[belugin]

пример тут \Classes\ComExcelDocument_RU\findRange

[Gustav]

Цитата:

Сообщение от belugin

пример тут \Classes\ComExcelDocument_RU\findRange

Гы! Не пойдет, там worksheet параметром надо указывать

[Eldar9x]

Цитата:

Это в том случае, если у него уже имеется этот range.

ааа, понятно. Тогда решение в лоб:

    COM             ws;

    COM             cells;
    COM             sheets;
    int             cnt;
    COM             findRange;

        sheets = app.sheets();
        cnt = sheets.Count();

        for (i = 1; i <= cnt; i++)
        {
            sheet = sheets.Item(i);
            cells = sheet.Cells();

            findRange = cells.Find("ttt");
            if (findRange)
            {
                ws = findRange.Worksheet();
                info(ws.Name());
            }

[Poleax]

Цитата:

Сообщение от Eldar9x

Так... так и получить:

COM ws;
;
ws = range.Worksheet();
        info(ws.Name());

да действительно так и есть. А я тут думал использовать getWorkSheets()
Спасибо Всем, прояснили!

[Gustav]

Цитата:

Сообщение от Eldar9x

ааа, понятно. Тогда решение в лоб:

Да не нужно листы перебирать, я ж всё вроде написал...
Получите Application как точку опору и мир сам перевернется

static void Job120(Args _args)
{
    ComExcelDocument_RU doc = new ComExcelDocument_RU();

    COM     xlApp;
    COM     wbook;
    COM     activeSheet;
    COM     wkss;
    COM     range;

    str sheetName(COM _excel, str _namedRange) // ОНО!
    {
        COM comTemp;
        ;
        comTemp = _excel.Range(_namedRange);
        comTemp = comTemp.Worksheet();
        return comTemp.Name();
    }
    ;

// это всё - подготовка тестовых данных
// ---------------------------------------------------------
    doc.NewFile();
    wbook = doc.getComDocument();
    wkss = wbook.Worksheets();

    xlApp = wbook.Parent();
    activeSheet = xlApp.ActiveSheet();

    range = activeSheet.Range('B2');
    range.Name('test');

    range.Select();

    activeSheet = wkss.Add();
    activeSheet.Select(); // специально ушли на другой лист
// ---------------------------------------------------------

// а теперь собственно вызов функции
    box::info(sheetName(xlApp, 'test'));
}

[Eldar9x]

понятно, я думал, само значение ищется .