Jacinto Trillo Jareño

Alberto: En el Combo de Proveedor, seguro que tienes un Origen de Fila en el que la Columna dependiente es la que te guarda, independientemente e donde te la guarde. Si tienes el Id del Proveedor y el Nombre, en las Propiedades >> Datos >>Columna...

Claudio: Mira con detalle los parámetros que te pide y seguro que haces mención a ellos en el própio formulario o en la consulta que sirve de Origen de datos, o en algún combo los tienes como Origen de Fila, o en otro Control visible u oculto, pero...

Henry: Si como observo solo quieres exportar sin más, utiliza el método>> DoCmd. TransferSpreadsheet acExport, acSpreadsheetTypeExcel12, Consulta, Fichero Consulta >> El Nombre de "QueryFilterQuestions", que me parece es el que usas Fichero >>...

Xuxe: Hay un ejemplo antiguo, pero no por eso menos bueno que está en la Web de Emilio Sancha. http://www.mvp-access.es/emilio/Access/Descargas.asp El ejemplo es el Número 37 del >>02/05 con el titulo de>> Apertura de formularios Multi-Instancia,...

Allan: En el Evento GotFocus del Cuadro Combinado Tipo de consulta, le pones si es que el Combo realmente se llama así. Me.[Tipo de Consulta].Requery Mis saludos >> Jacinto

Carlos: En el campo de la Consulta donde captures el Campo de Texto>> NombreCampo:Val([TuCampodeTexto]) Mis saludos >> Jacinto

Rafael: Así sin darle muchas vueltas has probado Case LIKE "Cucha*" o ésto Otro Case Left(CualTexto,5) = "Cucha" Ya me comentarás Mis saludos >>Jacinto

Carlos : Utiliza la Función DSum Partiendo de que estamos en un Formulario Me.TotalRentaEquipo = DSum("[Importe]","[NombreDeTutabla]","[Franja] = 0") Mis saludos >> Jacinto

Diego: Antes de Profundizar mucho más, sustituye éstas líneas de código por las que tu tienes, ya que para formar el filtro lo debes acumular con " AND " En el Procedimiento >> Private Sub Etiqueta30_Click() If Me.Año.Value <> 1 Then MiAño =...

Jhon: Supongo que ese texto le entras en un Formulario mediante un TextBox. Si eso es así, en el Evento AfterUpdate (después de actualizar) o en el LosFocus de ese cuadro de Texto, le pones>> Me.TxtElTexto = LCase(Me.TxtElTexto) Cambia el Nombre...