Version de Windows tipo entero

Hola Grupo,

Tengo una aplicacion en Excel que, debido a sus caracteristicas requiere
Excel XP o posterior y Windows 2.000 o Posterior.

Por ese motivo mi codigo inicia verificando estas condiciones antes de
continuar.

Para verificar Excel XP o posterior no tengo problemas.

Para verificar Windows 2.000 pregunte hace algun tiempo en el foro y recibi
ayuda de Hector Miguel y KL. Con esta ayuda, de una forma muy sencilla pude
crear una funcion que devuelve la version de Windows en la que corren mis
macros, (Devuelve una cadena de caracteres).
Ese es precisamente el inconveniente, que no puedo hacer algo como:
If VersionWindows( ) < 2000 then
Msgbox
Exit Sub
End If

tal como lo hago con la version de Excel.

Tengo 2 equipos, ambos con Windows XP, por tanto se exactamente cual es la
cadena de caracteres que devuelve la funcion personalizada VersionWindows,
pero no se que cadena de caracteres devuelve esta funcion en un equipo con
Windows 98 y 95, Me, etc.

Para no alargar mas la exposicion:
Existe alguna forma de obtener la version de Windows como un numero entero?
de esta manera podria hacer un codigo que verifique si la version de Windows
es mayor a un numero dado? (de otra forma tendria que tener un listado con
todas las posibles cadenas de caracteres que devuelve la funcion para las
diferentes versiones de Windows, sin contar ademas, que si Microsoft saca al
mercado una nueva version de Windows, mi codigo tendria que ser modificado
con la molestia que esto implica).

Saludos,

Henry