Sisukord
Kuigi ülejoonitud lahtrid on loetavad, on see paljude lugejate jaoks ebamugav. Selles artiklis saate teada, kuidas eemaldada ülejoonitud lahtrid Excelis 3 lihtsal viisil.
Lae alla praktika mall
Tasuta praktilise Exceli malli saate alla laadida siit.
Excel.xlsm-i ülejoonimise eemaldamine
3 lihtsat viisi, kuidas eemaldada Excelis ülejoonimine
Järgmise andmekogumi näitel õpime, kuidas Excelis 3 erineval viisil ülejoonistust eemaldada.
1. Klaviatuurikombinatsioon Exceli läbijoonte eemaldamiseks
Excelist ülejoonimise eemaldamine koos Klaviatuuri otsetee ,
- Esiteks, valige lahtrid läbijoonega.
- Seejärel vajutage Ctrl+5 klaviatuuril.
See on kõik. Lihtsalt vajutades Ctrl+5 klaviatuuril eemaldab teie lahtritest kõik läbijooned.
2. Lahtrite vormingu funktsioon Exceli läbijoonte kustutamiseks
Me võime kasutada Exceli Lahtrite vormindamine funktsioon, et kustutada lahtritest ülejoonimine.
Sammud:
- Esiteks, valige lahtrid läbijoonega.
- Järgnevalt on Kodu vahekaart, valige Lahtrite vormindamine valik (näidatud allpool oleval pildil).
- Alates Lahtrite vormindamine hüpikaknas, minge Kirjatüüp vahekaart ja eemaldage märge märkeruutu kõrval Ülestriigitud all Efektid võimalus.
- Press OK .
See protsess eemaldab kõik läbijooned teie lahtritest.
3. VBA, et eemaldada Excelist läbijoonitud read
Kui soovite kustutada kõik ülejoonitud read oma Excelist, siis VBA on kõige tõhusam ja ohutum meetod ülesande täitmiseks.
Allpool on esitatud sammud, kuidas kustutada Excelist ülejoonitud ridu.
Sammud:
- Press Alt + F11 klaviatuuril või mine vahekaardile Arendaja -> Visual Basic avada Visual Basic toimetaja .
- Pikakoodi aknas klõpsake menüüribal nuppu Insert -> Moodul .
- Kopeerige koodiaknas järgmine kood ja kleepige see sisse.
Sub DeleteStrRows() Dim r As Range Dim iCheck As Boolean Dim i As Integer Dim iRows As Integer iRows = Selection.Rows.Count If iRows> 2 Then For i = iRows To 1 Step -1 iCheck = False For Each r In Selection.Rows(i).Cells iCheck = IsNull(r.Font.Strikethrough) If Not iCheck Then iCheck = r.Font.StrikethroughIf iCheck Then Exit For Next r If iCheck Then Selection.Rows(i).EntireRow.Delete Next i End If End Sub
Teie kood on nüüd valmis käivitamiseks.
- Mine tagasi huvipakkuv tööleht kus on teie läbijoonitud read, valige read ja Käivita makro.
See kustutab kõik ülestriivitud read Exceli töölehest.
Kokkuvõte
See artikkel näitas teile, kuidas Excelis 3 erinevat ja lihtsat võimalust ülejoonitud teksti eemaldada. . Ma loodan, et see artikkel on olnud teile väga kasulik. Võite julgelt esitada mis tahes küsimusi selle teema kohta.