Ugrás a tartalomra
 

 Hogyan lehet megváltoztatni az Excelben felváltva a sor magasságát / oszlopszélességét?

Szerző: Xiaoyang Utolsó módosítás: 2024-07-31

Ha feltételezzük, hogy van egy nagy munkalapja, amelynek több oszlopa vagy sora van, felváltva kell beállítani a szélességüket vagy magasságukat, manuálisan módosíthatja a sor magasságát vagy oszlopszélességét, ha kevés oszlop vagy sor van. De hogyan lehet egyszerre több sor magasságot vagy oszlopszélességet megváltoztatni az Excel programban?

A Szűrő funkcióval módosítsa minden második sormagasságot

Minden más sormagasságot / oszlopszélességet módosítson VBA kóddal

Módosítsa minden második sor magasságát / oszlopszélességét a Kutools for Excel segítségével


A Szűrő funkcióval módosítsa minden második sormagasságot

A Szűrő funkcióhoz először létre kell hoznia egy segítő oszlopot, majd a Szűrés funkciót kell alkalmaznia a szükséges sorok szűrésére, és egyszerre kell beállítania az összes szűrt sor magasságát. Kérjük, tegye a következőket:

1. Adatai mellett egy üres cellába írja be külön a 0 és 1 számot az első és a második sorba, majd jelölje ki őket, majd húzza át a kitöltő fogantyút a tartomány magasságának cellájába, és ellenőrizze Cellák másolása alkotja a kitöltő fogantyút, és az eredményt a következő képernyőképen kapja:

képernyőkép a 0 és az 1 kézzel történő beírásáról az oszlopban

2. Ezután válassza ki a segítő oszlopot, majd kattintson dátum > Szűrő, majd kattintson a gombra doc-szűrő-gomb-1gombra, és válassza a 0 vagy 1 lehetőséget a legördülő listából, ez a példa a 0-t választom, lásd a képernyőképet:

képernyőkép mind a 0 cella szűréséről

3. Kattints OK, az összes, a 0 számot tartalmazó sor leszűrt. Ezután válassza ki ezeket a szűrt sorokat, majd kattintson Otthon > kialakított > Sor magasság, lásd a képernyőképet:

a Sor magassága gombra kattintás képernyőképe

4. Az Sor magasság párbeszédpanelen, kérjük, adja meg a kívánt magasságot, lásd a képernyőképet:

egy képernyőkép egy bizonyos sormagasság meghatározásáról

5. Ezután kattintson OK ennek a párbeszédpanelnek a bezárásához, és a kiválasztott szűrt sormagasság módosult. Végül kattintson dátum > Szűrő a szűrő funkció törléséhez, és a sor magasságát felváltva változtattuk. Lásd a képernyőképet:

képernyőkép az új sormagasságról

Megjegyzések:

1. Megváltoztathatja a sor magasságát felváltva az első sortól kezdve.

2. Ezt a módszert nem alkalmazzák az oszlop szélességének megváltoztatására.

3. Az eljárás befejezése után szükség szerint törölheti a segítő oszlopot.


Minden más sormagasságot / oszlopszélességet módosítson VBA kóddal

Ha mind a sor magasságát, mind az oszlop szélességét meg kell változtatnia, akkor a következő VBA-kód kedvezhet Önnek.

1. Tartsa lenyomva a ALT + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablak.

VBA-kód: A munkalap minden második sormagasságának módosítása

Sub RowHeight()
'Update 20140625
Dim Rng As Range
Dim WorkRng As Range
Dim xInput As Long
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xInput = Application.InputBox("Row height", xTitleId, "", Type:=2)
For i = 1 To WorkRng.Rows.Count Step 2
    WorkRng.Rows(i).RowHeight = xInput
Next
End Sub

3. Ezután nyomja meg a gombot F5 gomb a kód végrehajtásához, és megjelenik egy felszólító mező, amely emlékezteti Önt arra, hogy válassza ki a tartomány magasságát módosítani kívánt tartományt, lásd a képernyőképet:

