Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1832to1836
1832to1836
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Fehlende Zeile(n) mit Daten einfügen

Forumthread: Fehlende Zeile(n) mit Daten einfügen

Fehlende Zeile(n) mit Daten einfügen
26.05.2021 06:13:04
Werner 

Hallo zusammen,
Ich habe eine Quelltabelle mit Datum/Zeit Stempel die den Betrieb einer Maschine mit div. Parameter enthält.
Nun soll daraus eine Auswertungstabelle entstehen mit der die Leistung der Anlage (24 Std. immer mit
Abstand von 15 Min. pro Tag) überwacht werden kann.
Ich habe die Daten aus der Quelltabelle (Arbeitsblatt Protokoll) in das neue
Arbeitsblatt(Laufzeit) kopiert.
Mein Problem ist nun, dass die Datenreihen (Zeilen) teilweise Lücken hat.
(was sich leider nicht ändern läßt).
Es fehlen einzelne Zeiten (Zeilen) oder mehrere aufeinander folgende Zeiten (Zeilen) manchmal sogar teilw.
oder ganz fehlende Tage (Zeilen). Darüber hinaus gibt es Einträge (Zeilen) die in kürzeren Abständen (
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Fehlende Zeile(n) mit Daten einfügen
26.05.2021 06:16:50
Werner
So soll es aussehen:
Userbild
AW: Fehlende Zeile(n) mit Daten einfügen
26.05.2021 14:47:52
Werner
Hier mein VBA-Modul:
Option Explicit

Public Sub InsertMissingRows()
Dim lngRow As Long
Dim dtmNextTime As Date, dtmPreviousTime As Date
Dim avntTemp As Variant
With Worksheets("Laufzeit")
For lngRow = .Cells(.Rows.Count, 1).End(xlUp).Row To 3 Step -1
dtmNextTime = CDate(Split(.Cells(lngRow, 1).Value, " ")(1))
dtmPreviousTime = CDate(Split(.Cells(lngRow - 1, 1).Value, " ")(1))
If Round(CDbl(dtmNextTime - dtmPreviousTime), 4) > _
Round(CDbl(TimeSerial(0, 15, 0)), 4) Then
Call .Rows(lngRow).Insert
avntTemp = Split(.Cells(lngRow - 1, 1).Value, " ")
.Cells(lngRow, 1).Value = avntTemp(0) & _
Format$(dtmPreviousTime + TimeSerial(0, 15, 0), " Hh:Nn ") & avntTemp(2)
Call .Range(.Cells(lngRow - 1, 2), .Cells(lngRow - 1, 10)).Copy( _
Destination:=.Cells(lngRow, 2))
lngRow = lngRow + 1
End If
Next
End With
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Zeilen Kopieren mit Formeln u. Formaten
Lemmi

Hallo zusammen,
ich möchte einen Block (5Zeilen) am Ende einer Tabelle einfügen!
Diese Zeilen sollen mit ihren Formaten unf Formel Kopiert und am Ende der Leiste eingefügt werden!
Die Formeln sind in den Roten Zellen.
Die Zellen sonst sind bis auf Spalte A und B ohne Inhalt!
11.08.2008 14:11:35
Thread-ID: 1000856
5 Beiträge
Zellen formatierung mit Formeln
Peter

Hallo
habe eine Formatierung in einer Zelle, in der er die 0 als 00 anzeigen soll.
Das macht er so lange ich keine Formel drin habe.
Sobald die Formel drin ist., zeigt er mir nur eine 0 (Null an.
die Formel ist
RECHTS(SUMMEWENN(C14:C40;">0";G14:G40);2)
Wie bekomme ic...
08.11.2008 18:25:00
Thread-ID: 1022970
7 Beiträge
einzelne Zellen mit Formeln sperren
natka

Hallo Ihr Lieben Excel Begeisterte,
hättet Ihr bitte eine Tipp für mich, wie ich einzelne Zellen in einenm Tabellenblatt im Excel für Dritte sperren kann. Sie sollen zwar das Ergebnis seheh, aber nicht anklicken können. Damit meine tole Formel keinen Schaden nimmt.
Danke
natka
15.05.2009 14:20:56
Thread-ID: 1075486
4 Beiträge
Wert aus jeder zweiten Zeile übernehmen
oli.p

Hallo zusammen!
Ich sitze den halben Tag an einer für mich schier unlösbaren Aufgabe.
Zur weiteren Bearbeitung wollte ich eigentlich jeweils "nur" jeden zweiten Wert einer Zeile anzeigen.
Hier zur Veranschaulichung: https://www.herber.de/bbs/user/63952.xls
Vielen Dank für Eure H...
20.08.2009 14:20:09
Thread-ID: 1097390
5 Beiträge
Bei Änderung Zeile mit Rahmen einfügen
andi

Hallo zusammen,
habe hier eine Banf in Form einer Tabelle.
Diese hat jetzt zwei Zeilen zum Einfügen von Positionen. Jetzt soll wenn in Spalte "B in Zeile18" etwas eingetragen wird, automatisch eine leere Zeile in der selben Formatierung eingefügt werden, sobald dann in dieser Zeile ein...
07.09.2009 09:21:03
Thread-ID: 1100949
2 Beiträge
Anzeige
pro tabelleneintrag automatisch eine neue Zeile
papa

Hallo liebe Excelianer,
ich möchte über ein Userform diverse Informationen abfragen und diese dann in einer Tabelle ablegen.
Es soll eine Datenbank entstehen, sprich bei jedem neuen Userformeintrag soll in der Tabelle eine neue Zeile verwendet werden.
Bisher hab ich dieses Vorhaben...
06.10.2009 00:10:16
Thread-ID: 1107402
3 Beiträge
Formel kopieren mit VBA bis leere Zeile
jo_cindy

HAllo, habe noch keine Formel im Archiv gefunden, die bei mir funktioniert.
Ich möchte in Spalte X ab Zeile 2 die folgende Formel einsetzen: Selection.NumberFormat = "h:mm"
ActiveCell.FormulaR1C1 = "=RC[-8]/24" Diese Formel soll dann in Spalte X solange kopiert werden, bis in Spalte A...
27.10.2009 11:02:17
Thread-ID: 1112437
6 Beiträge
Anzeige
leere Zeile mit Text und Formel dynamisch einfügen
christian

Hallo zusammen,
ich habe folgendes Problem das ich mit meinen wenigen VBA Kenntnissen nicht lösen kann.
Ich habe eine Tabelle mit n Zeilen.
- Nach jeweils ca. 53 Zeilen sollte eine Zeile mit dem Text "Zwischentotal " (Spalte C) und in die Summen-Formel für die 53 Zeilen (Spalte H)...
28.11.2009 13:36:30
Thread-ID: 1120637
3 Beiträge
Zellen mit Formeln einer Zeile kopieren
Jürgen

Hallo VBA-Profis,
da ich hinsichtlich VBA ein Anfänger bin, hoffe ich hier im Forum Hilfe zu bekommen.
Ausgangslage:
In größeren Excel-Tabellen sind neben Daten auch Formeln vorhanden.
Tabelle beginnt z.B. ab A4 und erstreckt sich bis Z800 (Zeile 4 sind Überschriften)
In den...
13.12.2009 15:54:18
Thread-ID: 1123590
3 Beiträge
SUMMENFORMEL mit VBA einfügen
Peter

Guten Tag
Ich möchte mit VBA eine Summenformel einfügen.
Selektiert ist irgend eine Zelle in der Spalte H (z.B. H35).
Nun möchte ich in Zelle H35 eine Summenformel einfügen, die den Bereich von H2 bis H34 berücksichtigt.
Wenn H100 selektiert ist, soll die Summenformel H2 bis H99...
30.12.2009 10:14:36
Thread-ID: 1126356
6 Beiträge
Anzeige
Formelfortschreibung beim Einfügen von Zeilen
Zeilen

Hallo,
vielleicht kann jemand helfen:
Beim Einfügen einer Zeile an beliebiger Stelle sollen die Werte in Spalte A entsprechnend korrigiert werden, sodass die Reihenfolge des Positionenzählers in Spalte A wieder stimmig ist. Wenn beispielsweise unter Zeile 5 eine Leerzeile eingefügt wird...
19.01.2010 18:34:15
Thread-ID: 1131157
5 Beiträge
Mit Makro eine neue Zeile einfügen
Richard

Hallo zusammen,
ich wollte über Makro eine neue Zeile einfügen lassen welche dann aber auch alle Formeln
der darüber liegenden Zeile übernimmt. Diese Funktion sollte dann aber auch immer wieder benutzt
werden können so das immer eine neue Zeile entsteht.
Könnt ihr mir vielleich...
21.01.2010 13:10:01
Thread-ID: 1131758
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige