Luis Mondelo

Te mando una solución: Me voy a imaginar que la columna B se empieza a rellenar desde B2 hacia abajo y también me invento que la primera de las opciones del menú desplegable se llama "primera" (con idéntica caligrafía que tiene la lista desplegable)....

Te mando la solución. Debido a que quieres que sea automático al pulsar cualquiera de los checkbox tenemos que usar los 4 eventos click de cada checkbox. Quedaría así: (En mi ejemplo los valores de C1, C2, C3 y C4 los tengo en la hoja1. Private Sub...

Para poder ayudarte necesito ver los datos y analizar la casuística. [email protected] Identifícate en el mail con la pregunta de todoexpertos.

Te mando mi solución y sigue mis instrucciones: Selecciona con el ratón todos los datos de esa columna, NO la columna entera, solo las celdas que contienen los datos a analizar. Después solo tienes que ejecutar esta macro y todo listo! Sub...

Crea una pestaña nueva llamada RESUMEN y después ejecuta esta macro y listo: Sub resumen() For Each hoja In ActiveWorkbook.Sheets If hoja.Name <> "resumen" Then hoja.Select columna = Range("mm1").End(xlToLeft).Column ultima =...

Perdona no entiendo. Esta macro está correcta, según lo que selecciones en el combo1 se llenará el combo2 con todos los valores de esa columna. ¿Qué es lo que quieres hacer concretamente?

Según Microsoft el tope máximo de caracteres por celda es de 32767 de los cuales en la celda solo se verán 1024 pero en la barra de fórmulas se verán todos.

Te mando la fórmula para conseguirlo: He escrito los datos en el rango A1:B3, siendo la primera fila la de los rótulos A y B =SI(A2=B2;"SE MANTIENE";SI(B2>A2;"MEJORA";"NO MEJORA")) Recuerda finalizar y puntuar la consulta

Te paso la solución con un ejemplo. Estas son las macros necesarias para conseguirlo dentro de un formulario. Si quieres dime tu mail y te mando el archivo completo Private Sub CommandButton1_Click() ListBox2.Clear End Sub Private Sub...

Te mando la solución. Ejecuta esta macro y todo listo! Sub hacerpdf() For Each hoja In ActiveWorkbook.Sheets ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=hoja.Name Next End Sub Guardará los pdf en el directorio predeterminado de excel....