Jump to content

pegones1

Members
  • Content Count

    766
  • Joined

  • Last visited

  • Days Won

    27

Everything posted by pegones1

  1. Version 1.0.0

    9 downloads

    Nuevo calendario laboral con la plantilla descargable y explicaciones en texto y en vídeo de cómo lo he hecho. Espero que te guste y me lo digas...¡Ya puedes pedir las vacaciones del 2021!Edita la tabla de la hoja de Eventos para poner los días festivos de tu localidad. El calendario se puede imprimir. Está basado en un calendario hecho con una tabla dinámica. Puedes leer más sobre este calendario en este enlace:https://pedrowave.blogspot.com/2020/12/calendario-laboral-dinamico-en-excel.html
  2. Estudia el siguiente enlace para entender los códigos de formato de número personalizados: https://support.microsoft.com/es-es/office/códigos-de-formato-de-número-5026bbd6-04bc-48cd-bf33-80f18b4eae68 Con el formato personalizado: #.##0;"" todos los números negativos se mostrarán como vacíos, pues se especifica el Formato de los números negativos. Como he especificado dos secciones de código de formato, la primera sección de código se utiliza para números positivos y ceros y la segunda sección del código se usa para los números negativos. El formato de número no afecta al v
  3. a) Formato de los números de celda para la edad mostrada como vacía: #.##0;"" b) Opción contemplada en la función Edad si no se introduce la fecha de nacimiento: If sFechaNacimiento = "" Then ' Sin fecha de nacimiento Edad = -3 Adjunto archivo con las evidencias: Edad Certificado PW2.xlsm
  4. Respuestas: Es conveniente mantener la función Edad como Long. Si sCertificado es "" entonces Edad=-1. Para los valores negativos devueltos como Edad se formatea el número de las celdas como: #.##0;"¿?" (valores negativos se muestran como: ¿?) Gracias por la observación, aunque no creo que la hay liado por eso. He sustituido el año de referencia por uno bisiesto: DateSerial(2000, He incluido en la función Edad el chequeo de fechas numéricas además de fechas en formato texto. Considero que las celdas marcadas en color naranja no tienen sentido pues con Certificado = "-" no ha
  5. Esa función que has encontrado en la Web está pensada para fechas en formato americano: MM/DD/YYYY y no creo que te funcione para fechas con tu formato. Lo del formato de celda "aa" no te lo aconsejo, pues si el valor es mayor que 99 te dará un valor incorrecto. DateDiff a "y" es equivalente a "d" por lo que cuenta días y tampoco te servirá. Me acabo de enterar estudiando la función DateDiff que para años ("yyyy") devuelve 1 aunque solo haya transcurrido un día. ¡Y ese es el problema de contar un año de más! He modificado la función para corregir la edad (no es tan compleja
  6. He preparado y probado un par de funciones: RestarFechas con la diferencia en días entre dos fechas. ObtenerEdad con la diferencia en años entre dos fechas. La segunda es la que te dará el resultado esperado como puedes ver en este ejemplo: Este es el código de las dos funciones sugeridas: Option Explicit Function ObtenerEdad(sFecha1 As String, sFecha2 As String) As Long ' ' Obtiene la diferencia en años entre dos fechas en formato Long ' Argumentos: sFecha1 y sFecha2 con las fechas a restar en formato String ' Rango de fechas desde el 1 de enero de 100 hasta el
  7. @zelarra821, cuando abras un tema acostúmbrate a incluir una plantilla de ejemplo con los datos de partida y el resultado esperado, para no irnos por las ramas o por la tangente al contestar. De todos modos, esta vez te lo perdono pues este tema es continuación de uno anterior: Ahora mismo preparo una respuesta... Estate atento...
  8. Pues ya se puede dar por enterado algún Administrador de este foro. Lo único volver a resaltar que el formato establecido por la norma ISO 8601 es más conveniente cuando se introducen fechas en modo texto, como es el caso de fechas anteriores al año 1900. Siempre es mejor AAAA-MM-DD que todas las variantes de fechas que te he puesto como ejemplo en el comentario anterior. Hablaré de ésto en un próximo artículo de mi blog que espero que leas @zelarra821. Si no sabes cuál es, entra en mi perfil de este foro en "Formas de contacto" donde está mi dirección Web.
  9. @zelarra821, te da error porque el primer argumento de la función Format no puede ser un texto, sino un valor de fecha. Es mejor usar la función DateValue, cuyo argumento de fecha puede ser un texto que representa una fecha desde el 1 de enero de 100 hasta el 31 de diciembre de 9999. Sin embargo, la fecha también puede ser cualquier expresión que pueda representar una fecha, una hora o tanto una fecha como una hora, en ese rango. Por ejemplo, para obtener el número de serie (como Date) de la fecha textual (sDía como String): Function ObtieneNumSerieFecha(sDía As String) As Date '
  10. @zelarra821, Para sacar el nombre del día de la semana, tengo que utilizar la función WeekdayName(), ¿verdad? SI. Mira el archivo que adjunté donde se usa esa función. Para exportar esto a otra hoja de cálculo, ¿basta con copiar el módulo? ¿o tengo que hacer algo más? Para usarlo en otra hoja del mismo libro ya existe el módulo. Para usarlo en otro libro de trabajo debes exportar ese módulo e importarlo en el nuevo libro. El resto de preguntas te las contesto mañana que hoy ya tengo que dejarlo. Si no puedes esperar, pregunta a los demás participantes de este bendi
  11. Solo te falta darle al corazón de abajo a la derecha en el primer mensaje que respondí en este hilo con mi aportación. Gracias anticipadas por hacer clic en ese corazón...
  12. Desde que me dedico en serio a los cálculos me ha apasionado la conversión de fechas. Excel es una herramienta única para tratarlas, sobre todo siendo que VBA permite números de serie negativos para fechas anteriores al año 1900. Este "curro" han sido 3 horas que ya están bien pagadas al recibir tu pronta respuesta, además de servirme para añadir un nuevo artículo a mi blog que titularé: "Cómo calcular fechas anteriores a 1900 en Excel" @zelarra821, ¿se te ocurre un título mejor?
  13. Como @Antoni debe estar muy ocupado, adjunto un archivo con 3 macros para obtener el día de la semana desde el 0100-01-01 (aaaa-mm-dd), en formato ISO 8601, que es el primer día admitido por VBA. La función GetWeekDayName() devuelve el día de la semana si se le pasa una cadena de texto en formato ISO 8601, llamando a las otras dos macros. Es fácil convertir una string con una fecha en formato de texto al formato estándar ISO. Option Explicit Function GetWeekDayName(sDate As String) As String ' ' VBA WeekdayName Function ' Dim iWeekDay As Integer iWeekDay = GetWeekDay(sDa
  14. @Gerson Pineda, he corregido algunos errores, entre ellos el que me comentaste, por lo que recomiendo descargar de nuevo el archivo desde el siguiente enlace: Desempleo de la UE con banderas https://pedrowave.blogspot.com/2020/06/desempleo-de-la-ue-con-banderas.html
  15. Gracias Gerson, me agrada que digas eso, tú que estás al tanto de tantos aportes. Respecto a las "aa" repetidas, es una espinita que tengo y que tenía la versión original en la que me basé del admirable gurú de Excel Robert Mundigl, autor del excelente blog; https://www.clearlyandsimply.com/clearly_and_simply/ Es debido al formato de año del eje horizontal de los 2 gráficos de bandas y de los 2 gráficos de líneas. Para intentar solucionarlo, creé el módulo modChangeLanguage, con la macro ChangeLanguageFormat() en la que me olvidé de cambiar el formato del año para la hoja 'chart
  16. Es un placer volver a contactar con amigos como tú @Gerson Pineda y @Sergio en estos días tan atípicos para todos y deseo que sigáis bien en situaciones difíciles para todos. He editado un nuevo aporte que espero le hagáis algo de caso pues me ha supuesto bastante esfuerzo y es el primero después de varios años: A ver si hacéis algún comentario a este aporte que me sirva de acicate para seguir publicando este verano.
  17. He publicado una nueva versión con varias mejoras, la principal es poder ver datos del país y su bandera en una tooltip cuando se pasa el ratón por encima de un país. https://pedrowave.blogspot.com/2020/06/desempleo-de-la-ue-con-banderas.html https://www.youtube.com/embed/CPTUGtEyCBQ
  18. @Matias Saavedra, como eres nuevo en este foro, cuando recibes ayuda debes indicar si ha resuelto tu problema, diciendo "Solucionado", y reaccionar al comentario con un "Me gusta" haciendo clic en el corazón que se encuentra abajo a la derecha.
  19. Buenas Matías, una alternativa a la función avanzada MIN.SI.CONJUNTO() es usar una fórmula matricial que se introduce con: Ctrl + Mayús + Intro (Excel automáticamente encierra la fórmula entre llaves para indicar que es una fórmula matricial) Fórmula para versiones superiores de Excel: =MIN.SI.CONJUNTO($C$2:$C$31;$B$2:$B$31;$G$2;$E$2:$E$31;$H$2) Fórmula matricial alternativa para versiones de Excel que no soportan la función MIN.SI.CONJUNTO(): =MIN(SI(($B$2:$B$31=$G$2)*($E$2:$E$31=$H$2);$C$2:$C$31)) Seleccionar los valores en los desplegables de estas dos celdas: $
  20. Version 1.0.0

    27 downloads

    La pandemia del coronavirus hace que sea de rabiosa actualidad la crisis económica que está provocando en todo el mundo y, en concreto, las enormes tasas de desempleo que se están padeciendo en todos los países. Acabo de publicar datos históricos de las tasas de desempleo anuales en los países de la UE desde 1990 hasta 2019 para poder compararlos mas adelante con el desempleo provocado en 2020 por el Covid-19. Puedes leerlo en mi blog: Tasas de desempleo de la UE https://pedrowave.blogspot.com/2020/06/tasas-de-desempleo-de-la-ue.html No he usado ninguna herramienta MS Power
  21. Version 1.0.0

    27 downloads

    Desde hace 3 años comparto una actualización de mi calculadora del sorteo de Navidad con la que se pueden comprobar los premios del 22 de diciembre. No contiene macros. Funciona gracias a una conexión de datos con los alambres publicados por Loterías del Estado que cantaron los niños y niñas de San Ildefonso, y con una tabla dinámica para obtener la lista de números premiados. En mi blog hay un artículo explicando esta calculadora en este enlace: Calculadora de premios de la Lotería de Navidad Os deseo mucha suerte, o mejor, mucha salud.
  22. Gracias Fernando, Aquí dejo un video para que sepan lo que se pierden los que no lo han probado aún.
  23. Este buscador funciona en Excel 2007 y 2010. En Excel 2013 y superior el control WebBrowser está restringido por Microsoft por razones de seguridad. Ver soporte: https://support.microsoft.com/en-us/kb/2793374 Para esas versiones de Excel es necesario seguir las instrucciones de ese soporte para modificar el registro de Windows y poder usar el buscador de libros...
  24. Version 1.0.1

    77 downloads

    Para comenzar bien el año 2017 nada como tener a mano un buen Buscador de libros en Excel, en formato pdf, ppt, doc o xls.En la hoja "Navegador" se selecciona el tipo de archivo, el idioma, el número de resultados y los términos de búsqueda y se hace clic en el botón "Buscar", con lo que se mostrarán los resultados de la búsqueda, como enlaces a los libros.Para guardar los enlaces, se hace clic en el botón "Cargar archivos en la biblioteca". Biblioteca La hoja "Biblioteca" contiene los libros encontrados, con su descripción y enlace, tipo, idioma, término de búsqueda y se pueden añadi
  25. He publicado en mi blog cómo se hace la Al final de este vídeo se ven las manecillas de todos los relojes moviéndose al unísono: Sólo lo he probado en Excel 2010 y los amigos me dicen que en Excel 2007 el proceso es muy lento y en un segundo no le da tiempo a refrescar los relojes y se emplean funciones que no soporta Excel 2003. Son muy gratificantes las 1000 visitas que ha tenido este tema en un mes.
×
×
  • Create New...

Important Information

Privacy Policy