Как получить Excel для обновления электронной таблицы для Excel-DNA RTD?

Question

Я использую пример Excel-DNA в качестве основы для этого теста.

Я хочу, чтобы Excel показывал свои обновленные данные в ячейке B1 каждую 1 секунду.

Это нормально работает в течение первых 5 секунд, затем я получаю таймер и приходится ждать окончания функции, чтобы увидеть только последнее значение.

Как заставить обновление отображаться в электронной таблице на каждом цикле цикла?

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using ExcelDna.Integration;
using System.Threading.Tasks;
using System.Diagnostics;    

namespace BTPRTD
{
    class Program
    {
        static void Main(string[] args)
        {
        }
    }

    public static class MyFunctions
    {
        public static MouseData MData;

        [ExcelFunction(Description = "My first .NET function")]
        public static string SayHello(string name)
        {
            //Debugger.Launch();
            MData = new MouseData ();

            Task.Factory.StartNew(() =>
            {            
                ExcelAsyncUtil.QueueAsMacro(() =>
                {
                    KeepWritingData();
                });
            }); 
            return "Hello " + name;  
        }

        public static void KeepWritingData()
        {
            var refB1 = new ExcelReference(0, 0, 1, 1, "Sheet1");
            string dataTxt = "";
            for (int i = 0; i < 100; i++)
            {
                try
                {
                    MouseData .CurrentPriceData CPD = MData.GetCurrentPriceNT("White mouse");
                    dataTxt = CPD.AsString();
                }
                catch (Exception)
                {
                    dataTxt = "Data Unavailable";
                }

                refB1.SetValue("Ding: " + i + " " + dataTxt);
                System.Threading.Thread.Sleep(1000);
            }
        }
    }
}

Answer 1

Excel поддерживает тип функции листа, называемый RealTimeData (RTD), который вы должны использовать для своего сценария.

Следуйте примерам в репозитории " Samples" GitHub. В частности, взгляните на пример RtdClocks, который использует Observable Timer:

public static class RtdClock
{
    [ExcelFunction(Description = "Provides a ticking clock")]
    public static object dnaRtdClock_Rx()
    {
        string functionName = "dnaRtdClock_Rx";
        object paramInfo = null; // could be one parameter passed in directly, or an object array of all the parameters: new object[] {param1, param2}
        return ObservableRtdUtil.Observe(functionName, paramInfo, () => GetObservableClock() );
    }

    static IObservable<string> GetObservableClock()
    {
        return Observable.Timer(dueTime: TimeSpan.Zero, period: TimeSpan.FromSeconds(1))
                         .Select(_ => DateTime.Now.ToString("HH:mm:ss"));
    }
}