Cellの情報を取得

概要
Cells(3,3)のセル情報を1列目のセルに1〜100番まで出力する。

構文

[<ExcelFunctionAttribute("セル情報")>]
let GetCellInfo () =
    let cell = new ExcelReference(0,2)
    let gci i = XlCall.Excel(XlCall.xlfGetCell, i, cell)
    let sv row value =
        let cell = new ExcelReference(row, 0)
        cell.SetValue(sprintf "%A" value) |> ignore
    seq { 1..100 }
    |> Seq.iter(fun i ->
        gci i
        |> sv i
    )
    ()

パラメータ
第二引数
※下記の「セル情報の種類」を参照

第三引数
ExcelReference オブジェクト

戻り値
コマンド実行に成功した場合は true を返す。それ以外は false を返す。

参考元
サンプルの ArrayResizer.dna より

セル情報の種類

type	Discription	ret
1	参照セルの絶対パス	"[ExcelDnaSamples.xlsx]Sheet1!$C$1"
2		1.0
3		3.0
4		2.0
5	テキスト	"あいうえお"
6	数式	"="あいうえお""
7	表示形式	"G/標準"
8		3.0
9		6.0
10	罫線(左)	1.0
11	罫線(右)	5.0
12	罫線(上)	2.0
13	罫線(下)	1.0
14		true
15		false
16		30.38; false
17		43.5
18	フォント名	"ＭＳ Ｐゴシック"
19	フォントサイズ	36.0
20		false
21		false
22		false
23		false
24		0.0
25		false
26		false
27		0.0
28		1.0
29		1.0
30		false
31		false
32		"[ExcelDnaSamples.xlsx]Sheet1"
33		false
34		0.0
35		0.0
36		0.0
37		0.0
38		2.0
39		0.0
40		"標準"
41		"="あいうえお""
42		134.5
43		14.5
44		320.5
45		58.0
46		false
47		false
48		true
49		false
50		2.0
51		0.0
52		""
53		"あいうえお"
54		ExcelErrorNA
55		ExcelErrorNA
56		ExcelErrorNA
57		false
58		"標準"
59		1.0
60		false
61		ExcelErrorNA
62		"[ExcelDnaSamples.xlsx]Sheet1"
63		2.0
64		0.0
65		false
66		"ExcelDnaSamples.xlsx"