Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Einträge mit ungültigem Datum löschen
zurück: Emailversand aus UserForm weiter: Probleme mit Makros Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Bitte Status wählen ! Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
sl.
Im Profil kannst Du frei den Rang ändern


Verfasst am:
08. Nov 2005, 12:05
Rufname:

Einträge mit ungültigem Datum löschen - Einträge mit ungültigem Datum löschen

Nach oben
       

Hallo

Brauche dringend eure Hilfe. Muss aus einer Tabelle alle Einträge (komplette Zeile), die ungültiges Datum haben löschen. Selbst so große Ahnung von VBA hab ich nicht, habe schon in der Hilfe
Nachgeschaut, aber ohne Erfolg. Habe dann das geschrieben:

Code:



' lCnt  das ist Start Celle
' lCntOuТ bis zum Ende


While Tabelle1.Range("Spaltebezeichnung" & lCnt).Text <> ""
   If Tabelle1.Range("S" & lCnt).Text <> "Datum" Then Call AltesDatumraus
                 Tabelle2.Range("A" & lCntOut).Value = Tabelle1.Range("S" & lCnt).Text
                 lCntOut = lCntOut + 1
   End If
  lCnt = lCnt + 1
 Wend

Private Sub AltesDatumraus()
  Tabelle1.AutoFilterMode = False
  Tabelle1.Cells(1).AutoFilter Field:="Spaltennummer", Criteria1:="<=" & CDbl(Date)
  On Error Resume Next
  With Tabelle1.AutoFilter.Range
    .Offset(1, 0).Resize(.Rows.Count - 1, .Columns.Count).SpecialCells(xlCellTypeVisible).EntireRow.Delete
  End With
  Tabelle1.AutoFilterMode = False
End Sub



Aber das funktionier nicht, oder habe ich zu kompliziert gemacht?
Vielleicht so was in der Art :


Code:

 While ....
    if Spalte = Datum dann vergleichen mit SystemDatum
     wenn gleich oder großer ist dann lassen , sonst löshen.
wend


Habt ihr irgendwelche Vorschläge?


Vielen Dank in Voraus
henrikgoebel
Excel - User


Verfasst am:
14. Nov 2005, 09:29
Rufname:
Wohnort: Hanau

AW: Einträge mit ungültigem Datum löschen - AW: Einträge mit ungültigem Datum löschen

Nach oben
       

Hi,

was ist ein ungültiges Datum ? Kannst Du das näher beschreiben ? In welcher Spalte steht das Datum ?

_________________
Fragen kostet nix !
Santatom
Excel-VBA-Kenner


Verfasst am:
14. Nov 2005, 21:50
Rufname:


AW: Einträge mit ungültigem Datum löschen - AW: Einträge mit ungültigem Datum löschen

Nach oben
       

Hi, warum postest Du zweimal das gleiche??? Evil or Very Mad

Siehe hier!! Rolling Eyes

http://www.office-loesung.de/viewtopic.php?t=56193


Santatom

_________________
Manche Probleme lösen sich von selbst. Man darf sie nur nicht dabei stören.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Datum in Kalender Woche einschl. Werktag umwandeln 7 IronDodge 18784 30. Jul 2008, 15:45
Gast Datum in Kalender Woche einschl. Werktag umwandeln
Keine neuen Beiträge Excel Formeln: Wenn gleiches Datum... 6 Gekko 2258 06. Feb 2005, 14:07
Gast Wenn gleiches Datum...
Keine neuen Beiträge Excel Formeln: Einzelne Wörter löschen (ersetzen/formel) 2 Michi_wien 4587 29. Jan 2005, 12:33
Gast Einzelne Wörter löschen (ersetzen/formel)
Keine neuen Beiträge Excel Formeln: Datum Abfragen 8 kuschlmuckl 2472 31. Dez 2004, 13:45
Arnim Datum Abfragen
Keine neuen Beiträge Excel Formeln: Datum 9 Benoit 2289 30. Dez 2004, 15:21
ae Datum
Keine neuen Beiträge Excel Formeln: Zellen vergleichen / Zeilen löschen 3 Satanico 2994 28. Okt 2004, 15:37
icke Zellen vergleichen / Zeilen löschen
Keine neuen Beiträge Excel Formeln: Datum von einem Worbook in ein anderes kopieren 1 Gast 957 19. Okt 2004, 12:49
Gast1 Datum von einem Worbook in ein anderes kopieren
Keine neuen Beiträge Excel Formeln: DATUM -> Tage zählen ? 3 anna-bolika 4451 11. Okt 2004, 16:34
lou38 DATUM -> Tage zählen ?
Keine neuen Beiträge Excel Formeln: vom datum nur die Jahreszahl rausziehen 1 lilienne 3091 04. Okt 2004, 17:19
ae vom datum nur die Jahreszahl rausziehen
Keine neuen Beiträge Excel Formeln: Text & Datum Frage 2 AkDS_Kingpin 2798 19. Sep 2004, 14:11
fl618 Text & Datum Frage
Keine neuen Beiträge Excel Formeln: wenn mit zeit und datum 7 sfruechtchen 861 02. Sep 2004, 16:25
ae wenn mit zeit und datum
Keine neuen Beiträge Excel Formeln: alle Einträge in SpalteA mit 3 Buchstaben ergänzen 1 Gast 1038 06. Aug 2004, 23:04
ae alle Einträge in SpalteA mit 3 Buchstaben ergänzen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft-Excel Diagramme