Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1412to1416
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

Zeilen i nbestimmten abständen löschen

Zeilen i nbestimmten abständen löschen
05.03.2015 11:45:42
Nw
Hallo,
ich habe mit einem Datalogger Temperaturdaten aufgenommen.
Der Logger hat alle 5 Sekunden einen Eintrag in eines csv-Datei gemacht.
Bei der Auswertung per Excel möchte ich diese Daten gerne reduzieren und per VBA 29 Zeilen löschen eine behalten, 29 Zeilen löschen, eine behalten und so weiter.
So komme ich auf einen Log-Abstand von "alle 5 Minuten" ...
Ich stelle mir das so vor:
i = Cells(Rows.Count, 1).End(xlUp).Rows.Row (gegoogelt ;-)
for a = 1 to i
StartZelle = active.cell
EndZelle = active.cell 29
Range(StartZelle:EndZelle).Select
'Selection.EntireRow.Delete
Startzelle + 1
next a

möglicherweise auch so ...
wenn active zelle (vorherige zelle + 00:05:00)
dann lösche active zelle
sonst
acive zelle = active zelle + 1

Ich habe nur ehrlich gesagt nicht viel ahnung vom VBA-Syntax
Kann mir Jemand Helfen?
Vielen Dank
Nw

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen i nbestimmten abständen löschen
05.03.2015 12:18:50
RPP63
Hi!
Antwortest Du mir auf Office-Loesung.de ?
Gruß Ralf

AW: Zeilen i nbestimmten abständen löschen
05.03.2015 12:40:15
Klexy
Die 29 stimmt aber nicht - das sind 59, oder?
So geht es:
Sub Fuenf_Minuten_loeschen()
'Zelle mit dem Startzeitpunkt markieren
Dim Hier As Range
Do While ActiveCell  ""
Set Hier = ActiveCell
Hier.Select
Do While Hier.Offset(1, 0).Value 

AW: Zeilen i nbestimmten abständen löschen
05.03.2015 13:10:54
Nw
Hallo,
sehr cool.
Funktioniert und ich habe es sogar verstanden .. glaube ich :-)
Danke
Nw
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige