Excel ExcelDNA C# / Попытка скопировать поведение Bloomberg BDH() (запись Array после веб-запроса)

Я хочу скопировать поведение Bloomberg BDH.

BDH делает веб-запрос и записывает массив (но не возвращает стиль массива). Во время этого веб-запроса функция возвращает «#N/A Requesting». Когда веб-запрос завершен, функция BDH() записывает результат массива в рабочий лист.

Например, в ExcelDNA мне удается писать на листе нитью.

Результатом, если вы используете приведенный ниже код в файле ДНК, результатом

=WriteArray(2;2)

будет

Строка 1 > #Н/Д Запрос данных ( 0,1)

Строка 2 > (1,0) (1,1)

Последняя проблемазаключается в замене #N/A Requesting Dataзначением и скопируйте формулу. Когда вы раскомментируете //xlActiveCellType.InvokeMember("FormulaR1C1Local", вы близки к результату, но у вас нет правильного поведения

Файл .dna

 <DnaLibrary Language="CS" RuntimeVersion="v4.0">
<![CDATA[

using System;
using System.Collections.Generic;
using System.Reflection;
using System.Runtime.InteropServices;
using System.Threading;
using ExcelDna.Integration;


    public static class WriteForXL
    {

        public static object[,] MakeArray(int rows, int columns)
        {
            if (rows == 0 && columns == 0)
            {
                rows = 1;
                columns = 1;
            }


            object[,] result = new string[rows, columns];
            for (int i = 0; i < rows; i++)
            {
                for (int j = 0; j < columns; j++)
                {
                    result[i, j] = string.Format("({0},{1})", i, j);
                }
            }

            return result;
        }

        public static object WriteArray(int rows, int columns)
        {
            if (ExcelDnaUtil.IsInFunctionWizard())
                return "Waiting for click on wizard ok button to calculate.";

            object[,] result = MakeArray(rows, columns);

            var xlApp = ExcelDnaUtil.Application;
            Type xlAppType = xlApp.GetType();
            object caller = xlAppType.InvokeMember("ActiveCell", BindingFlags.GetProperty, null, xlApp, null);
            object formula = xlAppType.InvokeMember("FormulaR1C1Local", BindingFlags.GetProperty, null, caller, null);

            ObjectForThread q = new ObjectForThread() { xlRef = caller, value = result, FormulaR1C1Local = formula };

            Thread t = new Thread(WriteFromThread);
            t.Start(q);            

            return "#N/A Requesting Data";
        }

        private static void WriteFromThread(Object o)
        {
            ObjectForThread q = (ObjectForThread) o;

            Type xlActiveCellType = q.xlRef.GetType();

            try
            {
                for (int i = 0; i < q.value.GetLength(0); i++)
                {
                    for (int j = 0; j < q.value.GetLength(1); j++)
                    {
                        if (i == 0 && j == 0)
                            continue;

                        Object cellBelow = xlActiveCellType.InvokeMember("Offset", BindingFlags.GetProperty, null, q.xlRef, new object[] { i, j });
                        xlActiveCellType.InvokeMember("Value", BindingFlags.SetProperty, null, cellBelow, new[] { Type.Missing, q.value[i, j] });             
                    }
                }                               
            }
            catch(Exception e)
            {                
            }
            finally
            {
                //xlActiveCellType.InvokeMember("Value", BindingFlags.SetProperty, null, q.xlRef, new[] { Type.Missing, q.value[0, 0] });
                //xlActiveCellType.InvokeMember("FormulaR1C1Local", BindingFlags.SetProperty, null, q.xlRef, new [] { q.FormulaR1C1Local });               
            }
        } 

public class ObjectForThread
        {
            public object xlRef { get; set; }
            public object[,] value { get; set; }
            public object FormulaR1C1Local { get; set; }
        }

    }

    ]]>

</DnaLibrary>

@To Govert

BDH стал стандартом в финансовой индустрии ... Люди не умеют манипулировать массивом (даже Ctrl+Shift+Enter).

BDH — это функция, сделавшая Bloomberg такой популярной (в ущерб Reuters).

Однако я подумаю об использовании вашей метод или РДТ.

Спасибо за вашу работу над ДНК Excel