Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Bewerten Sie hier bitte das Excel-Portal

Home Zurück Vor

Download Beispiel-Arbeitsmappe

Thema

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

Gruppe

Open

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

Msg mit 2 Ereignissen +Cancel

Workbooks open

Ereignisprozedur

Excel-Tabelle in OpenOrg

getopenfilename mit Teil der Dateiname

Makro für ereignisabh. Druck verschiedener Seiten

Benutzerdefinierte Funktion in Open Office

UF Activate / Initialize Ereignis

Namen definiert- in Ereignis verwenden?

GetOpenFilename Dateiname vorbelegen

xlDialogOpen anpassen

Symbolleisten durchloopen: löschen & restore

Zeilen aus- einblenden als Ereignis?

Welches Ereignis ist das richtige ??

Symbolleisten durchloopen und ausblenden

Ereignis Arbeitsblatt sperren abfangen

Workbook open

Ereignisprozedur f. Multipage-Reiter

Frage zum Change ereignis

xlDialogOpen bei Excel 2007 funzt nicht

komisches phänomän bei set xx open workbook

Change-Ereignis in Combobox unterdrücken

Combobox Ereignis

MS OFFICE - OPEN OFFICE

Userform, Ereignis deklarieren im Klassenmodul

Welches Diagramm-Ereignis?

Bestimmtes Ereignis in Spalte zählen

Command Button Ereignis

Workbook Open

Ereignis von Laufzeit-Checkbox

Wochenangabe bei WorkbookOpen

change-ereignis bei dynamischen Controls / Teil 2

Change Ereignis verhindern

change-ereignis bei dynamisch erstellten Controls

Schaltfläche - Ereignis erst nach Bestätigung ausl

Makro Workbook_Open läuft nicht

Objekt_Error - Ereignis in UserForm

Problem mit OpenRecordset (Array)

bei OPEN macros vermeiden

Workbook_open

change ereigniss auf userform.

Click-Ereignis für Checlbox nicht ausführen?

windows.open und selection.change

workbooks.open Fehlermeldung

Speichern einer Kopie durch Ereigniss Workbook_bef

Reagieren auf Tastaturereignisse

Workbooks.OpenText - Datumsformat

Ausnahmen für Exit-Ereignis

Probleme mit Workboos.Open