Dear all,

I'm trying to exclude some data in my access table, but the code
bellow doesn't work. I need that excel to exclude all data in the
table that contains a criteria in two range of excel.

For example:

Table

accounting_code      profit_center       date        value
salary                         3                    01/01/07  100

I have the range a1 for the profit_center and range a2 for the date.
Then I will put in range a1 = 3 and a2 = 01/01/07, then I will click
in a button and excel will exclude all data in access that contains
profit_center = 3 and date = 01/01/07.

Sub exclui_teste()

Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset

Myconn = "C:\Documents and Settings\brspagi\Meus documentos\teste
\controle_despesas.mdb"

Set cnn = New ADODB.Connection
With cnn
   .Provider = "Microsoft.Jet.OLEDB.4.0"
   .Open Myconn
   .Execute "Delete * from orcamento_despesas Where
codigo_centro_cuto = '3'"
   .Close
End With

End Sub

Thanks,

André.