Hi Scott,
Sub Environ_Check()
Dim r As Long
Dim P As Long
r = 1
Do
Cells(r, 1) = r
Cells(r, 2) = Environ$(r)

P = InStr(1, Cells(r, 2), "=")
Cells(r, 3) = Left$(Cells(r, 2), P - 1)

' 'or the following with Excel 2000
' Cells(r, 3) = Split(Cells(r, 2), "=")(0)
r = r + 1
Loop Until Len(Environ$(r)) = 0
Columns("A:B").AutoFit
[A1].Select
End Sub


--

John

johnf202 at hotmail dot com


"Scott Warren" wrote in message
...


I'm looking to see if any has a list, or know where I can
get a list of variables that I can use the Environ()
function on. Specifially I'm trying to log a users Domain
when they open the file. I've been able to get the
following variable so far:


User = Environ("USERNAME")
Machine = Environ("COMPUTERName")


Thanks,

-Scott