DEAR RESPECTED SIR need ur help
When I Run This Macro I Want To Prompt A MsgBox or Option Box Who Asked For Choose The File Name ( workbook name ) Option
and then copy data range from active worksheet to workbook name
in this code source workbook name is ("5.3.14") and destination workbook name is ("6.3.14")
i want always prompt a box who asked for destination workbook name and then copy data to new workbook name
Sub copypaste()
'
' copypaste Macro
'
'
Range("C10:G11").Select
Range(Selection, Selection.End(xlDown)).Select
ActiveSheet.Range("$A$9:$I$500").AutoFilter Field:=9, Criteria1:=">0", _
Operator:=xlAnd
Selection.Copy
Windows("6.3.14.xlsm").Activate
Range("C61").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Windows("5.3.14.xlsm").Activate
Range("G64").Select
End Sub
Bookmarks