Visual Basic - Convertir de .xls a .dbf

Hola, tengo un problemilla que quizá me podáis resolver alguno.

Tengo montado un proceso en Visual Basic que convierte un fichero xls a un fichero dbf que se guarda mediante el método SaveAs.
El problema que tengo es que lo hace utilizando un código de página por defecto y hay datos como las "ñ" que las guarda mal. Hay una propiedad de tipo Variant que es el TextCodePage que me permite guardarlo con un código de página concreto (en mi caso sería 850 - International MS-DOS, creo). Bueno, pues ahí va la pregunta, ¿alguien sabe los valores que puede tomar el parámetro TextCodePage?

Este es el fragmento del código:

Public Sub ConvierteXLS_DBF()
Dim eBase As Excel.Application
Dim wLibro As Excel.Workbook
Dim wHoja As Excel.Worksheet

'-- creamos el objeto FileSystem Object
Set fs = CreateObject("Scripting.FileSystemObject")

'Iniciamos la instancia de Excel
Set eBase = New Excel.Application

'Abrimos elfichero de Vida
Set wLibro = eBase.Workbooks.Open(PonBarra(Ruta_DirOrigen) & Nombre_fichero_Vida)

...

'comprobamos que el fichero no exista
If Len(Dir$(PonBarra(Ruta_DirOrigen) & "Vida.dbf")) > 0 Then

'Existe y lo borramos
fs.Deletefile PonBarra(Ruta_DirOrigen) & "Vida.dbf"

End If

'Guardamos el fichero con formato DBF
wLibro.SaveAs PonBarra(Ruta_DirOrigen) & "Vida.dbf", xlDBF4

'Cerramos el fichero
wLibro.Close savechanges:=False


'Cerramos la instancia de Excel
eBase.Workbooks.Close

eBase.Quit

Set eBase = Nothing
Set wLibro = N