Come rimuovere o eliminare tutti i testi oi caratteri barrati dalle celle in Excel?
Questo articolo parla della rimozione di tutti i testi o caratteri barrati da più celle in Excel.
Rimuovi tutti i testi barrati dalle celle con codice VBA
Rimuovi tutti i testi barrati dalle celle con codice VBA
Il codice VBA di seguito può aiutarti a rimuovere tutti i testi nelle celle che sono state contrassegnate con barrato. Si prega di fare quanto segue.
1. Nel foglio di lavoro contiene i testi barrati che è necessario rimuovere, premere il tasto altro + F11 tasti contemporaneamente per aprire il file Microsoft Visual Basic, Applications Edition finestra.
2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic Inset > Modulo. Quindi copia e incolla sotto il codice VBA nella finestra del codice.
Codice VBA: rimuovi tutti i testi barrati dalle celle
Sub DelStrikethroughText()
Dim xRg As Range, xCell As Range
Dim xStr As String
Dim I As Long
On Error Resume Next
Set xRg = Application.InputBox("Please select range：", "KuTools For Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = Fase
For Each xCell In xRg
If IsNumeric(xCell.Value) And xCell.Font.Strikethrough Then
xCell.Value = ""
ElseIf Not IsNumeric(xCell.Value) Then
For I = 1 To Len(xCell)
With xCell.Characters(I, 1)
If Not .Font.Strikethrough Then
xStr = xStr & .Text
End If
End With
Next
xCell.Value = xStr
xStr = ""
End If
Next
Application.ScreenUpdating = True
End Sub3. premi il F5 o fare clic su Correre pulsante per eseguire il codice. Nel spuntare Kutools for Excel finestra di dialogo, selezionare l'intervallo che contiene i testi barrati da rimuovere, quindi fare clic su OK pulsante. Vedi screenshot:
Quindi tutti i testi contrassegnati con un barrato vengono rimossi dalle celle immediatamente come mostrato nell'immagine sottostante.
Articoli correlati:
- Come rimuovere il testo prima o dopo un carattere specifico in Excel?
- Come rimuovere il testo indesiderato dalla cella in Excel?
- Come rimuovere i numeri dalle celle che contengono testi e numeri in Excel?
- Come rimuovere solo il testo dalle celle che contengono numeri e testi in Excel?
I migliori strumenti per la produttività in ufficio
Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%
- Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
- Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
- Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
- Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
- Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
- Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
- Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
- Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
- Più di 300 potenti funzionalità. Supporta Office/Excel 2007-2021 e 365. Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.
Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
