Palabras clave: entorno, environ, variables
Autor: Sergio Alejandro Campos
Extraído de: EXCELeINFO (https://www.exceleinfo.com/macro-y-formulario-en-excel-para-obtener-las-variables-de-entorno-de-windows/)
La necesidad surge al necesitar saber si existe una variable de entorno que devuelva el nombre del usuario "bonito" (que no existe) y no saber las posibles variables que se pueden consultar.
Sergio nos brinda este código (requiere un libro con una "Hoja1" y habilitado para macros
Sub MostrarVariables()
'Declaramos variables
'
Dim i As Integer
'
i = 1
'
'Mientras el valor de Environ NO sea vacío, se obtiene el valor.
While Environ(i) <> Empty
'
ActiveWorkbook.Sheets("Hoja1").Range("A8").Offset(i, 0).Value = Environ(i)
'
i = i + 1
'
Wend
'
End Sub