ConnectionString = ReadOnly

[Molden]

Hi All,

I have a CSV I link to from Excel, the problem I am having is if the file is open my code doesn't work.
I have put ReadOnly = True in the code hoping that will fix it but no joy.

Any help would be great.

Thanks

My Code I have been using is:

Sub ImportResults()

Dim strCriteria As String

Set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")


    With cn
        .Provider = "Microsoft.Jet.OLEDB.4.0"
        .ConnectionString = "Data Source=\\SC-LA-FS-01\My Documents\Retail\;" & _
            "Extended Properties='text;HDR=Yes;FMT=delimited;ReadOnly=True'"
        .Open
    End With

    strsql = "SELECT TOP 100 * " 
    strsql = strsql & "FROM [Retail FY Comparison.csv] "
    
    rs.Open strsql, cn
    Sheet1.Cells(9, 2).CopyFromRecordset rs
    rs.Close

cn.Close
Set cn = Nothing


End Sub