Kako se v Excelu pomaknite na določen list ali vse liste na vrh?

V tem članku je prikazan način pomikanja določenega lista ali vseh listov do zgornje vrstice v delovnem zvezku v Excelu.

Pomaknite se po določenem listu ali vseh listih na vrh s kodo VBA

---

Pomaknite se po določenem listu ali vseh listih na vrh s kodo VBA

Za pomikanje določenega lista ali vseh listov do zgornje vrstice v Excelu, storite naslednje.

1. Na delovnem listu se morate pomakniti na vrh, pritisnite tipko druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli. Nato kopirajte in prilepite kodo VBA v okno Code.

Koda VBA: Pomaknite se na določen delovni list do vrha

Sub ScrollToTop()
ActiveWindow.ScrollRow = 1
End Sub

Za pomikanje vseh delovnih listov na vrh trenutne delovne knjige uporabite naslednjo kodo VBA.

Koda VBA: pomaknite se do vseh delovnih listov

Sub Select_A1_On_Activeworkbook()
    Dim xSheet As Worksheet
    For Each xSheet In ActiveWorkbook.Sheets
        xSheet.Activate
        ActiveSheet.Range("A1").Select
    Next
    ActiveWorkbook.Worksheets(1).Activate
End Sub

3. Po vnosu kode VBA v okno Code pritisnite na F5 tipko za zagon kode.

Nato se aktivni delovni list ali vsi delovni listi v trenutnem delovnem zvezku takoj pomaknejo na vrh.