Windowsの取得

概要
開いているWindow一覧を取得して出力する。

構文

open ExcelDna.Logging
[<ExcelFunctionAttribute("Excelウィンドウ一覧")>]
let Windows () =
    let ret =  XlCall.Excel(XlCall.xlfWindows, Array.empty)
    let arr = ret :?> obj [,]
    let arr = [ for i in 0..(arr.GetLength(1)-1) -> arr.[0,i] :?> string ]
    let logw s = LogDisplay.WriteLine("{0}", [|s|])
    arr |> List.iter (logw)
    LogDisplay.Show()
    ()

パラメータ
引数なし

戻り値
obj [,] を返す。
実体は1次元配列のWindowの名前一覧

参考元
VBAでは Application.Windows で取得可能?