質問: "=TEXTJOIN(""-"",1,$A$4:$A" & LastRow & ")" Sheets("コピー元").Range("A""& LastRow).Copy _ Destination:=Sheets("コピー先").Range("A1") ``` ### 試したこと webでしらべましたが解決できませんでした。 ### 補足情報(FW/ツールのバージョンなど) ここにより詳細な情報を記載してください。
回答: > > Sheets("コピー元").Range("A""& LastRow).Copy _ > > > `"A""`になっているからでしょうか。 →正`"A"` またTEXTJOINを設定しているところでは、対象行を+1してますが、Copyの行はしていません。 こちらも+1しないとダメな気がします。 以上をまとめるとこうなります。 ``` Sheets("コピー元").Range("A""& LastRow).Copy _ ↓ Sheets("コピー元").Range("A" & LastRow + 1).Copy _ ```