VBA: compiler error: expected array OR expression not defined in context

[yky]

I'm having a problem with the code I'm writing. It doesn't compile. Compiler gives an error message saying "expected array" at the following line:

VoucherYear = Trim(Str(Year(VoucherDate)))

The code first opens a user form. I trace the code and everything works fine in the user form. After the user form, the control is transferred to add_voucher() in the main module. Once the control is transferred to the add_voucher() in the main module, in the debug window VoucherDate still shows as 30/4/2013 but Year(VoucherDate) shows "expression not defined in context" while in the userform1, the same function Year(VoucherDate) in the debug windows shows 2013.

What is going on here? Any help would be greatly appreciated.

Public VoucherDate As Date <- declared in the main module above any subroutines

' in userform1 code
............
VoucherDate = Format(TextBox1.Text, "dd-mm-yyyy")
End Sub '<- control goes to add_voucher() in the main module
' at this stage, trim(str(year(VoucherDate))) gives the expected string "2013"

Public Sub add_voucher()

Dim wb As Workbook
Dim thisWorkbookName As String

thisWorkbookName = ActiveWorkbook.Name

Call process_userform1_selection 
......

Sub process_userform1_selection()

VoucherYear = Trim(Str([B][COLOR=#ff0000]Year[/COLOR][/B](VoucherDate))) '<- cannot compile the code. The word "Year" is highlighted.
VoucherMonth = Trim(MonthName(month(VoucherDate)))
......

 

[Comfy]

What type of object is VoucherYear defined as in the process_userform1_selection sub?

 

[RoryA]

Have you declared a variable or function called Year anywhere in your code?

 

[yky]

It is defined as a string.

Dim VoucherYear As String

 

[yky]

Have you declared a variable or function called Year anywhere in your code?

Yes. Can variable and function not have same name?

 

[RoryA]

Yes. Can variable and function not have same name?

They can but its generally not a good idea - you have to be really careful about variable scope and qualifying function calls. Either cajnge the variable name or specify VBA.Year instead of just Year