Herbers Excel-Forum - das Archiv
Bestimmt Zellen einer Spalte löschen
- Bestimmt Zellen einer Spalte löschen von Marlene vom 27.11.2003 10:47:07
- AW: Bestimmt Zellen einer Spalte löschen - von WernerB. am 27.11.2003 12:18:28
- AW: Bestimmt Zellen einer Spalte löschen - von Marlene am 27.11.2003 13:03:14
- AW: Bestimmt Zellen einer Spalte löschen - von Marlene am 27.11.2003 13:51:01
- AW: Bestimmt Zellen einer Spalte löschen - von Marlene am 27.11.2003 13:03:14
- AW: Bestimmt Zellen einer Spalte löschen - von WernerB. am 27.11.2003 12:18:28
 |
Betrifft: Bestimmt Zellen einer Spalte löschen
von: Marlene
Geschrieben am: 27.11.2003 10:47:07
Hallo!
Ich kenne mich leider nicht sehr gut aus, habe mir bis jetzt meine makros immer zusammengestückelt. Vielleicht kann mir jemand bei folgendem Problem helfen?
Ich möchte in Spalte B alle Einträge, die nicht fett gedruckt sind, löschen (Nur die Inhalte, nicht die Zellen). Die Tabellen,in denen das Makro angewendet werden soll, haben unterschiedlich viele Zeilen.
Grüße
Marlene
 |
Betrifft: AW: Bestimmt Zellen einer Spalte löschen
von: WernerB.
Geschrieben am: 27.11.2003 12:18:28
Hallo Marlene,
was hältst Du hiervon:
Sub Marlene()
Dim c As Range
Dim laR As Long
Application.ScreenUpdating = False
laR = Cells(Rows.Count, 2).End(xlUp).Row
For Each c In Range("B1:B" & laR)
If c.Font.Bold = False Then
c.ClearContents
End If
Next c
Application.ScreenUpdating = True
End Sub
Viel Erfolg wünscht
WernerB.
P.S.: Das Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter (siehe Forums-FAQ).
|
Betrifft: AW: Bestimmt Zellen einer Spalte löschen
von: Marlene
Geschrieben am: 27.11.2003 13:03:14
Vielen lieben Dank! Funktioniert ganz toll!
|
Betrifft: AW: Bestimmt Zellen einer Spalte löschen
von: Marlene
Geschrieben am: 27.11.2003 13:51:01
Vielen lieben Dank! Funktioniert ganz toll!
| |