Luis Mondelo

Te mando un ejemplo: Private Sub CommandButton1_Click() ActiveSheet.CommandButton1.BackColor = vbGreen End Sub Con esta macro, justo al pulsar el botón lo pintará de verde. Recuerda finalizar y puntuar

¿En la columna B cuando hay inexistencia tendremos un cero? ¿O estará vacia?

Puedes hacer lo siguiente: En la hoja en la que estás, viendo las imágenes pulsa F5 te saldrá una pequeña ventana y pulsa en botón ESPECIAL-----después selecciona la opción de OBJETOS y con esto se habrán seleccionado todas las imágenes al mismo...

Te mando mi propuesta: vamos a situar tu tabla en el rango A1:B8 siendo la primera fila en encabezado. Ahora te sitúas en C2 y escribes esta fórmula: =JERARQUIA(CONTAR(A2:$A$8);$A$2:$A$8)&"-"&JERARQUIA(CONTAR($B$2:B2);$B$2:$B$8) Después solo te queda...

¿No sería mejor los ceros a la izquierda para completar los 9 dígitos de tope que tiene un dni?

Te lo he mandado por mail. Si quedó claro puedes finalizar esta consulta Un abrazo.

Te mando un ejemplo, sigue mis pasos: Desde el menú de programador inserta un objeto activex de tipo imagen y dibújalo en la planilla. Después entra en su propiedad PICTURESIZEMODE y elije la opción 3----sal de las propiedades y recuerda dejar...

Te mando un ejemplo para que lo adaptes a tus necesidades, sigue mis pasos: Escribe en la celda A1 lo siguiente: Vaca, pasto, 4589, granja Ahora ejecuta esta macro y observa el resultado. Sub separar() fila = 1 tope = Len(Range("a1")) For x = 1 To...

Te mando mi solución. En la hoja2 vamos a suponer que los datos están escritos en las siguientes celdas: En a1 ponemos el encabezado "médico" En b1 ponemos "cirugía" En a2 ponemos "diana" Ahora donde tienes escrito el 1 (sería la celda B2) escribe...

Te mando mi solución: Tienes que copiar esta macro en cada uno de los objetos hoja de ese libro, es decir, en la hoja NANICA, REPUESTOS y IPOD. Repito, esta macro se copia en los objeto hoja que he mencionado no en un módulo. Al final tendrás 3...