Bitte um Hilfe:
Habe eine Zelle mit einer Datenüberprüfung/Validation:
Optionen:
Zugelassen: Datum
Daten: zwischen
Anfangsdatum: 31.01.2014
Enddatum: 01.09.2019
Ich lese nur - das Enddatum - über:
H = Sheets("VORLAGE").Range("D16").Validation.Formula2
aus.
Über UF wird ein neues Datem zusammengestöpselt.
NeuesDatum = 01.10.2019
Wie kann ich - dies über VBA- nur das n e u e Enddatum der Zelle ändern?
Habe das probiert:
With Sheets("VORLAGE")
.Range("D16").Select
With Selection.Validation
'.Delete
'.Add = NeuesDatum
End With
End With
Delete - löscht aber die komplette Validation!!!
Bitte eure Ideen Lösungen.
mfg STeve