Creo que podes utilizar variables de entorno WinDir y seria algo asi:
- Dim SO as string 
- SO = Environ("Windir") 
-   
y te devolvera la unidad + \WINDOWS
Saludos.
Ok, pero mejor pon 
$ despues de 
Environ que si no queda como 
Variant... 

-     Dim SO As String 
-     SO = Environ$("Windir") 
Si quieres saber todas las posibilidades de 
Environ abres el 
CMD y escribes:
Te saldra una lista con las variables de rutas que puedes utilizar... 

Salu2! 
