DiegoPC

Hola @tupy77 Según entiendo, quieres que en una hoja se pongan varias tablas con 1 fila en blanco entre ellas y que contengan "N" filas según un filtro establecido. El filtro debe ponerse en un cuadrito. Supongo que son filtros diferentes para cada tabla. La mejor forma para hacerlo es, como dice @Silvia, usando tablas dinámicas y segmentadores. El problema es que solo verías una tabla (no varias, como quieres) pero.... ¿por qué mostrar muchas tablas si puedes hacerlo solo en una y cambiar los filtros con un solo clic? No es algo difícil de hacer. La tendencia de crear muchas ta

Hola Javier Creo que hay varias cosas que no están hechas de la manera "idónea". Si planteamos una solución complicada, se nos hará difícil todo el trabajo con la plantilla. Los cambios que yo haría son los siguientes: Una sola hoja en lugar de una hoja mensual, pero se tendría que agregar una columna donde se ponga el periodo (enero 2021, febrero 2021, etc) Los conceptos que se puedan elegir de una lista desplegable (validaciones), cosa que no hay opción de equivocarse. El resumen se haría con una tabla dinámica.

Buenas noches MAESTRO @John Jairo V, el gusto es mío. Muy interesante tu solución.

Bueno, a veces no vemos las soluciones más simples.... tienes razón, nos complicamos por las puras jajaja

Hola Se puede hacer con desref Ayuda.xlsx

Hola maestros.... Reduciendo un poquitín el código de Antoni: Sub SRT() Cells(asc(progreso)-48, instante).Resize(1, tiempo - instante + 1).Value = "E" End Sub

Hola, la tabla no es necesaria si se dinamiza el rango. =MAX(DESREF(A1,0,0,1,CONTAR(1:1)))

Hola El problema no es solo si el usuario coloca un nombre repetido, también hay que considerar que no ponga caracteres inválidos en el nombre de hoja como ?*/[].... y además que respete el máximo de caracteres en el nombre de hoja (31 caracteres) Este código te puede servir Sub Copiar() Dim Nombre As String On Error Resume Next Sheets("NuevaEmpresa").Copy after:=ThisWorkbook.Worksheets(ThisWorkbook.Worksheets.Count) Do Err.Clear Do Nombre = InputBox("Ponle un nombre a la nueva hoja", "Nombre de Hoja", Nombre) If Trim(Nombre

Hola! Adjunto el que yo uso cada vez que tengo un proyecto en construcción, espero que te sirva. 😁 Proyecto en construcción.xlsx

Hola El código está bien, tiene que funcionar. me parece que tienes activada la opción Mostrar Fórmulas, solo tienes que desactivarla.

Hola! Que yo sepa eso no se puede hacer en Excel y tampoco en Word (hoy en día) pero hace mucho tiempo, en una versión muy antigua, Word permitía hacer animaciones de ese tipo. Si no me equivoco, era en la versión Word2000 y Word2003. Notarás en el vídeo que la interfaz es distinta a la actual.... se trata de la anterior UI de Office, con la extinta barra de menús.

Y me olvidaba.... si no te gusta usar fórmulas, puede hacerse con FLASH FILL

Hola!! Excelentes formas de solucionar el reto. Planteo una forma distinta.... veo que los dos aportes anteriores usan funciones de texto, yo me he decantado por usar matemática pura y no incluir nada de textos. Demo_extraccción04.xlsx

Hola!! En realidad Excel no te está cambiando los vínculos. Si te fijas, luego de ordenar el rango descendentemente por la columna "F" las fórmulas no han cambiado. Es más, no importa cual columna (que tenga fórmulas) ordenes, el cuadro B seguirá en el mismo orden que el cuadro A y eso te lleva a un gran error: Las etiquetas de la columna "B" del cuadro B sí se mueven, pero todo lo que tiene fórmulas no se mueve.