Zähler beim Start einer Arbeitsmappe um den Wert 1 erhöhen

Solle bei jedem Start einer Arbeitsmappe ein Zähler, beispielsweise eine Rechnungsnummer in Zelle B2, um den Wert 1 erhöht werden, dann sehen Sie sich den folgenden Code näher an.

 
Private Sub Workbook_Open()
Sheets(1).Range("B2").Value = Sheets(1).Range("B2").Value + 1
End Sub

  
Da es sich um ein Ereignis für die Arbeitsmappe handelt, müssen Sie den Code im Modul "DieseArbeitsmappe" hinterlegen, damit er bei jedem Start der entsprechenden Arbeitsmappe ausgeführt wird.

 

 

A

B

1

 

 

2

Rechnungs-Nr.

6

3

 

 

4

 

 

5

Bei jedem Start der Arbeitsmappe wird

der Wert um den Zähler 1 erhöht.

 

6

 

 

7

 

 

   

Excel-Inside auf FacebookExcel-Live News blogExcel-Inside RSS-FeedMail an Excel-InsideTwitter Account für Excel-InsideMail an Excel-Inside

Office Programmierung

Excel Auftragsprogrammierung

Access Auftragsprogrammierung

Word Auftragsprogrammierung

Outlook Auftragsprogrammierung

 

 

 

 




   
Office Schulungen VBA, Excel, Access
E-Book Formeln und Funktionen Excel 2013
Excel-Inside Newsletter abonnieren
   

Backlink  

ERROR: PAGE_URL belons not to given domain: 573001800