Hi,

I was calling a function "Sub testmacro()" from a userform and was having a
problem

Private Sub CommandButtonUpdateIInforce_Click()
total_path2 = Application.GetOpenFilename("Excel Files, *.xls")
Call chg_file_location(total_path2, "H7", "Main")
End Sub

give the error = "by refarg type mismatch"

Is there any way to fix this.

Thanks for all your help!