Como registrar los datos faltantes en un tabla

Tengo una Tabla de Caja que registra los Nros de documentos/año pagados. Los Nros. De documentos Ejemplo

1/18 poder

2/18 poder

3/18 poder

6/18 poder

7/18 poder

8/18 poder

9/18 poder

10/18 poder

 ese ejemplo es es el resultado de una consulta de documentos pagados de poderes. 

Ahora lo que necesito es como hacer una consulta que me arroje los documentos faltantes en esa consulta

serian 4/18 poder

5/18 poder

1 Respuesta

Respuesta
3

Ejecuta la siguiente macro

Sub Revisar_Faltantes()
'Por Dante Amor
    co1 = "A"   'columna con documentos pagados
    co2 = "B"   'columna para poner documentos faltantes
    '
    u = Range(co1 & Rows.Count).End(xlUp).Row
    k = 2
    Range(co2 & k & ":" & co2 & Rows.Count).ClearContents
    For i = 1 To u
        nums = Split(Cells(i, co1), "/")
        num = Val(nums(0))
        If i = u Then
            sig = num
        Else
            nums = Split(Cells(i + 1, co1), "/")
            sig = Val(nums(0))
        End If
        For j = num + 1 To sig - 1
            Cells(k, co2) = j
            k = k + 1
        Next
    Next
End Sub

Antes de ejecutar la macro, cambia en estas líneas las letras de las columnas por tus columnas:

    co1 = "A"   'columna con documentos pagados
    co2 = "B"   'columna para poner documentos faltantes

Así quedaría tu resultado:


Sigue las Instrucciones para un botón y ejecutar la macro

  1. Abre tu libro de Excel
  2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
  3. En el menú elige Insertar / Módulo
  4. En el panel del lado derecho copia la macro
  5. Ahora para crear un botón, puedes hacer lo siguiente:
  6. Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
  7. Elige una imagen y con el Mouse, dentro de tu hoja, presiona click y arrastra el Mouse para hacer grande la imagen.
  8. Una vez que insertaste la imagen en tu hoja, dale click derecho dentro de la imagen y selecciona: Tamaño y Propiedades. En la ventana que se abre selecciona la pestaña: Propiedades. Desmarca la opción “Imprimir Objeto”. Presiona “Cerrar”
  9. Vuelve a presionar click derecho dentro de la imagen y ahora selecciona: Asignar macro. Selecciona: Revisar_Faltantes
  10. Aceptar.
  11. Para ejecutarla dale click a la imagen.

'.[Sal u dos. Dante Amor. No olvides valorar la respuesta. 
'.[Avísame cualquier duda

Te agradezco. Pero es una base de datos en access

Mmm, la pregunta la pusiste en el tema de excel.

Crea nuevamente la pregunta pero en el tema de access para que alguien te

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas