Excel VBA 質問スレ Part75

[1 デフォルトの名無しさん (ｽﾌｯ Sd7f-wadS) 2022/02/09(水) 14:24:32.62 ID:I0u44nFvd]

!extend:checked:vvvvv:1000:512
!extend:checked:vvvvv:1000:512
↑2行に減ってるけど、同じ内容を3行に増やして貼り付けるナリ

ExcelのVBAに関する質問スレナリ
コード書き込みや作成依頼もOKナリ

※前スレ
Excel VBA 質問スレ Part74
https://mevius.5ch.net/test/read.cgi/tech/1639932059/

---

VIPQ2_EXTDAT: checked:vvvvv:1000:512:: EXT was configured

[109 デフォルトの名無しさん (ﾃﾃﾝﾃﾝﾃﾝ MMde-FK1Z) 2022/02/17(木) 20:56:15.04 ID:4vzfA+8GM]

Rangeの後のCellsにもシート指定が必要

[110 デフォルトの名無しさん (ﾜｯﾁｮｲ 9242-YeJ5) 2022/02/17(木) 21:03:41.49 ID:lNAQUSmM0]

それ案外忘れやすいよな

[111 デフォルトの名無しさん (ﾜｯﾁｮｲ 1201-iAv0) 2022/02/17(木) 21:06:37.67 ID:Lj9EVaDX0]

>>108
>>109 の言う通りで
With WorkSheets(”シート名”)
.Range(.Cells(変数, 1), .Cells(変数, 20)).Value =配列
End With
が定番

[112 デフォルトの名無しさん (ﾜｯﾁｮｲ 6368-B80Q) 2022/02/17(木) 21:19:48.40 ID:lbVsnXnA0]

>>111
setの方が好きだわ

set ws = WorkSheets(”シート名”)
ws.Range(ws.Cells(変数, 1), ws.Cells(変数, 20)).Value =配列