Not sure what the question is and why want to use the UserAccounts
CommonDialog
Guessing, if you want to browse to a file with a view to opening it, try
something like this -
Sub getOpenFile()
Dim sFile As String
Dim vReturn As Variant
vReturn = Application.GetOpenFilename()
If VarType(vReturn) = vbBoolean Then
MsgBox "User cancelled"
Else
sFile = vReturn
MsgBox sFile
End If
End Sub
See GetOpenFilename in help and its optional arguments.
If you are trying to do something else explain what the overal objective is
Regards,
Peter T