Copiar color de celda según contenido (variante)

Preguntas y respuestas relacionadas

Macro para rellenar automáticamente celdas adyacentes al seleccionar valor en lista desplegable

Llevo varios días tratando de modificar una macro para adaptarla a mi hoja de cálculo sin éxito alguno. La macro la tomé de está pregunta: Con un macro.. ¿Cómo rellenar automáticamente una celda según el valor de lo que se escribe en otra?. Mi...
2 respuestas

Código colorear rango de celdas

Tengo este código para colorear una fila de celdas al seleccionar cualquiera de ese rango. Mi problema es que al posicionarme en otra fila, la fila antes seleccionada me cambia el color a ninguno. Yo tengo en tres columnas con diferentes formatos (no...
1 respuesta

Ejecutar macro al cambiar el valor de celda

A ver si alguien me puede ayudar por favor, que me estoy volviendo loca! Estoy intentando hacer una macro para que se ejecute otra cada vez que cambia la celda A1. El caso es que A1 está formulado, y lo que quiero es que se ejecute la macro cada vez...
1 respuesta

Como ejecutar una macro cuando el Valor de una celda es igual al valor de una celda de un rango

Soy nuevo en esto y no me aclaro. Quiero ejecutar tres macros diferentes si el valor de una celda coincide con el valor de cualquier celda dentro de 4 diferentes rangos. Tengo la casilla c3 que es una validación de datos en formato lista. Pues mi...
1 respuesta

Necesito poner en una celda de otra hoja el valor de la celda activa en otra hoja diferente

En una hoja se busca el dato introducido con Target. Necesito copiar otra celda de la fila activa y pasar su valor a otra celda de otra hoja
1 respuesta

Macro colorear solo bordes celda activa, urge

Tengo este código: Private Sub Worksheet_SelectionChange(ByVal Target As Range) Static OldCell As Range Static OldColorIndex As Long If Not OldCell Is Nothing Then OldCell.Interior.ColorIndex = OldColorIndex End If OldColorIndex =...
1 respuesta

Macro de mayúsculas, con un problema

Tengo esta macro para todo mayúsculas: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range(" A12:A41,C12:C41")) Is Nothing Then Target.Value = AMayusculas(Target.Value) End If End Sub Y en un modulo: Public Function...
2 respuestas

Vencimiento por fechas automatizar celda de al lado

Seguro que para vosotros es muy sencillo, pero para los que estamos empezando a hacer nuestros primeros macros es algo complicado. Yo tengo en un libro en cada una de las hojas el macro: [code] Private Sub Worksheet_Change(ByVal Target As Range) Dim...
1 respuesta

Celda que suma.

Me gustaría saber si es posible conseguir en excel lo siguiente: Tengo una celda que acumula totales, pero estos totales los calculo yo directamente. Me gustaría habilitar una celda para que le ponga un número, pulse intro, lo sume a la columna del...
1 respuesta

Poder suprimir en esta macro

De esta macro: Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Not Intersect(Target, Range(" A12:E60000")) Is Nothing Then Target.Value = UCase(Target.Value) End Sub Poder suprimir la linea : "On Error Resume Next" Y que...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas del tema