VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Bei jedem Öffnen der Arbeitsmappe Wert um 1 erhöhen

Gruppe

Ereignis

Bereich

Open

Thema

Bei jedem Öffnen der Arbeitsmappe Wert um 1 erhöhen

Problem

Bei jedem Öffnen der Arbeitsmappe soll die Rechnungsnummer um 1 erhöht werden.

Lösung

Geben Sie den nachfolgenden Code in das Klassenmodul der Arbeitsmappe ein.




ClassModule: DieseArbeitsmappe

Private Sub Workbook_Open()
   With Range("RechnNr")
      .Value = .Value + 1
   End With
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Ereignis und Open