Problemas con declaración de sentencia SQL

Del siguiente extracto programilla
Private Sub DBComboProveedor_Click(Area As Integer)
' Cargo el dbGrid
If Area = dbcAreaList Then
DataProveedor.Recordset.Bookmark = DBComboProveedor.SelectedItem
DataAlbaranes.RecordSource = "SELECT * FROM [Albaranes] WHERE [Proveedor] = '" & DataProveedor.Recordset("Proveedor") & "'"
DataAlbaranes.Refresh
DataAux.RecordSource = "SELECT * FROM [Albaranes] WHERE [Proveedor] = '" & DataProveedor.Recordset("Proveedor") & "'" And [Cobrada] = "'NO'"
DataAux.Refresh
End If
me dice "Nombre externo no definodo" y me marca el Recordset de la sentencia DataAux.RecordSource = "SELECT * FROM [Albaranes] WHERE [Proveedor] = '" & DataProveedor.Recordset("Proveedor") & "'" And [Cobrada] = "'NO'"
¿Por qué demonios no lo pilla?