Matt,

Used the following with a CommandButton (Caption:="View Notes")

[VBA]
Private Sub CommandButton1_Click()
Unload Me
Dim SourceRange As Excel.Range
Dim Val1 As String, Val2 As String, Val3 As String
Set SourceRange = Range("Sheet1!A2:W2")

Val1 = UserForm1.ListBox1.Value
Val2 = SourceRange.Offset(UserForm1.ListBox1.ListIndex, 1).Resize(1, 1).Value
Val3 = SourceRange.Offset(UserForm1.ListBox1.ListIndex, 2).Resize(1, 1).Value

Dim sPath As String

sPath = "C:\Documents and Settings\tccmdr\Desktop\Working Projects\Employee Database\" & Val1 & Chr(44) & Chr(32) & Val2 & Chr(32) & Chr(32) & Val3 & ".txt"

If FExist(sPath) Then

Dim RetVFile
RetVFile = Shell("C:\WINDOWS\notepad.exe C:\Documents and Settings\tccmdr\Desktop\Working Projects\Employee Database\" & Val1 & Chr(44) & Chr(32) & Val2 & Chr(32) & Chr(32) & Val3 & ".txt", 1)
Else
Unload Me
MsgBox "No file currently exists for the employee selected.", vbInformation + vbOKOnly, "File Search Results"
End If
End Sub
[/VBA]