Jump to content

pegones1

Members
  • Posts

    801
  • Joined

  • Last visited

  • Days Won

    30

pegones1 last won the day on August 22 2021

pegones1 had the most liked content!

About pegones1

Contact Methods

  • Website URL
    https://pedrowave.blogspot.com

Converted

  • Campos
    ;
  • Mi versión de Excel:
    0,6,7

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

pegones1's Achievements

  1. Ya puedes descargar un Test de Excel, hecho con el cálculo iterativo de las fórmulas de Excel.¡Mentira!¡No lo vas a poder descargar!He incrustado el test en mi blog, y sólo vas a poder realizar el test en modo online, desde un navegador Web o con una tableta o un móvil Android o Mac. Enlace aquí:https://pedrowave.blogspot.com/2021/10/test-de-excel-con-calculo-iterativo.html Ventajas de tener el Test de Excel en la nube: No contiene macros VBA ni Office Script. Se actualiza automáticamente al ser un Excel en la Web. Siempre verás la versión más actualizada del Test. Todos los usuarios harán el Test en las mismas condiciones. Se puede hacer el Test en la nube, incluso sin tener Excel instalado. Puedes hacer comentarios al Test en la nube. Puedo actualizar el Test cuando quiera para añadir más preguntas. Puedo modificar su comportamiento, mejorar su uso y/o corregir errores. Puedo proteger mucho mejor mis derechos de autor, para que no se pueda copiar mi idea de este Test de Excel. Gracias anticipadas por seguirme, por tus reacciones y por tus comentarios.
  2. No debe importarnos que el usuario que abrió el tema no vuelva a consultarlo porque nuestras respuestas le llegaron demasiado tarde... Lo importante es poder ayudar a otros usuarios que tengan un problema similar en el futuro...
  3. Es una opción original e ingeniosa pero creo que difícil de comprender para un usuario que sepa fórmulas sencillas... Adjunto otra opción con fórmulas desbordadas que puede que sea más fácil de comprender para un usuario que esté aprendiendo a formular, pues hay 3 pasos separados: Columna D : A cada valor se le añade 1> a la izquierda, se sustituye el primer + por 2> y el segundo + por 3>. De paso se quitan los signos , y . para convertir los valores en números. Todo ello con la función SUSTITUIR. ="1>"&SUSTITUIR(SUSTITUIR(SUSTITUIR(SUSTITUIR($C2;",";"");".";"");"+";"2>";1);"+";"3>";1) Columna E (desbordada hacia la derecha en las columnas F y G): Extrae los valores y letras de 1>, 2> y 3>. Todo ello con una versión matricial de la función EXTRAE, con la ayuda de la función ENCONTRAR. =SI.ERROR(SUSTITUIR(EXTRAE($D2;ENCONTRAR({"1>"\"2>"\"3>"};$D2);SI.ERROR(ENCONTRAR({"2>"\"3>"\"0>"};$D2);100)-ENCONTRAR({"1>"\"2>"\"3>"};$D2));{"1>"\"2>"\"3>"};"");"") Sumas de C, T y V: Suma las cantidades consumidas de cada letra con la función SUMAPRODUCTO. Salu2, Pedro Wave Sumar Letras PW1.xlsx
  4. @Alberto González, prueba el adjunto. Salu2, Pedro Wave Cantidades Consumidas PW1.xlsx
  5. Prueba el adjunto con una solución sin macros. He usado una misma segmentación de datos Nombre con conexión a las dos tablas dinámicas de Ciudades y Meses. Se puede aprender en este enlace cómo: Usar las segmentaciones para filtrar datos (microsoft.com) Salu2, Pedro Wave macrofilter_PW1.xlsx
  6. Prueba el adjunto en el que he añadido a la macro SeleccionarFoto instrucciones para cuando la hoja 'FOTOS' está oculta: Option Explicit Sub SeleccionarFoto(sNombre As String) ' ' Selecciona la foto de un alumno desde la hoja FOTOS ' Dim lFila As Long ' Busca al alumno en la hoja FOTOS lFila = Application.Match(sNombre, Sheets("FOTOS").Columns(2), 0) If Not IsError(lFila) Then ' No refresca la pantalla Application.ScreenUpdating = False ' Selecciona la celda con la foto Sheets("FOTOS").Visible = True Sheets("FOTOS").Select Range("C" & lFila).Select ' Guarda el rango de la foto como imagen JPG en el directorio local SaveRangeAsPicture ' Hoja INICIO Sheets("FOTOS").Visible = False Sheets("INICIO").Select ' Refresca la pantalla Application.ScreenUpdating = True End If End Sub Salu2, Pedro Wave Copia Fotos PW4.xlsm
  7. hola amigo felicitaciones por tu ayuda , te comento viste que daba un error en la ultima coreccion que hiciste , te comento anda ok siempre y cuando la hoja fotos este visible , pero dado que se oculta por una macro para que no sea modificado este metodo no funciona dando error como te comentaba error 1004 , te pregunto se podra solucionar esto?

    1. pegones1

      pegones1

      No presto ayuda individual.

      Te contestaré si haces esta misma pregunta en el hilo del tema, para que todos puedan verlo...

  8. En mi blog comparto archivos de OneDrive sin necesidad de tenerlo instalado en el dispositivo de destino. Lo primero que hago es compartir el archivo en OneDrive (Ver enlace aquí) Lo segundo que hago es abrirlo en el navegador, donde se puede ver su dirección web: https://onedrive.live.com/edit.aspx?cid=6b219f16da7128e3&page=view&resid=6B219F16DA7128E3!68229&parId=6B219F16DA7128E3!108&app=Excel Y dentro de su dirección web el parámetro: resid=6B219F16DA7128E3!68229 Edito el siguiente enlace con ese parámetro: https://onedrive.live.com/download.aspx?resid=6B219F16DA7128E3!68229 Este enlace es el que comparto en mi blog o en cualquier correo, WhatsApp, etc., pues es una descarga directa del archivo compartido en OneDrive. Salu2, Pedro Wave
  9. Prueba la fórmula: =CONTARA(J4#) Salu2, Pedro Wave
  10. Sigo sin poder resolver qué semanas son de cada mes y además un número de semana puede ser de dos meses consecutivos??? Ya me dirás si estos valores se corresponden con estas fechas de comienzo del año: Salu2, Pedro Wave
  11. La pregunta formulada de otra manera: ¿Eres de un país europeo? Si es así, usas el sistema 2 de numeración de semanas. Si no es así, usas el sistema 1 de numeración de semanas. Salu2, Pedro Wave
  12. Prueba el adjunto. Con Power Query he anulado la dinamización de columnas para conseguir una tabla normalizada en la hoja 'TablaOrigen'. Esa tabla normalizada es el origen de datos de 3 tablas dinámicas en la hoja 'Tablas Dinámicas' TablaDinámica_Todo: con todas los valores y porcentajes por semana. TablaDinámica_10mejores: con los % de las 10 mejores semanas. TablaDinámica_PorcentajeSemanal: con los % de participación de cada día por semana. Los números de semana son ambiguos y no se puede establecer a priori a que mes corresponden. Excel admite 2 sistemas de conteo de números de semana (Ver enlace aquí): Sistema 1: La semana que contiene el 1 de enero es la primera semana del año y se numera como semana 1. Sistema 2: La semana que contiene el primer jueves del año es la primera semana del año y se numera como semana 1. Este sistema es la metodología especificada en ISO 8601, que generalmente se conoce como el sistema de numeración de semanas europeo. ¿Qué sistema has usado para generar la columna Semana? Salu2, Pedro Wave Ayuda tabla tabla dinamica PW1.xlsx
  13. He modificado la macro que busca las fotos con la función Match para que siga buscando el siguiente alumno con Find: Option Explicit Sub SeleccionarFoto(sNombre As String) ' ' Selecciona la foto de un alumno desde la hoja FOTOS ' Dim lFila As Long ' Busca al alumno en la hoja FOTOS lFila = Application.Match(sNombre, Sheets("FOTOS").Columns(2), 0) If Not IsError(lFila) Then ' No refresca la pantalla Application.ScreenUpdating = False ' Selecciona la celda con la foto Sheets("FOTOS").Select Range("C" & lFila).Select ' Guarda el rango de la foto como imagen JPG en el directorio local SaveRangeAsPicture ' Hoja INICIO Sheets("INICIO").Select ' Refresca la pantalla Application.ScreenUpdating = True End If End Sub De paso he añadido en la hoja 'FOTOS' el chequeo de alumnos con la función COINCIDIR en la columna A, y he modificado los alumnos que no coincidían con la hoja 'ALUMNADO'. También he modificado el código del formulario frmAlum para que no encuentre la primera fila de encabezado de la hoja 'ALUMNADO', con lo que ya no ocurrirá esto al buscar por "ap": Salu2, Pedro Wave Copia Fotos PW3.xlsm
  14. Sustituye xlFormulas2 por xlValues en las dos llamadas a la función Find Ya me dirás si así te funciona el adjunto. Salu2, Pedro Wave Copia Fotos PW2.xlsm
×
×
  • Create New...

Important Information

Privacy Policy