Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1352to1356
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zellinhalte löschen, die n. mit dem Zahl beginnen?

Zellinhalte löschen, die n. mit dem Zahl beginnen?
17.03.2014 11:54:45
Selma
Hallo Leute,
wie kann ich bitte per VBA ab Spalte B bis letzte benutzte Spalte alle Zellinhalte löschen, die nicht mit dem Zahl beginnen?
Danke vorab!
Gruß,
Selma

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellinhalte löschen, die n. mit dem Zahl beginnen?
17.03.2014 12:00:31
Rudi
Hallo,
mit welchem Zahl?
Gruß
Rudi

AW: Zellinhalte löschen, die n. mit dem Zahl beginnen?
17.03.2014 12:07:04
Selma
Hallo Rudi,
bestimmten Zahl meine ich nicht. Es soll geprüft, ob der Zellinhalt mit dem Zahl beginnt.

Es gibt doch bei Dir nur Zahl oder Text
17.03.2014 12:39:28
Matthias
Hallo
In Deinem Bsp gibts doch nur Zahl oder nur Text in einer Zelle.
Da gehts doch einfacher.
Markiere Deinen Bereich
Selection.SpecialCells(xlCellTypeConstants, 2).ClearContents
oder eben (für alle Zellen) ohne Markierung:
Cells.SpecialCells(xlCellTypeConstants, 2).ClearContents
oder für einen bestimmten Bereich
BestimmterBereich.SpecialCells(xlCellTypeConstants, 2).ClearContents

wobei Du BestimmterBereich erst einlesen mußt
Gruß Matthias

Anzeige
und in dem Fall ...
17.03.2014 12:42:54
Rudi
... braucht man auch kein Makro.
Mal F5 benutzen.
Gruß
Rudi

If Not IsNumeric(Left(Zelle.Value, 1)) Then ...
17.03.2014 12:15:44
Matthias
Hi
Option Explicit
Sub Selma()
'Bereich markieren oder Ende einlesen und ne Schleife drüberschicken
Dim rng As Range
For Each rng In Selection
If Not IsNumeric(Left(rng.Value, 1)) Then rng.ClearContents
Next
End Sub
Gruß Matthias

AW: If Not IsNumeric(Left(Zelle.Value, 1)) Then ...
17.03.2014 13:17:11
Selma
Hallo Rudi, hallo Matthias,
vielen Dank!
Gruß,
Selma

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige