Note: The other languages of the website are Google-translated. Back to English
Iniciar sesión  \/ 
x
or
x
Registrarse  \/ 
x

or

¿Cómo cambiar el color de la celda cuando se hace clic o se selecciona la celda en Excel?

Este artículo le mostrará algunos métodos sobre cómo cambiar el color de la celda mientras hace clic en una celda y cambiar el color resaltado mientras selecciona un rango de celdas en Excel.

Cambiar el color de la celda cuando se hace clic en la celda con el código VBA
Cambie el color resaltado cuando las celdas se seleccionan con el código VBA
Resalte toda la fila y columna de la celda activa con Kutools para Excel


Cambiar el color de la celda cuando se hace clic en la celda con el código VBA

Aquí, puede cambiar el color de fondo de una celda al hacer doble clic en ella o hacer clic derecho sobre ella con el siguiente código VBA.

1. En la hoja de trabajo, cambiará el color de la celda al hacer clic en ella, haga clic con el botón derecho en la pestaña de la hoja y haga clic en Ver código desde el menú contextual.

2. En el Microsoft Visual Basic para aplicaciones ventana, copie y pegue el siguiente código VBA en el Código ventana.

VBA: cambia el color de la celda al hacer clic en ella

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Target.Interior.Color = vbRed
End Sub
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    Target.Interior.Color = vbGreen
End Sub

3. Prensa otro + Q teclas simultáneamente para cerrar el Microsoft Visual Basic para aplicaciones ventana.

Luego, cuando haga doble clic en una celda, se coloreará en rojo. Y cuando haga clic con el botón derecho en una celda, se coloreará en verde. Ver captura de pantalla:


Un clic para resaltar la fila y columna de la celda seleccionada en Excel:

Kutools for Excel's Diseño de lectura La utilidad le ayuda a resaltar rápidamente la fila y la columna de la celda seleccionada en Excel, como se muestra en la siguiente demostración.
¡Descárgalo y pruébalo ahora! (Sendero gratuito de 30 días)


Cambie el color resaltado cuando las celdas se seleccionan con el código VBA

De forma predeterminada, al seleccionar un rango de celdas, el color resaltado es gris. Si desea resaltar más el rango seleccionado, puede cambiar su color resaltado al que necesite. Haz lo siguiente.

1. Haga clic con el botón derecho en la pestaña de la hoja en la que desea cambiar el color resaltado del rango seleccionado y haga clic en Ver código desde el menú contextual.

2. En el Microsoft Visual Basic para aplicaciones ventana, copie y pegue el siguiente código VBA en el Código ventana.

Código VBA: cambia el color resaltado del rango seleccionado

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    With Target
        .Worksheet.Cells.FormatConditions.Delete
        .FormatConditions.Add xlExpression, , "TRUE"
        .FormatConditions(1).Interior.Color = vbYellow
    End With
End Sub

3. Prensa otro + Q teclas al mismo tiempo para cerrar el Microsoft Visual Basic para aplicaciones ventana.

A partir de ahora, el color resaltado del rango o celda seleccionada se cambia a amarillo. Cuando hace clic en otra celda o rango de celdas, las celdas se colorearán automáticamente.


Resalte toda la fila y columna de la celda activa con Kutools para Excel

Si se trata de una hoja de trabajo grande, es necesario resaltar toda la fila y columna de la celda activa para facilitar la lectura. Aquí el Diseño de lectura utilidad de Kutools for Excel puedo ayudarte.

Antes de aplicar Kutools for Excel, Por favor descargarlo e instalarlo en primer lugar.

1. Hacer clic Kutools > Diseño de lectura. Ver captura de pantalla:

Luego, el diseño de lectura está habilitado, puede ver que la fila y la columna de la celda activa se resaltan inmediatamente.

Nota:: Puede cambiar la configuración del diseño de lectura según sus necesidades, como se muestra a continuación.

  Si desea tener una prueba gratuita (30 días) de esta utilidad, haga clic para descargarloy luego vaya a aplicar la operación según los pasos anteriores.


Resalte toda la fila y columna de la celda activa con Kutools para Excel


Las mejores herramientas de productividad de oficina

Kutools para Excel resuelve la mayoría de sus problemas y aumenta su productividad en un 80%

  • Reutilizar: Inserte rápidamente fórmulas complejas, gráficos y cualquier cosa que hayas usado antes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
  • Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas sin perder datos; Contenido de celdas divididas; Combinar filas / columnas duplicadas... Prevenir celdas duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
  • Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
  • Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
  • Más de 300 potentes funciones. Compatible con Office / Excel 2007-2019 y 365. Compatible con todos los idiomas. Fácil implementación en su empresa u organización. Características completas Prueba gratuita de 30 días. Garantía de devolución de dinero de 60 días.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
