Hogyan lehet nagyítani az összes lapot egy méretben az Excelben?

Alapértelmezés szerint a lapok 100% -os nagyításban vannak, de az aktuális lapot a kívánt méretre nagyíthatja, ha húzza a zoom csúszkát. Hogyan lehet ugyanakkor nagyítani a munkafüzet összes lapját azonos méretűre, egy időben?

Nagyítsa az összes lapot egy méretben a Ctrl vagy a Shift használatával

Nagyítsa az összes lapot egy méretben a VBA segítségével

---

Nagyítsa az összes lapot egy méretben a Ctrl vagy a Shift használatával

A munkafüzet összes méretének vagy egyes lapjainak egy méretben történő nagyításához először válassza ki a lapfüleket, majd nagyítsa őket.

Tart Ctrl gombbal válassza ki azokat a lapfüleket, amelyek nagyítási szintjét tömegesen kívánja megváltoztatni, majd húzza el a zoom csúszkáját. Lásd a képernyőképet:

Válassza ki az első fület és a visszatartást műszak gombbal válassza ki a Lap fül sáv utolsó lapját, majd húzza a zoom csúszkát a nagyítási szint megváltoztatásához.

---

Nagyítsa az összes lapot egy méretben a VBA segítségével

Ha a VBA kódot szeretné megoldani, a következő kód segíthet.

1. nyomja meg Alt + F11 gombok a Microsoft Visual Basic for Applications ablak.

2. kettyenés betétlap > Modulok, másolja és illessze be a kódot az üres parancsfájlba.

VBA: Az összes fül csökkentése vagy nagyítása méretben

Sub DbZoom()
'UpdatebyExtendoffice20171215
    Dim I As Long
    Dim xActSheet As Worksheet
    Set xActSheet = ActiveSheet
    For I = 1 To ThisWorkbook.Sheets.Count
        Sheets(I).Activate
        ActiveWindow.Zoom = 150
    Next
    xActSheet.Select
End Sub

3. nyomja meg F5 gombot a futtatáshoz, és az összes lap fülének nagyítási szintje tömegesen a megadott százalékra módosult.