Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1244to1248
1244to1248
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Spalte prüfen und Daten löschen

Forumthread: Spalte prüfen und Daten löschen

Spalte prüfen und Daten löschen
walter
Guten Tag allerseits,
ich habe eine Spalte, AY, da sollen die Zellen überprüft werden.
Und zwar stehen verschiedene Texte und Zahlen drin.
Es kann aber sein das in Zellen folgende Werte drin stehen nach die
gesucht werden sollen.
LP010112, es soll immer nach "LP" gesucht werden, die Daten sollen drin bleiben
alle anderen Texte sollen gelöscht werden.
Wenn also:
LP030112
LP030112
ENDMWer lkih.aeql.rafw.000
LP030112
LP030112
im letzten Schritt sollen die Buchstaben LP gelöscht werden und aus den nächsten
6 Ziffern soll das Datumsformat hinterlegt werden.
LP030112 =030112 03.01.12
ich hoffe ich habe es Richtig erklärt,
mfg Walter
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Spalte prüfen und Daten löschen
21.01.2012 15:04:50
Hajo_Zi
Walter Walter,
für die Auswahl benutze Autofilter enthält nicht LP, und lösche alle sichtbaren.

brauch das als Makro
21.01.2012 15:26:51
walter
AW: Spalte prüfen und Daten löschen
21.01.2012 15:11:10
Josef

Hallo Walter,
ungetestet.
Sub deleteValues()
  Dim rng As Range, rngDel As Range
  
  With ActiveSheet
    For Each rng In .Range("AY2:AY" & .Cells(.Rows.Count, 51).End(xlUp).Row)
      If rng Like "LP*" Then
        rng = CDate(DateSerial(Mid(rng, 7, 2) * 1, Mid(rng, 5, 2) * 1, Mid(rng, 3, 2) * 1))
      Else
        If rngDel Is Nothing Then
          Set rngDel = rng
        Else
          Set rngDel = Union(rngDel, rng)
        End If
      End If
    Next
    .Range("AY2:AY" & .Cells(.Rows.Count, 51).End(xlUp).Row).NumberFormat = "dd.mm.yyyy"
  End With
  
  If Not rngDel Is Nothing Then rngDel.ClearContents
  
  Set rng = Nothing
  Set rngDel = Nothing
End Sub




« Gruß Sepp »

Anzeige
Geil das funktioniert !!!!! -)
21.01.2012 15:28:13
walter
Hallo Josef,
einwandfrei !!!
Tausend Dank !
Hallo Hajo,
danke auch für den Tip !!!
mfg walter mb
;

Forumthreads zu verwandten Themen

Gesamtergebnis einer Pivottabelle als %-Wert
Dirk

Hallo Forum,
ich habe eine Pivottabelle, in der ich eine automatische Spalte eingefügt habe, die ein Gesamtergebnis der entsprechenden Zeile liefert (Tabellenoptionen - Gesamtergebnis für Zeilen). Nun möchte ich dieses Ergebnis jedoch nicht als jeweilige Zeilensumme sondern als %-Anteil an...
12.03.2009 11:59:54
Thread-ID: 1059437
3 Beiträge
Pivottab: Werte als % anzeigen
André

Moin zusammen,
ich habe hier ein kleines Verständnisproblem bei einer Pivot-Tabelle. Muß dazu sagen, daß ich Pivottabellen bisher nur selten verwendet habe.
Die Pivottabelle hat mehrere Spalten, darunter z.B. Verkaufspreis und Rohertrag. Diese beiden Spalten sind jeweils in Euro die Sum...
10.06.2009 15:35:59
Thread-ID: 1080522
7 Beiträge
Formel erkennt Datum nicht
dieter

Ich habe Formeln erstellt, in denen Zellen mit Datumsinhalten verglichen werden.
Die Zellinhalte stammen aus einer Datenbank.
Die Zellen sind zwar als Datum formatiert, die Inhalte stehen aber linksbündig.
Die Formelergebnisse werden dann korrekt, wenn ich jede Datumszelle aktiviert...
01.07.2009 15:16:18
Thread-ID: 1085756
8 Beiträge
Formel interpretiert Feldwerte als Text
pietsch.st@gmx.de

