Problem with a Range Name

I have tried to use the following code to copy a given range and paste it into a new workbook which I will then file with a new name.

Sub OutputText(SheetName, RangeName, SaveName, FilePath, FileType)
Dim wbSource As Workbook
Dim wsSource As Worksheet
Dim wbDest As Workbook
Dim fName As String

'References
Set wbSource = ThisWorkbook
Set wsSource = Sheets(SheetName)
Set wbDest = Workbooks.Add

'Copy range on original sheet
10 wbSource.Range(RangeName).Copy

I get an error message "object does not support the named Property or method at line marked 10. In most cases when I have got this error it has been caused by a typo. On this occasion though Rangename is right and the range does exist in wbSource in wsSource. Where else could I have gone wrong?

mehmetcik,
Thanks for your interest.
The routine OutputText is called by the following routine fired by clicking a button on a userform.

Private Sub BTFile_Click()

FilePath = Sheets("Utilities").Range("N16").Value  ' "P:\Andrew and John Southern Shared\Budgets" in this case			


SaveName = "Budget " & Sheets("Utilities").Range("P7").Value  '"2018-2019" in this case

Output FilePath, SaveName, xlOpenXMLWorkbook  'Working copy For Andrew
With Sheets("Budget_For_Cerm")
.Range("Budget_for_Cerm_Clear1").Clear
.Range("Budget_For_Cerm_Clear2").Clear
End With
PasteDownN "Budget_For_Cerm", 1
PasteDownN "Budget_for_Cerm", 2
FileType = xlTEXT
OutputText "Budget_For_Cerm", "Budget_For_Cerm_File", SaveName, FilePath, FileType
End Sub

The routine PasteDownN is simply a way of copying and pasting formulae.
The reason I have two output routines, Output and OutputText, is that Output deals with those situations where I need to copy to several sheets in a new workbook.

Ive changed the offending line to:-

wbSource.wsSource.Range(RangeName).Copy

I still get the same error. If this code is OK I think I must have a typo that I've missed.
John

That's all it was. All is working as I wanted.
Many thanks for your help.
I am a bit puzzled though. When I am working with one workbook with many worksheets it is not necessary to use the worksheet name when referring to a named range, though it is necessary when referring to an ordinary range. This is why I used the workbook name and the rangename only and got the error. There is obviously something here that I don't understand properly.
John