別sheetからCopyしてpeste 1月 20, 2020 Sub test4() Worksheets("対応用").Range("F4:F13").Copy Worksheets("権限付与").Range("F3") End Sub