Hur markerar och markerar du diagonala celler i Excel?

I Excel behöver vi vanligtvis markera flera celler, men har du någonsin försökt att markera och markera de diagonala cellerna i ett intervall? I den här artikeln kommer jag att introducera en VBA-kod för att snabbt välja diagonala celler åt dig.

Markera och markera diagonala celler

Markera och markera diagonala celler

För att välja diagonala celler kan du använda en makrokod.

1. Välj den cell du vill starta diagonalvalet och tryck på Alt + F11 för att aktivera Microsoft Visual Basic för applikationer fönster.

2. klick Insert > Modulerna och klistra in under koden i skriptet.

VBA: Välj diagonala celler

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. Tryck F5 och en dialogruta dyker upp för att påminna dig om att markera celler, skriv in antalet diagonala celler du vill markera i textrutan.

4. klick OK. De diagonala cellerna i urvalet har valts ut.

Sedan kan du markera cellerna med bakgrundsfärgen.

Relativa artiklar

• Hur villkorliga formateringsvärden inte mellan två siffror i Excel?
• Hur markerar du dubbletter och överlappande datum i Excel?