Datum hochzählen
Willi
ich möchte ein Datum in einer Zelle mit der Taste plus oder minus verändern und habe vor einigen Tagen von Andi dieses Macro bekommen.
Ich weiß nicht wie ich die Module zusammenbekomme.
Wenn ich im Feld wo das Datum steht bin und über Extra - Macro das Macro zB. datum_plus ausführe wird das Datum um eins erhöht.
Wie bekomme ich das hin, daß ich das mit der Taste + oder - hinbekomme?
Vielleicht kann mir jemand weiter helfen.
Mfg
Willi
Von Andi erhalten.
zB folgendermaßen, funktioniert aber leider nur mit +/- auf der "normalen" Tastatur, nicht mit den Tasten im Ziffernblock:
Ins Modul der Tabelle:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Select Case ActiveCell.Address(0, 0)
Case "B4" '
In ein Standard-Modul:Sub Datum_plus()
ActiveCell = ActiveCell + 1
End Sub
Sub datum_minus()
ActiveCell = ActiveCell - 1
End Sub
Schönen Gruß,
Andi