Selektierten Bereich erhöhen



Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: Selektierten Bereich erhöhen
von: M@rkus
Geschrieben am: 24.06.2002 - 13:39:27

Hallo!
Ich möchte einen Selektierten Bereich erhöhen. Das bedeutet es werden mehrere Zellen markiert in denen nur jeweils ein Datum drin steht und diese Daten sollen per klick auf einen Button um 7 Tage erhöht werden.

Schon mal Vielen Dank für eure Hilfe!!!
Gruss Markus


nach oben   nach unten

Re: Selektierten Bereich erhöhen
von: Andreas
Geschrieben am: 24.06.2002 - 13:50:26

Hallo Markus,

dieses Makro macht das gewünschte:

Sub SiebenTage()
Dim As Range

For Each c In Selection
    With c
    If IsDate(.Value) Then _
        .Value = DateSerial(Year(.Value), Month(.Value), Day(.Value) + 7)
    End With
Next c
End Sub

Viel Spaß,
Andreas
nach oben   nach unten

VIELEN DANK!!! o.T.
von: M@rkus
Geschrieben am: 24.06.2002 - 13:54:57

Vielen Dank!!!

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Selektierten Bereich erhöhen"