Zellen in Abhängigkeit vom Datum löschen

Walter · 2015-01-09T12:54:19+00:00

Hallo zusammen, ich habe in der Spalte B angefangen ab B2 den Tag stehen, Beispiel B2 = Sa B3 = So B4 = Mo u.s.w. jetzt sollten die Werte in der Spalte D+E und G+H gelöscht werden. Also müßte in D2,D3 und in G2,G3 der Wert gelöscht werden. Die Belegung der Spalte B33 auf. gruß walter mb

Walter,
1. Aus deinem ersten Post gehen überhaupt keine konkreten Anforderungen hervor, bzw. deine Ausdrucksweise ist etwa so deutlich, wie in der nachträglich geposteten Excelliste. Im Beitrag taucht keine einzige konkrete Frage auf!
2. Wenn ein Monat 31 Tage hat und in Zeile 2 anfängt und pro Tag eine Zeile belegt, dann reicht der Bereich bis zur Zeile 32 und nicht 33. Also sei bitte ein bisschen ausführlicher und genauer in deinen Angaben.
3. Deine Beispielmappe ist eine Katastrophe, weil in der Wochentagsspalte (B) die Datum vom Februar hinterlegt sind und in der Spalte rechts davon, die vom März. Es ist reiner Zufall, dass die Wochentage übereinstimmen, da halt der Februar im Jahr 2015 28 Tage hat und somit durch 7 teilbar ist. Deine Daten stimmen also weder für den Januar, noch den März dieses Jahres.
4. Die Farbformatierung (fix, manuell) der Wochenende stimmt als auch nur per Zufall und soll dann wohl auch noch durch das Makro automatisch angepasst werden?
5. Vielleicht solltest du dir vorher überlegen, was du genau machen willst. Wenn du die Wochenende ausscheiden willst, dann lass sie doch z.B. gar nicht erscheinen, sprich entwickle eine Formel für nur Netto-Arbeitstage.
Ein Lösung beginnt immer mit der Beschreibung des Problems. Wenn diese Beschreibung, wie bei dir, aber noch mehr Probleme generiert, als das Eigentliche, dann kommt es zu einer nicht abbrechenden Reihe von Neuen...
Gruess Hansueli

Guten Morgen Hary,
erst mal Danke für die Reaktion, Hilfe und das Verständnis das ich halt ein wenig
blöd beschrieben hatte !
Ich habe die Tabelle etwas verändern müssen.
Die Spalte B fängt jetzt ab Zeile 7 an.
Alles läuft soweit gut habe auch andere Monate eingegeben und die Werte wurden
ebenfalls gelöscht.
Leider kommt am ENDE
Laufzeitfehler 13
Typen unverträglich und die gelbe Zeile ist diese:
If Weekday(Cells(i, 2), 2) > 5 Then
So steht das kompl. Makro drin:

Public Sub ALLE_Zeitangaben_löschen()
Dim i As Long
For i = Cells(7, 2).End(xlDown).Row To 2 Step -1
If Weekday(Cells(i, 2), 2) > 5 Then
Union(Cells(i, 4).Resize(1, 2), Cells(i, 7).Resize(1, 2)).ClearContents
End If
Next
End Sub

gruß walter mb

Zellen in Abhängigkeit vom Datum löschen

Forumthread: Zellen in Abhängigkeit vom Datum löschen

16
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Zellen in Abhängigkeit vom Datum löschen

Forumthread: Zellen in Abhängigkeit vom Datum löschen

16 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

16
Beiträge zum Forumthread

Beiträge zu diesem Forumthread