Access - Función

Resuelto
CLABEN Mensajes publicados 23 Estado Miembro -  
Samygale Mensajes publicados 46 Estado Miembro -
Hola,
Windows XP – Access 2000.
He creado una función para filtrar registros. Cuando activo la función, recibo el siguiente mensaje: "la expresión ingresada contiene un nombre de función no encontrado". Al abrir la función en modo de edición, noto que en la parte superior derecha la configuración es "(Declaraciones)" y el nombre es "F_Filtrar" (ese es el nombre dado a la función). Si selecciono "F_Filtrar" y guardo; al utilizarla, la configuración se desactiva y vuelve a "(Declaraciones)". Cabe destacar que la función ha funcionado correctamente 2 o 3 veces. No entiendo.
Gracias por sus respuestas
Configuración: Windows XP Access 2000

5 respuestas

  1. Samygale Mensajes publicados 46 Estado Miembro 1
     
    Hola,
    Las listas de las que hablas simplemente permiten saber en qué sección de código se encuentra tu cursor ("Declaraciones" cuando el cursor está al principio del módulo...).
    ¿Esta función F_Filtrar es llamada por un botón?
    0
    1. claben
       
      Gracias por la respuesta
      - ok para la posición del cursor
      - desde un botón colocado en el formulario, activo una macro para
      a) Abrir Formulario
      b) Ejecutar Código ... Nombre de la función: F_Filtrar()
      Lo más sorprendente es que el comando funcionó 3 o 4 veces !!!
      0
  2. Samygale Mensajes publicados 46 Estado Miembro 1
     
    Désolé, je ne peux pas fournir de code.
    0
    1. claben
       


      Función F_Filtrer()
      Filtre1 = "[Lettre] Like ""*"" & forms![F_Fiche_Selection].[CXPROP] & ""*"""
      Filtre2 = "[Entreprise] Like ""*"" & forms![F_Fiche_Selection].[CXENTMAT] & ""*"""
      Filtre3 = "[Designation] Like ""*"" & forms![F_Fiche_Selection].[CXDES] & ""*"""
      DoCmd.OpenForm "F_Fiche_Selection_Resultat", acNormal, "", Filtre1 & " And " & Filtre2 & " And " & Filtre3, , acNormal
      End Function
      0
  3. Samygale Mensajes publicados 46 Estado Miembro 1
     
    Filtre1 = "[Letra] Like '*" & forms![F_Fiche_Selection].[CXPROP] & "*'"

    Filtre1 = "[Letra] Like '*" & forms![F_Fiche_Selection].[CXPROP] & "*'"
    ==> [Letra] Like '*VALOR*'

    ¿Qué línea te devuelve un error?
    0
    1. claben
       
      No tengo mensaje de error de línea. Cuando activo la función a través de la macro, recibo el siguiente mensaje: "la expresión ingresada contiene un nombre de función no encontrado".
      0
  4. Samygale Mensajes publicados 46 Estado Miembro 1
     
    Re,
    ¿Hay caracteres ' o " en tus datos de filtro por casualidad?
    0
    1. claben
       
      Hola,

      ... acabo de encontrar ...

      en el modo, en la ventana de la izquierda, en la parte superior, tenía:

      (nombre) ... F_Filtrar

      he modificado

      (nombre) ... F_Filtrar()

      ... y funciona.

      y muchas gracias por tu ayuda. Gracias
      0
  5. Samygale Mensajes publicados 46 Estado Miembro 1
     
    ah ok, bueno, no estaba en eso en absoluto :)
    0