Get value of formula into userform textbox

Hi,

The bellow are the few lines of code from a long subroutine

                    With Sheet2.Range("F2")
                        .Formula = "='" & CStr(strPath) & "\" & "[" & objfolder.GetDetailsOf(strFileName, 0) & "]" & "Company'!B4"

                         Me.txtDomain = .Value
                    End With

Means I am getting value from a closed workbook's Sheet "Company" and Cell B4 in activewrokbooks's F2 and then loading that value into txtdomain. Any way to get rid of the bridge (F2) and get the value directly into txtDomain?