Az üres oszlopok törléséhez a Microsoft Excel fájlban többféle módszer létezik. Miért kellene ezt tennie? - Egyszerű.
Lásd még a felső sor lefagyasztásáról szóló cikkünket az Excelben
Időnként a weboldalakról importált adatok nagy számú oszlopot eredményezhetnek, még akkor is, ha nem használják őket. A CSV-fájlokkal és a .txt-fájlokkal ugyanolyan gyakran fordul elő.
Ha ez megtörténik, az oszlopok manuális törlése nem mindig könnyű. Persze, ha csak kettő vagy három üres oszloped van, akkor nagyon helyes manuálisan törölni őket. De mi van, ha az importált projekt 57 üres és nem folytonos oszlopot hoz létre? - Ehhez szüksége lesz egy automatizált folyamatra.
A VBA makró használata
Gyors linkek
- A VBA makró használata
-
-
- Nyissa meg az Excel fájlt
- Tartsa az Alt és az F11 együtt
- Várja meg, amíg a Microsoft Visual Basic for Applications ablak megjelenik
- Kattintson a Beszúrás gombra
- Válassza a modult
- Illessze be az alábbi kódsorokat az ablakba
- Nyomja meg az F5 billentyűt a makró összeállításához és végrehajtásához
- Adja meg a megfelelő munkatartományt a párbeszédablakban
- $ A $ 1 - felső sarok
- J J $ 12 - Alsó sarok
- Nyomja meg az OK gombot
-
-
- Az Excel eszközök használata
-
-
- Először válassza ki az adattartományt
- Nyomja meg az F5 billentyűt
- Kattintson a Különleges elemre
- Válassza az Üregek lehetőséget
- Kattintson az OK gombra (Ez a választás biztosítja, hogy az összes üres cellát kiválasztják a célzott tartományban)
- Lépjen a Kezdőlap fülre
- Válassza a Törlés legördülő menüt a Cella eszközök csoport alatt
- Válassza a Cella törlése lehetőséget
- Az oszlopok eltávolításához és átrendezéséhez válassza a Shift Cells Left lehetőséget
- Kattintson az OK gombra
- A sorok eltávolításához és átrendezéséhez válassza a Cella feljebb tolása elemet
-
-
- Egyéb könnyen elvégezhető rendezési feladatok
- Végső gondolat
Az első módszer egy VBA makró használata.
-
Nyissa meg az Excel fájlt
-
Tartsa az Alt és az F11 együtt
-
Várja meg, amíg a Microsoft Visual Basic for Applications ablak megjelenik
-
Kattintson a Beszúrás gombra
-
Válassza a modult
-
Illessze be az alábbi kódsorokat az ablakba
Sub DeleteEmptyColumns()
'Updateby20140317
Dim rng As Range
Dim InputRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = InputRng.Columns.Count To 1 Step -1
Set rng = InputRng.Cells(1, i).EntireColumn
If Application.WorksheetFunction.CountA(rng) = 0 Then
rng.Delete
End If
Next
Application.ScreenUpdating = True
End Sub
-
Nyomja meg az F5 billentyűt a makró összeállításához és végrehajtásához
-
Adja meg a megfelelő munkatartományt a párbeszédablakban
A munkatartomány vagy az adattartomány az az oszlopok közötti konkrét intervallum, amelyet meg akar célozni. A formátum $ A $ 1: $ J $ 12. A betűk az oszlopnak felelnek meg, a számok pedig a soroknak.
Ha ezt kihúzza az egérrel vagy a Shift lenyomásával és a nyílbillentyűkkel, akkor észreveszi, hogy:
$ A $ 1 - felső sarok
J J $ 12 - Alsó sarok
Az adattartományt nem lehet kiválasztani, mielőtt elkezdené feltölteni a makrót, mivel az nem marad kijelölve.
Nyomja meg az OK gombot
Ezt követően az összes üres oszlopot törölni kell, és az összes kitöltött oszlopnak egymás mellett kell lennie.
Az Excel eszközök használata
Nyilvánvaló, hogy az Excel nem lenne ilyen erőmű, ha nem lenne nagyszerű válogatási képessége. A Törlés legördülő menüből teljes sorokat, oszlopokat vagy üres cellákat törölhet.
-
Először válassza ki az adattartományt
-
Nyomja meg az F5 billentyűt
-
Kattintson a Különleges elemre
-
Válassza az Üregek lehetőséget
-
Kattintson az OK gombra (Ez a választás biztosítja, hogy az összes üres cellát kiválasztják a célzott tartományban)
-
Lépjen a Kezdőlap fülre
-
Válassza a Törlés legördülő menüt a Cella eszközök csoport alatt
-
Válassza a Cella törlése lehetőséget
-
Az oszlopok eltávolításához és átrendezéséhez válassza a Shift Cells Left lehetőséget
-
Kattintson az OK gombra
Most az üres oszlopok üres cellái eltűntek volna, és az összes többi sort közelebb helyeznék egymáshoz.
Ugyanazt a megközelítést használhatja a teljes sorok törlésére. Ahelyett, hogy a cellákat balra mozgatná, válassza a másik lehetőséget.
A sorok eltávolításához és átrendezéséhez válassza a Cella feljebb tolása elemet
Attól függően, hogy az Excel melyik verzióját használja, eltérő szövegeket kaphat. Mindenesetre a Cella törlése menü két legfelső lehetősége mindig azonos.
Ez a módszer nem távolítja el a kijelölt összes üres cellát. Az Excel 2013 előtt ez véletlenül eltávolítaná még az üres sorokat is, amelyek általában zavarják a rendezést.
Most a probléma már nem jelentkezik. Ezért, ha a soroktól is meg akar szabadulni, ezt megteheti az adattartomány újbóli kiválasztásával és az előző lépések végrehajtásával. Ezután egyszerűen válassza ki a cellák eltolását vagy törlését balra helyett.
Egyéb könnyen elvégezhető rendezési feladatok
Noha az Excel eszköztár technikai használata az üres oszlopok és sorok törléséhez könnyebbnek tűnik, a VBA makró módszer hibátlan, ami azt jelenti, hogy régebbi Microsoft Excel verziókban is használható.
Ugyanazon VBA modul vagy a Go To funkciómenü segítségével sokkal többet tehet az Excel programban. Van bizonyos képletek, amelyek már nem relevánsak? - Távolíthatja el őket, vagy ennek megfelelően átrendezheti.
Eltávolíthatja a felesleges megjegyzéseket vagy az összes megjegyzést a projektből, ha nem akarja, hogy azok megjelenjenek a prezentáció során. Vizsgálja meg a VBA-t, ha Excel felhasználói szeretne lenni.
Végső gondolat
Az évek során széles körű kiegészítők jelentek meg az interneten. Néhányuk lehetővé teszi, hogy még több hivatkozást tegyen a nagy táblázatok rendezésekor. Ezek az alkalmazások azonban ritkán ingyenesek, és nem érik meg az egyszerű feladatokra, például az üres sorok, cellák és oszlopok eltávolítására vonatkozó gondot.
Ezen túlmenően, ha ez nehéz lenne, a Microsoft mára tovább egyszerűsítette a folyamatot, vagy még szélesebb körű útmutatót készített volna az Excel válogatásáról.
