Tabellenkalkulation

Datum soll Zahl pro Tag um 1 erhöhn

Diskussionsgruppen
Betriebsysteme: Windows 7; WindowsVista; WindowsXP; Linux; BS-Sonstige
Software: Textverarbeitung; Tabellenkalkulation; Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; E-Mail/Outlook; Internet Browser; SW-Sonstige
Hardware: Mainboard/CPU/RAM; Grafikkarten; Peripherie; HW Sonstiges
Netzwerk: DSL; W-Lan; Telekommunikation; NW-Sonstiges
Programmierung: Skripte(PHP,ASP,Perl...); Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke

Frage

Hallo Excelfreunde, gib es eine Möglichkeit (Formel oder VBA) , das sich eine Zahl einer bestimmten Zelle automatisch beim öffnen der Datei nur einmal am Tag (Datum) um 1 erhöht? Gruß fedjo

Antwort 1 von Beverly

Hi Fedjo,

Private Sub Workbook_Open()
    With Worksheets("Tabelle1")
        If Date <> .Range("A1") Then
            .Range("B1") = .Range("B1") + 1
            .Range("A1") = Date
        End If
    End With
End Sub

Bis später,
Karin

Antwort 2 von fedjo

Hi Karin,
danke für die schnelle Antwort!
Der Code funktioniert super.

Ein schönes Wochenende.

Gruß
fedjo

Antwort 3 von nostalgiker6

Die folgende Formel bewirkt ebenfalls, dass der Feldinhalt ab HEUTE (=1) täglich um 1 erhöht wird:
=HEUTE()-39451 (Format: Zahl ohne NK)

Antwort 4 von fedjo

Hallo nostalgiker6,
ist auch eine super Lösung, die auch verwenden werde.

Danke und ein schönes Wochenende.

Gruß
fedjo