Macro's

Hi Paul,

Thank you for your question.

I believe the code I was referring to was to open a dialogue box to choose a file.

My colleague won't be able to send you the code until Monday.

I hope this is ok.

Regards

Simon

Hi Paul

As requested please find below the code that will open a dialog box so that the user can open a file.

I'm not sure what exactly you want to open, or whether you wish to save an already open file. The code below can be adapted to do all of these things let me know if you need any more help

    Dim objFilter As FileDialogFilters

    Dim strExcelFile As String



     With Application.FileDialog(msoFileDialogOpen)

        

        Set objFilter = .Filters

        objFilter.Clear

        objFilter.Add "Excel 2003", "*.xls" 'allows for main types of excel workbook

        objFilter.Add "Excel 2007", "*.xlsx"

        objFilter.Add "Excel 2007 Macro Enabled", "*.xlsm"

               

        .Show

        

        strExcelFile = .SelectedItems(1) 'Picks up path and file name

        

        Application.Workbooks.Open (strExcelFile)

            

        

    End With