各位達人好~
我是vba的新手
想請問一下
我想從一個excel表複製到另一個excel表
我寫的如下
可是貼過去後,把算式還有格式都貼上了
但我只想貼上數值
我該如何改
謝謝
Application.DisplayAlerts = False
Dim y, m, d
y = InputBox("輸入月份(yyyy)")
m = InputBox("輸入月份(MM)")
d = InputBox("輸入日期(DD)")
Data1 = "http://rptap/report/Daily/DailyWaferYield/DailyWaferYield-" & y & "-" & m & "-" & d & ".xls"
Workbooks.Open Filename:=Data1
Range("d4:ah4").Copy ThisWorkbook.Sheets("data-" & m).Range("d7:ah7")
End Sub作者: 准提部林 時間: 2015-10-30 13:28