you can't do that with goto as far as I know0you have to manipulate the vbe
   With Application.VBE
      Set .Activevbproject = Workbooks("some_file.xlsm").VBProject
      Set .ActiveCodePane = .Activevbproject.VBComponents("Userform_name").CodeModule.CodePane
   End With