Sheet1から2つのセルを1つのセルSheet2に連結する

編集：それを捨てた迷惑なコードを見つけました。みんな、ありがとう！

連結するコードを見つけようとしています

Worksheets("Sheet1").Range ("B2:C2")

この参照セルには、区切り文字として " - "文字を使用します。

Worksheets("Sheet2").Range ("B2")

私は以下を試しましたが、それは "範囲外の添字"と言っています：

Worksheets("Sheet2").Range("B2").Cell.Value = 
  Worksheets("Sheet1").Range("B2").Cell.Value & 
    Worksheets("Sheet1").Range("C2").Cell.Value

私もこれを試しました、しかしそれはただSheet2.C2にSheet1.C2をコピーします：

Set sourceRange = Worksheets("Sheet1").Range("B2:C2")
Set targetRange = Worksheets("Sheet2").Range("B2")

sourceRange.Copy
targetRange.PasteSpecial Paste:=xlPasteValues

これに関するどんな助けでも評価されるでしょう。前もって感謝します！

あなたは余分だ cell の

Worksheets("Sheet2").Range("B2").Value = Worksheets("Sheet1").Range("B2").Value & Worksheets("Sheet1").Range("C2").Value

うまくいくはずです。