VBAでセルを結合

質問

いつもお世話になっております。

ＶＢＡで「Ｂ列に●●が入力されたら、Ｂ列から10列はなれたセルから３つ分を結合して、そのセルに××と入力する」という処理を行います。
まだ途中なんですが、こんな感じで考えています。

If B.Value = "火" Then
　　Range(offset0, 10),Resize(1, 3)).MergeCells = True
　　'ここからの処理は未定
　End If

マージした後にさらに値を入れるので、variantかなんかで変数を用意して、その中に入れたほうがいいかな？と考えていますが、どうでしょうか？

回答No.1

mshr1962 · ベストアンサー

こんな設定で良いのでは
If B.Value = "火" Then
B.Offset(0, 10).Resize(1, 3).MergeCells = True
B.Offset(0, 10).Value = "××"
End If

お礼

できました！
ありがとうございます。