Anpassen verschiedener Datumsspalten

Forumthread: Anpassen verschiedener Datumsspalten

18.11.2015 11:50:15

Michael

Ich habe in der Spalte A die Kalenderdaten für mehrere Jahre. In der Spalte B+C habe ich importierte Daten. In B steht das Datum, in C ein zu B gehörender Wert. Es fehlen für B+C immer wieder einzelne Kalendertage, d.h. die Kalendertage in B sind dann nicht kongruent zu A.
Gibt es eine Möglichkeit, dass Excel bei fehlender Kongruenz die Zeile automatisch nach unten schiebt?

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Gibt es owT

18.11.2015 11:54:32

Bernd
AW: Gibt es owT

18.11.2015 12:44:35

Michael
AW: Gibt es owT

18.11.2015 12:50:32

Bernd
AW: Gibt es owT

18.11.2015 13:45:41

Michael
AW: Gibt es owT

18.11.2015 13:49:36

Bernd
AW: Lösung

18.11.2015 13:53:41

Andre
AW: Lösung

18.11.2015 13:53:54

Andre
AW: Anpassen verschiedener Datumsspalten

18.11.2015 13:56:21

Rudi

Gibt es owT

18.11.2015 11:54:32

Bernd

AW: Gibt es owT

18.11.2015 12:44:35

Michael

Hier ein Beispiel:
https://www.herber.de/bbs/user/101614.xls

AW: Gibt es owT

18.11.2015 12:50:32

Bernd

Hallo!
Hier im Forum begrüßt man sich und tritt freundlich auf.
Im Speziellen dann, wenn man schon Fremdwörter wie "Kongruenz" verwendet, sollte man dies Wissen.
Die Hilfestellung wird ja von jemanden Kostenlos zur Verfügung gestellt.
mfg Bernd

AW: Gibt es owT

18.11.2015 13:45:41

Michael

Hallo Bernd,
sorry, Du hast da vollkommen recht!
Auch nervtötende Probleme mit Excel sollten eine gute Kinderstube nicht vernachlässigen.
Werde mich bessern.
VG
Michael

AW: Gibt es owT

18.11.2015 13:49:36

Bernd

Hallo Michael,
nett das Du Deinen Fehler eingesehen hast. Stelle Dir Deinen Thread wieder auf offen und bin mir sicher, es wird sich jemand finden, der Dir weiter helfen kann.
Ich bin für heute leider dahin.
mfg Bernd

AW: Lösung

18.11.2015 13:53:41

Andre

Hallo Michael,
hier die Lösung:

Sub Datum_anpassen()
For i = 2 To Cells(Rows.Count, 3).End(xlUp).Row
If Cells(i, 2)  Cells(i, 1) Then
Range(Cells(i, 2), Cells(i, 3)).Select
Selection.Insert Shift:=xlDown
End If
Next i
End Sub

Gruß
Andre

AW: Lösung

18.11.2015 13:53:54

Andre

Hallo Michael,
hier die Lösung:

Sub Datum_anpassen()
For i = 2 To Cells(Rows.Count, 3).End(xlUp).Row
If Cells(i, 2)  Cells(i, 1) Then
Range(Cells(i, 2), Cells(i, 3)).Select
Selection.Insert Shift:=xlDown
End If
Next i
End Sub

Gruß
Andre

AW: Anpassen verschiedener Datumsspalten

18.11.2015 13:56:21

Rudi

Hallo,
kopiere A nach F und hol die Messwerte per Formel.

	A	B	C	D	E	F	G
31	07.06.1993	07.06.1993	422			07.06.1993	422
32	08.06.1993	08.06.1993	422			08.06.1993	422
33	09.06.1993	09.06.1993	415			09.06.1993	415
34	10.06.1993	11.06.1993	449	Fehler		10.06.1993
35	11.06.1993	14.06.1993	452			11.06.1993	449
36	14.06.1993	15.06.1993	459			14.06.1993	452
37	15.06.1993	16.06.1993	494			15.06.1993	459

Zelle	Formel
G2	=WENN(ISTFEHLER(SVERWEIS(F2;B:C;2;));" " ;SVERWEIS(F2;B:C;2;))

Gruß
Rudi

Beliebteste Forumthreads (12 Monate)

Anpassen verschiedener Datumsspalten

Forumthread: Anpassen verschiedener Datumsspalten

8 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread