Visual Basic - RE:no Funiona :( no se ke es SQL

Yo creo que lo que pasa es que comparar entre campos string puede no darte muy buen resultado, quizas en la tabla Mtto_reg_Activos en el campo Localizacion tenes el valor ARGENTINA y en la otra tabla en el campo Descripcion tenes ARgeNtinA esos dos valores ya no son iguales. Buscar por un campo string no es lo optimo, pero en fin...=)
Una solucion podria ser comparar asegurandote que las dos cadenas estan en mayusculas:

Data1.RecordSource = "Select * From Mtto_reg_Activos where UCase(Localizacion)='" & UCase(Data2.Recordset("Descripcion")) & "' "

Ok. espero que te sirva.Saludos