Vaikka yliviivatut solut ovat luettavissa, se on epämiellyttävää monille lukijoille. Tässä artikkelissa opit, miten poistat yliviivauksen Excelissä kolmella helpolla tavalla.

Lataa käytäntömalli

Voit ladata ilmaisen Excel-mallin täältä.

Poista yliviivaus Excel.xlsm:stä

3 helppoa tapaa poistaa yliviivaus Excelissä

Seuraavan esimerkkitietoaineiston avulla opimme, miten yliviivaus poistetaan Excelissä kolmella eri tavalla.

1. Näppäimistön pikavalinta yliviivauksen poistamiseksi Excelissä

Poista yliviivaus Excelistä käyttämällä Näppäimistön pikavalinta ,

• Ensimmäinen, valitse solut yliviivauksella.
• Paina sitten Ctrl+5 näppäimistölläsi.

Juuri noin. Paina yksinkertaisesti Ctrl+5 näppäimistölläsi poistaa kaikki yliviivaukset soluista.

2. Muotoile solut -ominaisuus Excelin yliviivauksen poistamiseksi Excelissä

Voimme käyttää Excelin Solujen muotoilu ominaisuus poistaa yliviivaukset soluista.

Vaiheet:

• Ensimmäinen, valitse solut yliviivauksella.
• Seuraavaksi Etusivu Valitse välilehti Solujen muotoilu vaihtoehto (näkyy alla olevassa kuvassa).

• Vuodesta Solujen muotoilu ponnahdusikkunassa, siirry Fontti välilehti ja poista valintaruutu valintaruudun vieressä oleva valintaruutu Yliviivaus alla Vaikutukset vaihtoehto.
• Paina OK .

Tämä prosessi poistaa kaikki yliviivaukset soluista.

3. VBA poistaa Excelin yliviivatut rivit Excelistä

Jos haluat poistaa kaikki yliviivatut rivit Excelistäsi, valitse seuraava vaihtoehto VBA on tehokkain ja turvallisin tapa saavuttaa tehtävä.

Excelin yliviivattujen rivien poistaminen Excelistä tapahtuu seuraavasti.

Vaiheet:

• Paina Alt + F11 näppäimistöllä tai siirry välilehdelle Kehittäjä -> Visual Basic avata Visual Basic Editor .

• Valitse ponnahdusikkunan valikkoriviltä seuraava vaihtoehto Lisää -> Moduuli .

• Kopioi koodiikkunaan seuraava koodi ja liitä se.

 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 

Koodisi on nyt valmis ajettavaksi.

• Palaa takaisin kiinnostava työlehti jossa yliviivatut rivit ovat, valitse rivit ja Suorita makro.

Tämä poistaa kaikki yliviivatut rivit Excel-taulukosta.

Päätelmä

Tässä artikkelissa näytettiin, miten poistat yliviivauksen Excelissä 3 eri ja helpolla tavalla. . Toivottavasti tästä artikkelista on ollut sinulle paljon hyötyä, ja voit kysyä vapaasti aiheeseen liittyviä kysymyksiä.