Just one problem with this code
Code:
lngCurrent = Right$(.Name, 1)
This piece of code comes up with the error:
Runtime error 13
Type Mismatch

Please help
Thanks