képernyőkép a tartomány kiválasztásáról a VBA-kód futtatása után

4. Kattintson a gombra OK, megjelenik egy újabb prompt doboz, amely lehetővé teszi a szükséges magasság megadását, lásd a képernyőképet:

képernyőkép a sor magasságának megadásáról

5. Kattintson a gombra OK, a kiválasztott tartomány magassága felváltva változott az első sortól. Lásd a képernyőképet:

képernyőkép az eredményről

Megjegyzések:

1. Ha minden más oszlopszélességet módosítani szeretne, kérjük, alkalmazza a következő VBA kódot:

VBA kód: A munkalap minden más oszlopszélességének módosítása

Sub CloumnWidth()
'Update 20140625
Dim Rng As Range
Dim WorkRng As Range
Dim xInput As Long
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xInput = Application.InputBox("Cloumn width", xTitleId, "", Type:=2)
For i = 1 To WorkRng.Columns.Count Step 2
    WorkRng.Columns(i).ColumnWidth = xInput
Next
End Sub

2. Ha módosítani szeretné a sor magasságát vagy az oszlop szélességét a második sornál / oszlopnál kezdődik, akkor csak ki kell választania az adattartományt a második sorból / oszlopból.


Módosítsa minden második sor magasságát / oszlopszélességét a Kutools for Excel segítségével

Ha telepítve van Kutools az Excel számára, annak Válassza az Intervallum sorok és oszlopok lehetőséget segédprogram segítségével előbb minden második sort vagy oszlopot kiválaszthat, majd a sor magasságát és oszlopszélességét egyszerre módosíthatja.

Kutools az Excel számára több mint 300 praktikus Excel eszközt tartalmaz. 30 nap alatt szabadon kipróbálható korlátozás nélkül.Szerezd meg most.

1. Válassza ki a használni kívánt adattartományt.

2. Kattintson a gombra Kutools > választ > Válassza az Intervallum sorok és oszlopok lehetőséget, lásd a képernyőképet:

3. Az Válassza az Intervallum sorok és oszlopok lehetőséget párbeszédpanelen ellenőrizze Sorok or Oszlopok tól választ szakaszban, majd az Opciók szakaszban írja be a Intervalluma és a Oszlopok or Sorok számot, ebben a példában oszlopokat választok, lásd a képernyőképet:

képernyőkép minden második sor magasságának megváltoztatásáról a Kutools for Excel segítségével

4. Ezután kattintson OK, minden második oszlop kijelölésre került a szakaszban, lásd a képernyőképet:

képernyőkép az összes többi oszlop kiválasztásáról

5. Kattintson a gombra Otthon > kialakított > Oszlopszélesség, és írja be a kívánt oszlopszélességek számát a Oszlopszélesség párbeszédpanel, lásd a képernyőképeket:

képernyőkép az Oszlopszélesség opcióra való kattintásról -2 képernyőkép új oszlopszélesség beviteléről

6. Ezután kattintson OK, és az oszlop szélessége felváltva változott az első oszloptól.

egy eredmény képernyőképe az új oszlopszélességekről

Megjegyzések:

1. Minden második sor kiválasztásához ellenőrizze Sorok in Válassza az Intervallum sorok és oszlopok lehetőséget párbeszédpanel a 3. lépésben.

2. Ha módosítani szeretné a sor magasságát vagy az oszlop szélességét a második sornál / oszlopnál kezdődik, akkor csak ki kell választania az adattartományt a második sorból / oszlopból.


Kapcsolódó cikkek:

Hogyan lehet árnyalni minden más vagy alternatív sort az Excelben?

Hogyan lehet gyorsan törölni az Excel minden második sorát?


A legjobb irodai hatékonyságnövelő eszközök

🤖 Kutools AI Aide: Forradalmasítsa az adatelemzést a következők alapján: Intelligens végrehajtás   |  Kód létrehozása  |  Hozzon létre egyéni képleteket  |  Adatok elemzése és diagramok létrehozása  |  A Kutools funkciók meghívása...
Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!