Selectrangeで読み込む位置を動的にしたい

以下のようなファイルでsheet1のコードに対応する合計をsheet2の結果に張り付けたいです


(例:sheet1のコードが2の場合、sheet2のb2に張り付け)


上 のような記述をしており、コードの値がランダムなので selectrangeの範囲をx列目の2行目のように指定したいのですが、列の指定ができずブレークポイントをはっている所でエラーになってしまいます。

どのように修正したらよいか教えてください。
よろしくお願いします。

selectrangeの範囲には、セルアドレスを指定するシーンになります。
キャプチャを拝見すると、シートのRowIndex+1行目のItemIndex列の中身をセルアドレスと見なしていますので、そこが変なのでしょう。

ItemIndexの値に対応する列英字を求めて、それに"2"を付加したものをセルアドレスとして指定してください。

さて、ItemIndexからどのように列英字にするか。。。

一番安直なのは、{“A”,“B”,“C”}と言うString型配列(変数名を”列英字”とします)を定義し、A列(ItemIndex=0)の場合は、「列英字(ItemIndex)」のようにします。