kumbus

Ponlos visibles con Transparencia total

El formato de guardado del archivo es importante: Ascii utf8 utf16 con bom o sin bom. Fíjate qué formato tienen los archivos de ejemplo y generalo en el mismo.

Acumulado: DSuma("recaudado";"ingresos";"[COLABORADOR]<='" & [COLABORADOR]&"'")

Microsoft ActiveX Data Objects 2.8 Library

Private Sub cboLista_Click() DoCmd.SearchForRecord , "", acFirst, "id_serie='" & Nz(Me.cboLista, 0) & "'" End Sub

Mi campo2 es visible si es numérico mi campo1 y distinto de 0. Me.campo2.Visible = IsNumeric(Me.campo1) And Me.campo1 <> 0

Añadir en el formulario: - Cuadro de texto, TextoINI - Cuadro de texto, TextoFIN -Botón -Cuadro combinado, ComboBox1 -Cuadro de lista, List1 En el módulo de código del botón poner: campo=combobox1.selecteditem List1.RowSource = "SELECT " & campo & "...

En un módulo y habiendo creado antes la oportuna tabla "Números" con el campo Número y los otros 4: Sub Primaria() Dim numero, millares, centenas, decenas, unidades As Integer Dim rs As DAO.Recordset Set rs = CurrentDb.OpenRecordset("SELECT * FROM...

En un formulario pon los combos de nombre cbo1 y cbo2 y un control lista. En el evento Al cambiar del cbo2 o en un botón aparte pon Lista1. Rowsource=" SELECT * FROM Tabla1 WHERE Criterio1 ='" & Me.cbo1 "' And Criterio2='" & Me.cbo2 &"'". Si alguno...

Si pones un asterisco te saldrán todos los campos. En vez de eso haz doble clic sobre la tabla y se copiaran todos los campos a la consulta y luego quita los que no quieras. Lo del like es que lo traduce al inglés porque será que tienes la versión en...