Vergleichen mit mehreren Bedingungen (Access)

Memo, Donnerstag, 14.03.2019, 22:23 (vor 124 Tagen) @ Martin Asal

Sub SelectCaseBissleVerstanden()

Dim i As Integer 'hier muss ich die Datumszellen ansprechen?
For i = 2 to 5000 'Mache die folgende Prozedur für Spalte A2 bis A5000

Select Case cells(2, 1).Value 'hier nehme ich A2 an, kann es ja noch ändern

Case V2
Cells(2, 4) 'springe zu Zelle D2 ' hier muss ich aber noch sagen, dass er das Datum in
der Zelle mit dem heutigen+1 Monat vergleicht [/i]

Case V3
Cells(2, 6) 'springe zu Zelle F2 ' hier muss ich aber noch sagen, dass er das Datum in
der Zelle mit dem heutigen+1 Monat vergleicht


Case V4
Cells(2, 8) 'springe zu Zelle H2 ' hier muss ich aber noch sagen, dass er das Datum in
der Zelle mit dem heutigen+1 Monat vergleicht

Case V5
Cells(2, 10) 'springe zu Zelle J2 ' hier muss ich aber noch sagen, dass er das Datum in
der Zelle mit dem heutigen+1 Monat vergleicht

' ErrorCase = Komme hier nicht mehr weiter.

Ist meine Vorgehensweise so korrekt?


Gute Nacht
Memo


gesamter Thread:

 RSS-Feed dieser Diskussion

powered by my little forum