エクセルのマクロについて教えてください。

マクロを実行して
セル値をコピペしたいのですが、コピー先のセルが「セルの書式設定」で「セルの結合」を行っているために、マクロが実行されません。
解決方法を教えてください。
マクロ
Sub 新築()
Sheets("FDデータ").Range("AC51").Copy
Sheets("提出シート").Range("D17").PasteSpecial xlPasteValues
End Sub
が有ります、マクロを実行するとシート名「FDデータ」セル値「AC51」が
コピー先シート名「提出シート」のセル値「D17」にコピーされますが
コピー先のセル値「D17」がセル「D17、E17、F17」を結合して「D17」になっており、
マクロを実行しても
「Sheets("提出シート").Range("D17").PasteSpecial xlPasteValues」部分が黄色くなり
エラーが出て、マクロが実行出来ません。
コピー先のセル値を結合してもマクロが実行出来る方法を教えてください。
よろしくお願いします。

No.2 ベストアンサー 回答者： str1234 回答日時： 2023/02/28 17:11

こんにちは。

以下のコードでいかがでしょうか？

Sub 新築()
Sheets("提出シート").Range("D17").UnMerge
Sheets("FDデータ").Range("AC51").Copy
Sheets("提出シート").Range("D17").PasteSpecial xlPasteValues
Sheets("提出シート").Range("D17:F17").Merge
Sheets("提出シート").Range("D17").HorizontalAlignment = xlLeft
End Sub

この回答へのお礼

回答ありがとうございました。
早速試してみます。

お礼日時：2023/02/28 17:13

No.1 回答者： fujillin 回答日時： 2023/02/26 13:29

こんにちは

手操作でできないことは、マクロでもできません。
（結合形状の異なるセル間ではコピペはできない）

>コピー先のセル値を結合してもマクロが実行出来る方法
値を転記すれば良いだけなら、
　セルB.Value = セルA.Value
とすれば、結合状態と関係なく転記可能です。
（結合セルの場合は、左上のセルを指定する必要があります）

この回答へのお礼

回答ありがとうございます。
参考にさせて頂きます。

お礼日時：2023/02/26 13:35