Hogyan lehet megváltoztatni az Excelben felváltva a sor magasságát / oszlopszélességét?
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:
2. Ezután válassza ki a segítő oszlopot, majd kattintson dátum > Szűrő, majd kattintson a gombra gombra, é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:
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:
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:
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:
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:
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:
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:
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:
4. Ezután kattintson OK, minden második oszlop kijelölésre került a szakaszban, lásd a képernyőképet:
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:
6. Ezután kattintson OK, és az oszlop szélessége felváltva változott az első oszloptó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
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!