2011-08-01から1ヶ月間の記事一覧

列Noから列名を取得して返すFunctionを作ってみた

出先ではVB6とExcel VBAを駆使している私。 いろいろあって「クリックしたセルの10列右」とかやりたい時がある。 現在の列 = Activecell.Column とやれば、アクティブなのがA列なら「1」が返ってくる。 なので、例えば 現在の列の10列右 = chr(Activecell.Co…

列名から列Noを取得して返すFunctionを作ってみた

「列Noから列名を取得して返すFunctionを作ってみた」に続いて、逆バージョンも作ってみた。 MsgBox getColumnNoFromColumnName("A") とすると、「1」と表示される。 引数として"Z"を与えれば「26」が返ってくるし、"AA"を与えれば「27」が返ってくる。 ちな…