MacroFacili: Valore delle variabili di sistema

A volte è utile accedere alla variabili di sistema da VBA, ad esempio per avere:

Nome del dominio / Utente;
Nome del computer;
Directory di sistema, dei programmi, dell'utente, dei file temporanei;
Processore;
Sistema operativo.

Si può accedere direttamente alla variabile con: Environ$("Nome") oppure tramite indice con Environ(Idx)

La macro qui sotto mostra come accedere ad alcune variabili (quelle più usate per esperienza):

Sub Get_Environment_Variables()
  ComputerName = Environ$("COMPUTERNAME")
  UserDomain = Environ$("USERDOMAIN")
  UserName = Environ$("USERNAME")
  TempDir = Environ$("TEMP")
End Sub

Volendo invece visualizzare tutte le variabili con il loro valore:

Sub List_All_Environment_Variables()
  Dim EnvString As String
  Idx = 1
  Do
    EnvString = Environ(Idx)
    Cells(Idx , 2) = EnvString
    Idx = Idx + 1
  Loop Until EnvString = ""
End Sub