【VBA】結合されたセルのコピー&ペーストは出来ないため、代入する

結合されたセルのコピー&ペーストを試みると、
エラーとなりコピー&ペースト出来ません。

Sub sample()
    'セル「B2」の値をセル「B7」へコピーする
    Range("B2").Copy Range("B7")
End Sub

コピーしたいものが「値のみ」の場合は、
代入により同様のことが実現できます！

VBAコード

Sub sample()
    'セル「B2」の値をセル「B7」へ代入する
    Range("B7").Value = Range("B2").Value
End Sub

無事にセル「B2」の値をセル「B7」へ代入することができました。