Marcial C. C.

Coloca esta fórmula en la celda donde quieres que te devuelva el valor booleano: =SI(ESERROR(BUSCAR("POR";A:A);0;1) Cambia la columna A por la columna donde quieras buscar. Si te ha valido la respuesta.

Carlos pon este código en el evento Change de la hoja: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A1")) Is Nothing Then Select Case Target Case 1: ActiveWorkbook.Sheets("Hoja2").Tab.Color = vbRed 'Rojo Case 2:...

Se puede hacer con código, aunque deberías hablar con el administrador para que te diera permiso para modificar los permisos. Mediante código, puedes poner la carpeta en modo lectura-escritura, grabar el fichero y volver a dejar la carpeta de solo...

Esto te cierra el formulario, graba el libro y sale de Excel. Asígnalo a un botón del formulario Private Sub CommandButton1_Click() UserForm1. Hide 'Cierra el formulario, pon el nombre de tu formulario' ActiveWorkbook. Save 'Graba el libro'...

Coloca al principio de las macros esta instrucción: If ActiveSheet.Name <> "Ingreso" Then Exit Sub Esto hace que cuando se vayan a ejecutar estas macros, si la hoja activa, no es Ingreso, sale de la macro y no hace nada. Si te ha valido la respuesta.

Lo más probable es que en los ordenadores que abres ese archivo con macros, no tengan las mismas referencias que tienes en el que lo has creado. Para solucionarlo, mira en el editor de VBA en el menú Herramientas, la opción Referencias Las...

Jose Luis, ¿no te vale con una fórmula en la columna C? De todas formas si lo que necesitas es código, aquí lo tienes: Sub sumar() 'Por Marcial Castro' For f = 5 To Range("G" & Rows.Count).End(xlUp).Row Cells(f, 3) =...

Para los pares menores que 62, utiliza en validación de datos: =Y(A1<60;RESIDUO(A1;2)=0) y para los impares =Y(B1<79;RESIDUO(B1;2)=1) Debes ponerlo en fórmula personalizada. Si te ha valido la respuesta.

Coloca esto en el evento Terminate del formulario Private Sub UserForm_Terminate() Application.Visible = True End Sub Mediante Apis, se puede poner un botón de minimizar al formulario, pásame tu correo y te mando el código para hacerlo. Si te ha...

Te he subido este archivo en el que tienes más de 500. Son los que yo utilizo, espero que te valgan. https://www.dropbox.com/s/x7gal6j0038mg7a/Iconos.rar?dl=0