officetab parte inferior
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Vera · 10 months ago
    Hi,
    is it possible to have a code for "change cell color when clicking on it" in the way that it will not change already formated cells with another color, please?
    After applying your code all my formating (colours) is away. Thank you. Veronika
  • To post as a guest, your comment is unpublished.
    Kris · 1 years ago
    @shea honig I had that exact same question! I hope someone will answer you! The reason I am looking for this is I have a spreadsheet I use daily and put in lots of information into single cells. It gets hard to see the values (visually, it runs into info in other cells), and would be a great feature if I could change the color of the cell being edited - only while it is being edited. The simplest solution I can think of is that the cell value would be set back to what it was prior to being clicked on - but I don't know how to do that.
  • To post as a guest, your comment is unpublished.
    kiba fil · 1 years ago
    Thank you. Great Job
  • To post as a guest, your comment is unpublished.
    shea honig · 1 years ago
    hi
    the is working grate but i want that the color should only be when the cell is selected and when i select something else, the first cell i selcted should not be colored
    can you help me pls with this thanks
  • To post as a guest, your comment is unpublished.
    perry · 1 years ago
    Hi, I am trying to figure out how to change the color of a cell, based on a selection from a dropdown list. For example, HIGH=red, MEDIUM=yellow, LOW=green.

    Any tips you can provide are greatly appreciated. Thank You
  • To post as a guest, your comment is unpublished.
    crystal · 1 years ago
    @Vishnu Subind Hi,
    The below VBA code can do you a favor, please have a try. Thank you for your comment.

    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If (Not Application.Intersect(Target, Me.Range("D9:P9")) Is Nothing) Then
    Cancel = True
    Target.Interior.Color = vbRed
    End If
    End Sub
    Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    If (Not Application.Intersect(Target, Me.Range("D9:P9")) Is Nothing) Then
    Cancel = True
    Target.Interior.Color = vbGreen
    End If
    End Sub
  • To post as a guest, your comment is unpublished.
    Vishnu Subind · 1 years ago
    Hi guys, so i used to first code to change the cell colour to green/red on doubleclick/rightclick. I would like this code, however, to work just on a specific range of cells, in my case D9:P9. can someone help me on how to do that? Im new at VBA
  • To post as a guest, your comment is unpublished.
    rahayu · 2 years ago
    trimakasih
  • To post as a guest, your comment is unpublished.
    rahayu · 2 years ago
    td muncul=tidak muncul
  • To post as a guest, your comment is unpublished.
    rahayu · 2 years ago
    Salam...
    sy sudah install kutools, tp kok td muncul tab kutools di layar excel ya? gmn cara mmunculkannya?trimakasih
  • To post as a guest, your comment is unpublished.
    crystal · 2 years ago
    @vuongngocsangbkdn@gmail.com Good day,
    Sorry can't help you with that. Thanks for commenting.
  • To post as a guest, your comment is unpublished.
    vuongngocsangbkdn@gmail.com · 2 years ago
    I have a problem.
    I want change color of one hyperlink if it had linked with one PDF to RED and if had not link with one PDF will show BLUE color.
    How can I do now?
  • To post as a guest, your comment is unpublished.
    crystal · 2 years ago
    @devika.kalika@gmail.com Hi,
    The code works well in my case after saving the workbook as an Excel Macro-Enabled Workbook.
    Can you tell me your Excel version?
  • To post as a guest, your comment is unpublished.
    devika.kalika@gmail.com · 2 years ago
    I tried the "Change the highlighted color when cells are selected with VBA code" option and saved my excel as Macro Enabled Worksheet. Now the last cells that were selected are highlighted and won't highlight other cells when selected. I've deleted code and reentered and saved, but still no change. I can't remove the previous highlight either. I'm at lost on what to do.
  • To post as a guest, your comment is unpublished.
    Jason · 2 years ago
    Is there a way to just apply this to certain cells while leaving other cells with available for number entering?
  • To post as a guest, your comment is unpublished.
    Slaxx · 2 years ago
    hi. just a little heads up. i'm using office 2007.
    i tried your code, and while it did work, it wasn't what i was looking for. so i just deleted the code completely. but the last selected/active cell before i deleted the code is still green (i changed the color from vbYellow to vbGreen), and the color won't go away. it's not affected by fill color either.
    the simplest solution i found was to just delete the cell. copying and pasting will not work, it will also copy the color.
    just thought i'd let you know. you might find another solution/troubleshooting for this, besides deleting and manual entry. still, thanks! i confirm that the code works :)
  • To post as a guest, your comment is unpublished.
    crystal · 2 years ago
    @Michelle Dear Michelle,
    I followed the steps as you described, but the code also worked in my case. Can you tell me your Office version?
    Thanks for your comment.
  • To post as a guest, your comment is unpublished.
    Michelle · 2 years ago
    I love how easy formatting my worksheet the code for "change cell color when clicking on it" would make my daily work! I am hitting a snag though. When I copy my Blank Sheet with the code entered as described, I get a error. It runs great until I create new sheets. I am a novice at coding and am working from textbooks and the internet. I appreciate any help you will offer!
  • To post as a guest, your comment is unpublished.
    madhav neupane · 3 years ago
    thank you thank you so much. I appreciate you for this.