VBA for Popup to select a file

[blnswamy]

Hi
I am working on a project where i need to create a macro and give it to a user. The task is to create a popup window so that the user can select a file from a folder in their PC.
Thank you

 

[Norie]

The first thing you need to do is open the file the user has selected.

    Set wbAfter = Workbooks.Open(AfterFileName)

Now what you want to copy isn't exactly clear.

This will copy the first worksheet from wbAfter to the workbook the code is in.

wbAfter.Worksheets(1).Copy After:=ThisWorkbook.Worksheets(ThisWorkbook.Worksheets.Count)

This will copy the data from the first worksheet to a new sheet in the workbook the code is in.

Set wsNew = ThisWorkbook.Worksheets.Add

wbAfter.Worksheets(1).UsedRange.Copy wsNew.Range("A1")

Once you are finished with the workbook the user selected you can close it.

wbAfter.Close SaveChanges:=False