請問:將資料貼到對應名稱的工作表中方法... - Excel程式區

[發問] 請問:將資料貼到對應名稱的工作表中方法...

1^# 跳轉到 »

發表於 2017-5-1 17:38 | 顯示全部帖子

Sub Macro()
With Worksheets("送審表單")
　　　If .[A2] = "" Then Exit Sub
　　　.[a2:f2].Copy Sheets(.[A2].Value).[A65536].End(xlUp)(2)
End With
End Sub

靜思自在 : 做好事不能少我一人，做壞事不能多我一人。