polosaz

fpintod respondió: Podrías crear una función ej. Function calculo(numero1 as double,numero2 as double,numero3 as double,numero4 as double) as double dim dividendo as double dim divisor as double ' calculo el mayor entre 1 y 2 if numero1>numero2 then dividendo=numero1...

smanero respondió: Lo raro sería que te funcionara ;-). Pon esto: =Dsum("1", "Tabla1", "[numero_estudio]= " & Me![Nùmero de Historia]) o =Dsum("1", "Tabla1", "[Nùmero de Historia]= " & Me![numero_estudio]) Al lado de 'Me' debes de poner el nombre del campo del...

jj77 respondió: Lo que debe de hacer es lo siguiente: 1 - abra el formulario en modo de diseño 2 coloque el código que se relaciona a continuación en el "Informe" Private Sub Report_Open(Cancel As Integer) EncabezadoDelInforme.Visible = False End Sub Private Sub...

fpintod respondió: Puedes hacer un reporte en memoria. He aquí un Ejemplo : Private Sub Detail_Format(Cancel As Integer, _ FormatCount As Integer) Dim rpt as Report Dim strMessage As String Dim intHorSize As Integer, intVerSize As Integer Set rpt = Me strMessage =...

smanero respondió: Acabarás antes haciendo un informe, además ahorras mucho toner ;-).

smanero respondió: ¿Y no te sirven los botones de desplazamiento? d:\a.jpg En diseño de formulario puedes ponerlos.

smanero respondió: Si entras en diseño de formulario y creas un cuadro combinado, eligiendo la opción de 'buscar...' tendrás resuelto el problema.