File dialog box to open a excel file then copy data close file

Hi Everyone
I trying to edit the following code so I open a file dialog box point to the excel file I need then copy the range I have to the work book I am working in

Any help Please and Thanks

Sub UpdateMembers()
 
 Dim my_FileName As Variant
 
    Workbooks.Open fileName:= _
     "C:\Users\user\Documents\ORHA Futurity\Master Orha Member 2018-v3.5.xlsm"
    Application.EnableEvents = False

Range("B5:N300").Select
         Selection.Copy
            Windows("ORHA Futurity Program.xlsm").Activate
        ActiveSheet.PasteSpecial
        Application.CutCopyMode = False
        Range("b5").Select
        Windows("Master Orha Member 2018-v3.5.xlsm").Activate
        ActiveWindow.Close False

End Sub