Cum se setează ordinea de file a celulelor sau celulelor deblocate în Excel?

Să presupunem că trebuie să setați ordinea de file pentru propriile celule definite. De exemplu, apăsând tasta Tab se va muta de la celula B5 la C6, de la C6 la D7, de la D7 la E8, apoi se va întoarce la B5 când părăsești celula E8, așa cum se arată în captura de ecran de mai jos. Cum se realizează? Acest articol vă oferă o metodă VBA.

Setați ordinea filelor celulelor sau celulelor deblocate cu codul VBA

Setați ordinea filelor celulelor sau celulelor deblocate cu codul VBA

Rulați următoarea metodă VBA pentru a seta ordinea de file a celulelor dintr-o foaie de lucru normală sau a celulelor deblocate într-o foaie de lucru protejată.

1. În foaia de lucru trebuie să setați ordinea filelor, faceți clic dreapta pe fila foaie și faceți clic pe Afișați codul din meniul contextual.

2. În Microsoft Visual Basic pentru aplicații fereastră, copiați și lipiți codul VBA de mai jos în Cod fereastră.

Cod VBA: setați ordinea filelor de celule sau celule deblocate

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim tabArray As Variant
    Dim i As Long
    tabArray = Array("B5", "C6", "D7", "E8")
    Application.ScreenUpdating = False
    For i = LBound(tabArray) To UBound(tabArray)
        If tabArray(i) = Target.Address(0, 0) Then
            If i = UBound(tabArray) Then
                Me.Range(tabArray(LBound(tabArray))).Select
            Else
                Me.Range(tabArray(i + 1)).Select
            End If
        End If
    Next i
    Application.ScreenUpdating = True
End Sub

notițe:

3. apasă pe Alt + Q tastele pentru a închide Microsoft Visual Basic pentru aplicații fereastră.

De acum înainte, după introducerea datelor în B5, cursorul se va deplasa la C6 când apăsați tasta Tab sau Enter, apoi la D7 când părăsiți C6 și în final la E8 în foaia de lucru curentă.

Articole pe aceeași temă:

• Cum se face referire la numele filei în celulă în Excel?
• Cum să omiteți celulele sau coloanele atunci când introduceți tab în Excel?