¿Cómo seleccionar y resaltar celdas diagonales en Excel?
En Excel, normalmente necesitamos seleccionar celdas múltiples, pero ¿alguna vez ha intentado seleccionar y resaltar las celdas diagonales en un rango? En este artículo, presentaré un coed VBA para seleccionar rápidamente celdas diagonales para usted.
Seleccionar y resaltar celdas diagonales
Seleccionar y resaltar celdas diagonales
Para seleccionar celdas diagonales, puede usar un código de macro.
1. Seleccione la celda en la que desea iniciar la selección diagonal y presione Alt + F11 claves para habilitar el Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic en recuadro > Módulo y pegue el siguiente código en el script.
VBA: seleccione celdas diagonales
Sub selectDiag()
'UpdatebyExtendoffice20171128
Dim I As Long
Dim xCount As Long
Dim xRg As Range
On Error Resume Next
Set xRg = ActiveCell
If xRg Is Nothing Then Exit Sub
xCount = Val(InputBox("How many cells do you want to select diagonally?", "KuTools For Excel"))
If xCount = 0 Then Exit Sub
For I = 1 To (xCount - 1)
Set xRg = Union(xRg, ActiveCell.Offset(I, I))
Next I
xRg.Select
End Sub
3. Prensa F5 y aparece un cuadro de diálogo para recordarle que seleccione celdas, escriba el número de celdas diagonales que desea seleccionar en el cuadro de texto.
4. Hacer clic en OK. Se han seleccionado las celdas diagonales de la selección.
Luego, puede resaltar las celdas con el color de fondo.
Artículos relativos
- ¿Cómo condicionar valores de formato no entre dos números en Excel?
- ¿Cómo resaltar los duplicados y las fechas superpuestas en Excel?
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
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!