VBAマクロについてご教示ください。現在下記のマクロ記述ですが、コピーL27:68 ペーストB16:B57コピーO27:P67 ペーストE16:F56コピーR27:R67 ペーストH16:H56を加えたいです。どのようにどこに入れればよいのでしょうか。よろしくお願いいたします。Sub 発注書値コピペ()With Worksheets(\u0026quot;発注書\u0026quot;).SelectRange(\u0026quot;L27:L68\u0026quot;).CopyOn Error Resume NextRange(\u0026quot;B16:B57\u0026quot;).SelectSelection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False Application.CutCopyMode = False Range(\u0026quot;b3\u0026quot;).SelectActiveCell.Offset(1, 0).Activate End WithEnd Sub

1件の回答

1109481

2026-01-21 22:10

全て値貼り付けで良いのでしょうか？

Copyではありませんが

Sub 発注書値コピペ()

With Worksheets(\u0026quot;発注書\u0026quot;)

.Range(\u0026quot;B16:B57\u0026quot;).Value = .Range(\u0026quot;L27:L68\u0026quot;).Value

.Range(\u0026quot;E16: F56\u0026quot;).Value = .Range(\u0026quot;O27: P67 \u0026quot;).Value

.Range(\u0026quot;H16: H56\u0026quot;).Value = .Range(\u0026quot;R27: R67 \u0026quot;).Value

.Range(\u0026quot;B4\u0026quot;).Activate

End With

End Sub

うったえる有益だ（0）シェアするブックマークする

1件の回答

1109481

人気話題

関連質問