列番号_function

Funciton cNo(Optional ByVal clS as String)as Long

    cNo= Range(clS &1).Column

End Function

 

 cNo("B")で、2

cNo("BB")で、54

って算定されるので、変数に何も考えずに入れられます。

t=cNo("BB")

とかですね。

 重宝するのは、

2次元配列にした時の列の次元番号を、列名で指定できるので、

重宝してます♪