Office: Prüfen ob Datum zwischen zeitraum -> in neue Tabelle kopieren...

Hallo VBA´ler....

ich möchte folgenden Code erweitern, er soll jetzt nicht nur prüfen ob das Datum in der Spalte 10 also J nicht nur über dem definierten datum liegt sondern ob er zwischen dem und einem anderen Datum liegt:

Code:

Wer kann helfen ? *upps

Ein anderes Problem ist das er bisher nur in der Schleife den ersten Wert anfässt ... also zumindestens gibt er nur einen aus wobei er ja alle durchgehen sollte?

Gruß Stern zwei *wink.gif*

:)

 

HI

da du Spalte A nach dem letzten Eintrag abfragst, und in A nichts steht......

Cells(65536, 1).End(xlUp).Row

auf

Cells(65536, 2).End(xlUp).Row

ändern

Willst Du von unten nach oben durchgehen, würde es immer noch nicht gehen da...

For Z1 = Cells(65536, 2).End(xlUp).Row To 1 Step 1

Step 1 nicht gehen würde *wink.gif* da würde ein minus Eins gebraucht werden.

verwende

For Z1 = Cells(65536, 2).End(xlUp).Row To 1 Step -1

 

Tausend Dank! das funktioniert schon mal uuunnd ich habs verstanden... Jetzt nur noch das Datumsproblem *biggrin.gif* ich such mal weiter aber schon mal DANKE *wink.gif*

 

Halllo Chris kannst du mir nochmal helfen... ?
Ich versteh diesen Fehler nicht. Wieso erwartet der Compiler einen Ausdruck?

Gruß Stern2

Code:

 

Hallo
hinter and gehoert auch die zu pruefende Zelle.
Code:

gruss hary

 

Ich versteh es nicht!
Nun möchte ich von Oben nach Unten das ganze durchsuchen! *grins
Habe Startpunkt ist jetzt (1, 10) gehe bis Zeile 20 in einer Schritten ???
Was habe ich verbrochen das er das nun nicht machen will ?*boah

Code:

 

Hallo
Ungeteste nur ergaenzt/ersetzt.

Code:

wenn diese Schleife nicht passt und es soll nur bis Zeile 20 gehen, dann:
Code:

gruss hary

 

Leider funktioniert es nicht, aber villeicht kannst du mir erklären was du genau mit:

Code:

machst?... dann finde ich vielleicht selbst den fehler!? =)

Also klar er geht die Schleife durch beginnt bei Zeile 1 und zählt dann hoch zur Zeile 10 dann mit "End(xlUp)" geht er ganz nach oben !? und wieso dann .Row?
Wieso fallen den jetzt die Steps weg?


MfG
Stern2

 

Hallo

Nicht sehr gut beschrieben.
Row wird gebraucht um die Zeilennummer zu bekommen.
Also bei Deiner Bsp.Mappe kommt als Ergebniss das raus.

Tabellenblattname: Tabelle2

	B	C	D
1	02.12.2004		Test 1
2	27.02.2005		Test 5
3	09.02.2005		Test 2
4	19.02.2005		Test 4

gruss hary
edit: Anhang

 

Code:

Also Ihr seht ja schon was ich versuche ... Ich möchte nun von oben nach unten durchsuchen.

Beginne also in der Zelle Code:

gehe dann nach unten Code:

wobei ich dneke dass das falsch ist ? und zum schluss sage ich ich möchte in einer Schritten bis zur letzten Zeile gehen Code:

Wenn ich es ausführe ersteinmal nichts... (nichts sichtbares)

@Hary
Danke wenn Row benötigt wird um die Zeilennummer zu bekommen dann müsste ich ja Code:

sagen jedoch funktioniert das auch nicht ?
*mad.gif*

 

ok ich hab es !!

Code:

 

Hallo
Code:

Fuer Cells(1,10) kannst Du doch gleich 1 schreiben. Step 1 ist unnoetig, da die Schleife ohne immer einen Schritt geht.
Und warum soll die Schleife immer bis Zeile 65536 gehen??? Steht in allen Zellen was drin???
mit:
Code:

gehe ich doch von 1 bis zur letzten beschriebenen Zeile.
gruss hary