Folder path error

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • NigelBrown
    New Member
    • Oct 2009
    • 34

    Folder path error

    Hi All,
    Hope this is the right forum for this, I have written the below code but the specific file will not open under mFolder1 - any ideas as to what I have done wrong ? really appreciate it - I get "run time error 1004 Method'OpenText ' of object 'Workbooks' failed"

    [Code=vb]
    Sub RunRec()

    Dim mToday As Variant
    Dim mFolder As String

    mToday = Date
    Do
    mToday = mToday - 1
    Loop Until Weekday(mToday) <> vbSaturday And Weekday(mToday) <> vbSunday
    mFolder = Format(mToday, "dd_mmm_yyy y")
    mFolder1 = "\\gblond38\dat a\Reports\" & mFolder & " \csv\XRATE_EXTR ACT\XRATE_EXTRA CT" & ".CSV"""""

    Workbooks.OpenT ext Filename:=mFold er1

    End Sub
    [/Code]
  • CyberSoftHari
    Recognized Expert Contributor
    • Sep 2007
    • 488

    #2
    Verify the file path and file name is generated properly in network.

    Comment

    Working...