Hallo Forum,
habe Werte in vier Zellen. Die Werte stammen jeweils aus folgender selbstgeschriebener Funktion mit Rückgabewert Long:
= Anz_Unf($B$2, "Arbeitsunfall", "3","e").
Die Werte dieser Formel sind im Feld als Zahl dargestellt und sind korrekt. Als Zahl gemäß Excel "Format-Zel...
08.07.2009 22:59:54
Thread-ID: 1087292
3 Beiträge
Excel Tool zum erstellen einer Top 100 Liste
Stein

Erstmals muss ich mich bedanken, wie schnell mir schon bei Problemen geholfen wurde. Leider hat es nicht geholfen und ich muss ein neues VBA Tool schreiben.
Also wie gesagt möchte ich in Excel ein Formular(Benutzeroberfläche) haben, wo man mehrere Excel Tabellen hinzufügt. Einmal nach Absat...
31.07.2009 14:28:25
Thread-ID: 1092766
3 Beiträge
Textvergleich liefert falsche Werte
juergen

Hallo Forum!Ich habe zwei Textdateien mit gleicher Anzahl von Datensätzen. Zum Herausfiltern der ungleichen Datensätze benutze ich untenstehendes Skript, welches diese in eine dritte Textdatei einträgt.Es funktioniert anfangs optimal, nur leider schreibt es ab einer gewissen Anzahl von Datensät...
06.05.2002 19:43:53
Thread-ID: 118943
3 Beiträge
Anzeige
Pivot Tabellen Bestwerte anzeigen
Friedhelm

Hallo,
ich habe eine Tabelle mit Ergebnissen von Läufern und möchte in den Altergruppen und den verschiedenen Laufstrecken die Bestzeiten der Läufer darstellen.
Als Beispiel habe ich eine Tabelle beigefügt, die soweit den Pivot Auszug darstellt. Hier möchte ich in den Lauflängen nur die...
13.09.2010 11:02:06
Thread-ID: 1177216
8 Beiträge
Datevalue erkennt Datum nicht
Gerhard

Hallo zusammen,
folgende Problematik: Datevalue() erkennt einige Datumsangaben nicht.
Jan-2011 01.01.11
Feb-2011 01.02.11
Mar-2011 #VALUE!
Apr-2011 01.04.11
May-2011 #VALUE!
Jun-2011 01.06.11
Jul-2011 01.07.11
Aug-2011 01.08.11
Sep-2011 01.09.11<...
12.10.2011 14:02:16
Thread-ID: 1233539
6 Beiträge
Topp 10 Liste
Mike

Hallo Ex(cel)perten,
ich habe eine Liste mit Namen(Spalte A) und Werten(Spalte B).
Damit ich diese Daten nicht immer über das Menü sortieren muß, soll das eine Formel/Funktion in Spalte D(Werte) und Spalte C(Namen zu den Werten) übernehmen. Mit der Funktion MAX und MIN bekomme ich nur d...
19.04.2012 15:02:04
Thread-ID: 1260096
3 Beiträge
Doppelte Werte suchen und anzeigen
Stephan

Guten Morgen zusammen,
ich stehe vor dem folgenden Problem. In einem Systemdownload der über mehre Seiten geht, soll es mir wenn der "Tag" mehrmals vorkommt alle anzeigen ggf. makieren) die eine andere "ID" haben, alle wo der die "ID" und der "Tag" immer gleich sind soll es mir nichts mache...
02.10.2012 09:21:55
Thread-ID: 1280191
8 Beiträge
Pivot sortieren fcs Code (Top 10 Aufruf)
Marc

Hallo Gemeinde, hallo fcs!
ich beziehe mich auf das VBA MAkro zum Sortieren einer Pivot - leider komme ich nicht mehr an den letzten Post ran:
https://www.herber.de/forum/archiv/1360to1364/t1363804.htm
Das Teil funktioniert großartig - vielen Dank nochmal an Franz!
Eine Frage ha...
10.06.2014 21:11:29
Thread-ID: 1365345
2 Beiträge
Top 10 Liste mit verschiedenen Parametern
Herr

Guten Morgen,
ich habe eine Datenbank, in der ich in:
(1) Spalte A - Abteilungen
(2) Spalte B - Bezeichnung des Einzelauftrages
(3) Spalte C - Umsatz je Einzelauftrag
... usw. erfasse.
Da diese Datenbank bereits seit mehreren Jahren als "Exceltabelle" geführt wird und ei...
29.10.2014 07:32:45
Thread-ID: 1389240
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige