Saltar al contenido
Te enseño 7 de los trucos que me permitieron trabajar 2 horas menos al día >>>

BUSCAR ULTIMO, PENULTIMO Y ANTEPANULTIMO VALOR DE UNA FILA

hiram

Por hiram
en Excel General

Recommended Posts

hiram Principiante

hiram

publicado
publicado

Hola amigos, espero puedan ayudarme. busco 3 formulas que me den el ultimo, penultmo y antepenultimo valor de una serie de celdas de una fila que contiene celdas en blanco. Ejemplo:

Ene  |  Feb  |  Mar  |  Abr  |  May  |  Jun  |  Jul  |  Ago  |  Sep  |  Oct  |  Nov  |  Dic  |

80    |  89    |          |          |  72     |  78    |         |           |  90    |   87   |           |         |

Gerson Pineda Mentor

Gerson Pineda

publicado
publicado

Hola

Una solución es la que te adjunto 

=INDICE($A$2:$L$2,,AGREGAR(14,6,COLUMNA($A$2:$L$2)/($A$2:$L$2<>""),COLUMNAS($A$2:A2)))

Desde A1 los meses, desde A2 los valores

 

Saludos 

hiram Principiante

hiram

publicado
  • Autor
publicado
Hace 10 horas, Gerson Pineda dijo:

Hola

Una solución es la que te adjunto 

=INDICE($A$2:$L$2,,AGREGAR(14,6,COLUMNA($A$2:$L$2)/($A$2:$L$2<>""),COLUMNAS($A$2:A2)))

Desde A1 los meses, desde A2 los valores

 

Saludos 

 

Muchas gracias Gerson. esta opcion que me das solo me da el ultimo valor, para esa opcion ya tengo la solucion (=BUSCAR(MAX(A2:L2)+2,(A2:L2))) ocupo una que me de el penultimo y antepenutimo valor.

Gerson Pineda Mentor

Gerson Pineda

publicado
publicado
Hace 58 minutos , hiram dijo:

Muchas gracias Gerson. esta opcion que me das solo me da el ultimo valor

Claro, solo es cosa de copiar la formula hacia la derecha y listo

 

Saludos 

hiram Principiante

hiram

publicado
  • Autor
publicado
Hace 47 minutos , Gerson Pineda dijo:

Claro, solo es cosa de copiar la formula hacia la derecha y listo

 

Saludos 

Perfecto amigo muchas gracias

 

hiram Principiante

hiram

publicado
  • Autor
publicado
En 9/9/2021 at 9:50 , Gerson Pineda dijo:

Claro, solo es cosa de copiar la formula hacia la derecha y listo

 

Saludos 

Amigo Gerson... me funciono perfectamente la formula pero solo en las posiciones de columna de la a2 a la L2. si me llevo esa misma formula a otras columnas me marca error de referencia.. pordias ayudarme?

hiram Principiante

hiram

publicado
  • Autor
publicado
Hace 8 minutos , Sergio dijo:

@hiram debes fijar las columnas introduciendo el símbolo $ delante de la letra de la columna.

Echa un vistazo a la siguiente publicación donde se explica cómo funcionan las referencias absolutas, relativas y mixtas.

https://ayudaexcel.com/el-uso-de-referencias-en-las-fórmulas/

Un saludo,

Hola Tocayo Sergio muchas gracias... Si se como anclar las clumnas y celdas, el tema es que si el mismo ejecicio me lo llevo a otra parte de la tabla ya no me funciona...

Funciona mientras esta en las columnas de la "A2 a la "L". Si el mismo ejercicio lo corro en otras columnas no funciona y no encuentro por que.


COLUMNAS DE LA "A" A LA "L". FUNCIONA CORRECTAMENTE

Ene Feb Mar Abr May Jun Jul Ago Sep Oct Nov Dic ULTIMO PENULTIMO ANTEPENULTIMO
89   90     76   82     98   98 82 76


COLUMNAS DE LA "A" A LA "L". FUNCIONA CORRECTAMENTE

Ene Feb Mar Abr May Jun Jul Ago Sep Oct Nov Dic ULTIMO PENULTIMO ANTEPENULTIMO
89   90     76   82     98   #¡REF! #¡REF! #¡REF!

 

 

hiram Principiante

hiram

publicado
  • Autor
publicado
Hace 1 hora, Sergio dijo:

Sergio, indícame las referencias en las que tienes los datos de la tabla que da error.

 

ULTIMO:
=INDICE($R$2:$AC$2,,AGREGAR(14,6,COLUMNA($R$2:$AC$2)/($R$2:$AC$2<>""),COLUMNAS($R$2:R2)))

PENULTIMO:

=INDICE($R$2:$AC$2,,AGREGAR(14,6,COLUMNA($R$2:$AC$2)/($R$2:$AC$2<>""),COLUMNAS($R$2:S2)))

ANTEPENULTIMO:

=INDICE($R$2:$AC$2,,AGREGAR(14,6,COLUMNA($R$2:$AC$2)/($R$2:$AC$2<>""),COLUMNAS($R$2:T2)))

hiram Principiante

hiram

publicado
  • Autor
publicado
Hace 1 hora, Gerson Pineda dijo:

Tu dificultad es de adaptación porque debes manejar mejor las referencias

Te sugiero leer el articulo de @Sergio

Mientras lo haces, en el argumento de columna de INDICE, escribe, 1, 2 y 3 y listo

 

Saludos!

Gracias amigos... si entreare a ver la informacion que me proporcionan... si me hace mucha falta. Saludos

hiram Principiante

hiram

publicado
  • Autor
publicado
Hace 4 horas, hiram dijo:

ULTIMO:
=INDICE($R$2:$AC$2,,AGREGAR(14,6,COLUMNA($R$2:$AC$2)/($R$2:$AC$2<>""),COLUMNAS($R$2:R2)))

PENULTIMO:

=INDICE($R$2:$AC$2,,AGREGAR(14,6,COLUMNA($R$2:$AC$2)/($R$2:$AC$2<>""),COLUMNAS($R$2:S2)))

ANTEPENULTIMO:

=INDICE($R$2:$AC$2,,AGREGAR(14,6,COLUMNA($R$2:$AC$2)/($R$2:$AC$2<>""),COLUMNAS($R$2:T2)))

Complicado no?, si observas que las referencias si las movi al rango que necesita?. por alguna razon la formula INDICE me da un errro de referencia..

Janlui Miembro destacado

Janlui

publicado
publicado
                             
                               
ENE FEB MAR ABR MAY JUN JUL AGO SEP OCT NOV   ANTEPE… PENULT… ULTIMO  
                               
23 43   253 46 437 47 4 564 3 45   564 3 45  
28 48 5 258 51 442 52 9 569 8 50   569 8 50  
33 53 10 263 56 447 57 14 574 13 55   574 13 55  
38 58 15 268 61 452 62 19 579 18 60   579 18 60  
                               
                               
formulas de la fila 3     Antepenultimo   DESREF($A$1,FILA(A3)-FILA(A$1),CONTARA($A$1:$K$1)-3)  
        Penultimo     DESREF($A$1,FILA(A3)-FILA(A$1),CONTARA($A$1:$K$1)-2)  
        Ultimo     DESREF($A$1,FILA(A3)-FILA(A$1),CONTARA($A$1:$K$1)-1)  
                               
                               

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

Ir al listado de temas

  • 109 ¿Te parecen útiles los tips de las funciones? (ver tema completo)

    1. 1. ¿Te parecen útiles los tips de las funciones?


      • Sí
      • No
      • Ni me he fijado en ellos

  • Ayúdanos a mejorar la comunidad

    • Mantenimiento de la comunidad
      Donaciones recibidas este mes: 0.00 EUR
      Objetivo: 130.00 EUR

  • Archivos

  • Estadísticas de descargas

    • Archivos
      188
    • Comentarios
      98
    • Revisiones
      29
    Más información sobre "Cambios en el Control Horario"
    Última descarga
    Cambios en el Control Horario
    Por pegones1

    4    1

  • Crear macros Excel

  • Mensajes

    • DiegoPC
      FORMULA PARA BUSCAR DIFERENTES RESULTADOS Y MOSTRARLOS

      Por DiegoPC · publicado

      Hola, veo que tienes 365, así que esta forma funcionará   Almacen.xlsx
    • jues
      Guardar Formulario en PDF

      Por jues · publicado

      Buenos días  @LeandroA espero estes bien Tengo un caso idéntico al planteado en la siguiente pregunta: Sin embargo, a diferencia de quien planteo originalmente la pregunta al correr el código no obtengo ningún resultado podrían ayudarme a resolver este inconveniente y que al hacer click en el Botón Guardar (CommandButton3) del Formulario RCS (frmrcs) el archivo pdf quede configurado con orientación vertical, márgenes superior, inferior, derecho e izquierdo = 1 y en página tamaño carta. Si acaso influye uso Microsoft Excel LTSC MSO (versión 2209 Compilación16.0.1.15629.20200) de 64 bits Mucho le sabre agradecer la ayuda que me pueda dar  RCS PRUEBA - copia.xlsm
    • DiegoLG
      Surtido de Mercancía

      Por DiegoLG · publicado

      @JSDJSDCon gusto mi estimado Para la opción 1: Sub Surtirhastadondealcanse() Dim ws As Worksheet Set ws = ThisWorkbook.Sheets(1) Dim filaInicio As Integer: filaInicio = 4 Dim filaFin As Integer: filaFin = 7 Dim colInventario As Integer: colInventario = 2 Dim colSolicitudesInicio As Integer: colSolicitudesInicio = 4 ' Columna C Dim colResultadoInicio As Integer: colResultadoInicio = 9 ' Columna I Dim colTotalSurtido As Integer: colTotalSurtido = 12 ' Columna L Dim colFinalInventario As Integer: colFinalInventario = 13 ' Columna M Dim numClientes As Integer: numClientes = 3 Dim fila As Integer, i As Integer For fila = filaInicio To filaFin Dim inventario As Double inventario = Val(ws.Cells(fila, colInventario).Value) Dim solicitudes(1 To 3) As Double Dim surtido(1 To 3) As Variant Dim totalSurtido As Double: totalSurtido = 0 ' Leer solicitudes For i = 1 To numClientes If IsNumeric(ws.Cells(fila, colSolicitudesInicio + i - 1).Value) Then solicitudes(i) = CDbl(ws.Cells(fila, colSolicitudesInicio + i - 1).Value) Else solicitudes(i) = 0 End If surtido(i) = "POR FALTA STOCK" Next i ' Surtir de acuerdo al inventario disponible For i = 1 To numClientes If solicitudes(i) > 0 Then If inventario >= solicitudes(i) Then surtido(i) = solicitudes(i) inventario = inventario - solicitudes(i) totalSurtido = totalSurtido + solicitudes(i) ElseIf inventario > 0 Then surtido(i) = inventario totalSurtido = totalSurtido + inventario inventario = 0 Else surtido(i) = "POR FALTA STOCK" End If End If Next i ' Escribir resultados en las columnas correspondientes para cada cliente For i = 1 To numClientes With ws.Cells(fila, colResultadoInicio + i - 1) If surtido(i) = "POR FALTA STOCK" Then .Value = surtido(i) .Font.Color = vbRed Else .Value = surtido(i) .Font.Color = vbBlack End If End With Next i ' Escribir total surtido y existencia final ws.Cells(fila, colTotalSurtido).Value = totalSurtido ws.Cells(fila, colFinalInventario).Value = inventario Next fila MsgBox "Resultado surtido cargado con éxito...", vbInformation End Sub Para la opción 2:   Sub surtirenpartesiguales() Dim ws As Worksheet Set ws = ThisWorkbook.Sheets(1) Dim filaInicio As Integer: filaInicio = 13 Dim filaFin As Integer: filaFin = 16 Dim colInventario As Integer: colInventario = 2 Dim colSolicitudesInicio As Integer: colSolicitudesInicio = 4 ' Columna C Dim colResultadoInicio As Integer: colResultadoInicio = 9 ' Columna I Dim colTotalSurtido As Integer: colTotalSurtido = 12 ' Columna L Dim colFinalInventario As Integer: colFinalInventario = 13 ' Columna M Dim numClientes As Integer: numClientes = 3 Dim fila As Integer, i As Integer For fila = filaInicio To filaFin Dim inventario As Double inventario = Val(ws.Cells(fila, colInventario).Value) Dim solicitudes(1 To 3) As Double Dim surtido(1 To 3) As Variant Dim totalSurtido As Double: totalSurtido = 0 Dim totalPedido As Double: totalPedido = 0 ' Leer solicitudes For i = 1 To numClientes If IsNumeric(ws.Cells(fila, colSolicitudesInicio + i - 1).Value) Then solicitudes(i) = CDbl(ws.Cells(fila, colSolicitudesInicio + i - 1).Value) totalPedido = totalPedido + solicitudes(i) Else solicitudes(i) = 0 End If surtido(i) = 0 Next i ' Si hay suficiente inventario, surtir lo que el cliente pide If inventario >= totalPedido Then For i = 1 To numClientes If solicitudes(i) > 0 And inventario >= solicitudes(i) Then surtido(i) = solicitudes(i) inventario = inventario - solicitudes(i) totalSurtido = totalSurtido + solicitudes(i) End If Next i Else ' Reparto base igualitario Dim baseSurtido As Long baseSurtido = Int(inventario / numClientes) For i = 1 To numClientes If solicitudes(i) > 0 Then If solicitudes(i) <= baseSurtido Then surtido(i) = solicitudes(i) inventario = inventario - solicitudes(i) totalSurtido = totalSurtido + solicitudes(i) Else surtido(i) = baseSurtido inventario = inventario - baseSurtido totalSurtido = totalSurtido + baseSurtido End If End If Next i ' Repartir sobrante restante uno por uno, respetando lo pedido Do While inventario > 0 For i = 1 To numClientes If surtido(i) < solicitudes(i) Then surtido(i) = surtido(i) + 1 totalSurtido = totalSurtido + 1 inventario = inventario - 1 If inventario = 0 Then Exit For End If Next i Loop End If ' Escribir resultados en las columnas correspondientes para cada cliente For i = 1 To numClientes With ws.Cells(fila, colResultadoInicio + i - 1) If surtido(i) = 0 Then .Value = "POR FALTA STOCK" .Font.Color = vbRed Else .Value = surtido(i) .Font.Color = vbBlack End If End With Next i ' Escribir total surtido y existencia final ws.Cells(fila, colTotalSurtido).Value = totalSurtido ws.Cells(fila, colFinalInventario).Value = inventario Next fila MsgBox "Resultado surtido cargado con éxito...", vbInformation End Sub Saludos, Diego
    • jose_alk
      FORMULA PARA BUSCAR DIFERENTES RESULTADOS Y MOSTRARLOS

      Por jose_alk · publicado

      Buenos dias.  Estoy trabajando en una hoja para poder llevar un control de un pequeño almacén.  Tengo un pedido con varias líneas y "lotes" y necesito sacar las ubicaciones que coincidan con la referencia y lote que pone en el pedido. El problema viene cuando tengo la misma referencia y mismo lote en ubicaciones diferentes y necesito sacar la información en columnas diferentes. No se si  me he explicado bien, pero creo que con el ejemplo adjunto se entiende mejor. Agradecería mucho si me pudieran ayudar  Libro1.xlsx
    • jues
      Buscar Datos con un ComboBox

      Por jues · publicado

      Exelente solución mil gracias 

  • Visualizado recientemente

    • No hay usuarios registrado para ver esta página.
×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.