Fett geschriebene Zellen in Excel nicht löschen Geschlossen

Question

Guten Tag, 

ich habe eine 1000 Zeilen lange Excel-Liste, alle in der Spalte A. Manche sind fett geschrieben und andere nicht. Ich möchte nur die fett geschriebenen Zellen behalten und die restlichen Zellen löschen. Aber alle manuell zu löschen, ist zu mühsam. Gibt es nicht eine Funktion oder eine Einstellung, die diese Aufgabe automatisch ausführt?

Danke im Voraus!

papasito · Answer

Guten Morgen,

Das Beste wäre ein VBA Macro anzuwenden 

Ich werde versuche etwas zu finden falls ich Zeit dafür habe 

Also bis später 

Gruß

papasito · Answer

hier ist ein macro VBA welches alle Einträge, die nicht fett geschrieben sind, in Spalte A löscht :

Sub DeletNichtFett()
'
' Löschen der Zellen, die nicht fett geschrieben sind
'

'
Dim i As Integer

i = Range("A1048576").End(xlUp).Row

Do While i > 0
    
    Cells(i, 1).Select
    If Selection.Font.Bold = False Then
        Selection.Delete
    End If
    i = i - 1
Loop
End Sub



LG

Papasito

Fett geschriebene Zellen in Excel nicht löschen

2 Antworten

Ähnliche Threads