請問:將資料貼到對應名稱的工作表中方法... - 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

靜思自在 : 【蒙蔽的自由】人常在什麼都可以自由自在的時候，卻被這種隨心所欲的自由蒙蔽，虛擲時光而毫無覺知。