Testing from chrome store:
Code:
        Sub test()
        
            Dim cn As ADODB.Connection
            Dim rs As ADODB.Recordset
            Dim sql As String
            
            Rem A full line comment
            Set cn = New ADODB.Connection 'end of line comment
            cn.ConnectionString = _
                "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\MYFILEPATH;Extended Properties='text;HDR=Yes';"
            cn.Open
        
            sql = "Select * FROM " & "[MYFILE.CSV]"
            
            'Something else
            Set rs = cn.Execute(sql)
        
        End Sub