数字の列番号を文字の列名にする方法


スポンサーリンク

数字の列番号を文字の列名にする方法


行列で処理するには
r:行番号 仮に 4
c:列番号 仮に 10 だったとする

ssht.Cells(RR, CC) = “=int(” + Cells(r, c).Address(False, False) + “/3)”

RR,CC には、
=INT(J5/3)
が、入る。

Addess オプション


Object.Address(RowAbsolute, ColumnAbsolute, ReferenceStyle,External, RelativeTo) ※取得のみ

Object Rangeオブジェクト
RowAbsolute True:行の絶対参照(既定値)、False:相対参照 [省略可能]
ColumnAbsolute True:列の絶対参照(既定値)、False:相対参照 [省略可能]
ReferenceStyle 参照形式の指定を定数で指定。既定値はxlA1 [省略可能]
External True:外部参照形式、False:ローカル参照(既定値)[省略可能]
RelativeTo 相対参照形式での基準となるRangeオブジェクトを指定 [省略可能]

便利な Split 関数


Split
Dim aaa, bbb
aaa = Split(“1$2”, “$”)(0)
bbb = Split(“1$2”, “$”)(1)
aaaには、1 bbbには2 が入る。

Split サンプル



Dim tmp As Variant
tmp = Split(“123,abc,1s23”, “,”)
tmp(0):123
tmp(1):abc
tmp(2):1s23

スポンサーリンク