Set .dbclientes.RowSource = RSclientes .dbclientes.ListField = "clientes" .dbclientes.BoundColumn = "razon_social" End With