Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1524to1528
1524to1528
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

"Version" hochzählen nach jedem Speichern

Forumthread: "Version" hochzählen nach jedem Speichern

"Version" hochzählen nach jedem Speichern
25.11.2016 16:04:11
Fabi
Hallo,
ich versuche meiner Excel-Datei eine Art Versionsnummer zu vergeben, die nach jedem Speichern, bzw. Schliessen der Datei, automatisch die Zelle mit der Version hochzählt.
Bei der "Versionsnummer" handelt es sich um "BA" als erste Version, danach kommt "BB", "BC", "BD", "BE", usw.
Danke.
Grüsse,
Fabi
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: "Version" hochzählen nach jedem Speichern
25.11.2016 16:19:47
Henner
Hallo Fabi,
was kommt nach "BZ"? Gruss Henner
AW: "Version" hochzählen nach jedem Speichern
25.11.2016 16:32:47
Fabi
Nach "BZ" kommt dann "CA" - "CZ", "DA" - "DZ", usw.
AW: "Version" hochzählen nach jedem Speichern
28.11.2016 08:40:31
Fabi
Kann mir vielleicht noch jemand weiterhelfen?
Anzeige
"Version" hochzählen nach jedem Speichern
28.11.2016 17:06:17
Michael
Hi,
zum Hochzählen kann man sich die Excel-Spaltenbuchstaben zunutze machen; angenommen, es geht um die Zelle A1, dann heißt das: 
Sub naechsteSpalte()
Range("A1").Value = _
Split(Range(Range("A1").Value & "1").Offset(, 1). _
EntireColumn.Address(0, 0), ":")(0)
' von innen nach außen:
' Range("A1").Value & "1"
' ist eine gültige Zelladresse, bei "BG" dann eben "BG1"
' .Offset(, 1)
' ist die Zelle rechts daneben
' .EntireColumn
' ist die komplette Spalte
' .Address(0, 0)
' ist die Adresse der Spalte, wege (0,0) ohne "$"-Zeichen
' und zwar im Format "A:A", also "doppelt" mit ":" getrennt
' split("A:A",":")
' zerlegt "A:A" in ein "Array", mit dem Trennzeichen ":"
' und mit (0) greifst Du auf das erste Feld des Arrays zu.
End Sub
Das Makro rufst Du dann über ein Speichern/Öffnen-Event auf - oder integrierst es direkt; hier in "DieseArbeitsmappe": 
Private Sub Workbook_Open()
Range("A1").Value = _
Split(Range(Range("A1").Value & "1").Offset(, 1). _
EntireColumn.Address(0, 0), ":")(0)
End Sub
Schöne Grüße,
Michael
Anzeige
;

Forumthreads zu verwandten Themen

Datensicherheitswarnung beim speichern
Andre´

Hallo alle zusammen,
ich habe eine Datei mit ActiveX-Steuerelemente.
Beim speichern kommt immer folgende Meldung:

Gibt es eine Möglichkeit diese Meldung zu unterbinden.
MFG Andre
11.12.2008 14:07:40
Thread-ID: 1032054
2 Beiträge
Combobox1_Change - reagiert nach dem Speichern ?
k

Hallo,
wie kann ich es verhindern, dass mit dem Speichern die Change-Prozedur der Combobox ausgelöst wird ?
Problem: Nach dem Speichern, wechselt die Anzeige in einen daneren Datensatz.
Hintergrund:
Tabelle mit Kundendaten und Erlösen mit Details zu Rechnung, so kann es vorkomme...
27.07.2009 17:48:35
Thread-ID: 1091671
3 Beiträge
arbeitsmappe öffnen, speichern und schließen
otto

Hi,
ich habe eine Arbeitsmappe mit einer Webabfrage.
Beim starten des PC öffnet sich die Arbeitsmappe(Autostart) und im Workbook.Open Ereignis wird die Abfrage aktualisiert.
Nun möchte ich, dass die Arbeitsmappe nach der Aktualisierung automatisch gespeichert und geschlossen wird. W...
27.08.2009 11:35:34
Thread-ID: 1098953
3 Beiträge
Fehler beim automatischen Speichern
Meissen

Wird eine Excel Arbeitsmappe gespeichert, wird zuerst eine Zwischen-Datei mit einem zufälligen Namen gebildet. Diese Datei wird wieder gelöscht und die eigentliche Excel-Arbeitsmappe ist erst dann endgültig gespeichert.
Wird das Speichern nun im Programm recht häufig durchgeführt, kommt es...
13.10.2009 16:01:37
Thread-ID: 1109366
2 Beiträge
Anzeige
Speichern und schließen eines Tabellenblattes
Peter

Hallo,
ich habe mir mit Hilfe/Makrorekorder diesen Code zusammengebaut:
Dim wb As Workbook, wbneu As Workbook Dim intI As Integer Dim astrLinks As Variant Set wb = ThisWorkbook ThisWorkbook.Sheets("Data").Copy Set wbneu = ActiveWorkbook Application.DisplayAlerts = False With wbneu ....
09.04.2010 09:53:30
Thread-ID: 1150746
6 Beiträge
Excel-Vorlage beim Schließen automatisch speichern
stefanseevetal

Hallo zusammen!
Ich habe eine Excel-Vorlage (xltm) bei der vor dem Schließen folgender Code ausdgeführt wird:
Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim sh As Object For Each sh In Sheets If sh.Name "Deckblatt" Then If sh.Visible = xlSheetVisible Then sh.Visible = xlSheetV...
18.03.2011 19:53:02
Thread-ID: 1206402
2 Beiträge
nach Speichern automatisch Schließen
Valeri

Hallo liebes Forum,
ich möchte meine Arbeitsmappe nach dem ich gespeichert habe Automatisch schlissen lassen.
Wie würde den der Code dafür aussehen?
Vielen Dank schon mal im Voraus!
Gruß Valeri
11.01.2012 11:23:23
Thread-ID: 1245611
12 Beiträge
Anzeige
Fragen zum Speichern und Schließen automatisch bea
stormlamp

Hallo,
bei meinen Makros unter Excel 2010 möchte ich die Fragen beim Speichern unterbinden.
Im ersten Fall soll die Frage "Sollen Ihre Änderungen in Datei xyz gespeichert werden?" beim Schließen der Datei automatisch mit "Nicht speichern" beantwortet werden.
Aktueller Makrotext:
12.06.2012 14:05:28
Thread-ID: 1267094
4 Beiträge
Speichern und schließen
Dirk

Hallo zusammen,
ich suche nach einer Möglichkeit die meine Excel-Datei nach einer Eingabe in bestimmte Felder (H10 - H41) automatisch speichert (Ohne nachfragen ob gespeichert werden soll) und schließt. kann mir bitte jemand helfen?
danke im vorraus.
Lg
Dirk
13.02.2013 16:40:38
Thread-ID: 1299192
7 Beiträge
Gültigkeit verschwindet wieder nach dem Speichern.
Hartmut

Hallöchen zusammen,
eine kleine Frage und vielleicht hat ja jemand eine schnelle Lösung.
Ich habe ein fremde Exceldatei und möchte dort eine Gültigkeit eingeben. Diese lässt sich anfangs auch eingeben. Allerdings wenn ich die Datei speichere und dann wieder öffne ist die Funktion nicht...
20.03.2014 13:48:40
Thread-ID: 1354195
3 Beiträge
Beim Speichern automatisch Tabellenname und aktuel
Alexander
Hallo Liebe Gemeinde,
ich hätte gerne mal wieder ein neues kleines Problem. Ich möchte, das beim Speichern eines Tabellenblattes automatisch den Namen des Blattes, sowie das aktuelle Datum als speichername gesetzt wird.
Leider setzt mir das Programm als Speichername: 41800.
Wo liegt de...
09.06.2014 19:49:48
Thread-ID: 1365186
3 Beiträge
Speichern beim Schließen von Excel
Excel

Hallo Liebe Gemeinde,
ich habe, bevor die Mappe geöffnet werden soll ein Abfrage nach Benutzername und Passwort. Wenn dies falsch eingegeben wird, soll die Mappe sich wieder schließen, ohne einen Einblick zu gewähren.
Leider werde ich immer wieder gefragt, ob die Mappe speichern will, o...
10.06.2014 22:10:40
Thread-ID: 1365354
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Versionsnummer in Excel automatisch hochzählen

Schritt-für-Schritt-Anleitung

Um die Versionsnummer in Excel nach jedem Speichern oder Schließen der Datei automatisch hochzuzählen, kannst Du ein einfaches VBA-Makro verwenden. Folge diesen Schritten:

  1. Öffne Excel und die Datei, in der Du die Versionsnummer verwalten möchtest.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Klicke im Projekt-Explorer auf „DieseArbeitsmappe“ deiner Datei.

  4. Füge den folgenden Code in das Codefenster ein:

    Private Sub Workbook_Open()
   Range("A1").Value = _
   Split(Range(Range("A1").Value & "1").Offset(, 1). _
   EntireColumn.Address(0, 0), ":")(0)
End Sub

  5. Speichere die Datei als Excel-Arbeitsmappe mit Makros (*.xlsm).

  6. Schließe den VBA-Editor und speichere Deine Datei. Jedes Mal, wenn Du die Datei öffnest, wird die Versionsnummer in Zelle A1 hochgezählt.

Häufige Fehler und Lösungen

  • Fehler: Makro funktioniert nicht.

    • Lösung: Stelle sicher, dass die Datei als *.xlsm gespeichert ist und dass Makros in den Excel-Optionen aktiviert sind.

  • Fehler: Zelle A1 bleibt leer.

    • Lösung: Überprüfe, ob in Zelle A1 ein gültiger Buchstabe vorhanden ist. Der Code erwartet, dass dort eine Versionsnummer wie „BA“ steht.

Alternative Methoden

Wenn Du keine VBA-Makros verwenden möchtest, kannst Du auch eine Formel nutzen. Diese Methode ist jedoch nicht so flexibel und erfordert manuelles Eingreifen:

  1. In Zelle A1 kannst Du die aktuelle Version manuell eingeben.
  2. Bei jedem Speichern musst Du die nächste Version manuell eingeben, indem Du den Buchstaben entsprechend anpasst (z.B. von „BA“ auf „BB“).

Diese Methode ist einfach, aber weniger effizient, wenn Du häufig Versionen aktualisieren musst.

Praktische Beispiele

Nehmen wir an, Du hast in Zelle A1 „BA“ stehen:

  • Nach dem ersten Speichern wird die Zelle automatisch auf „BB“ geändert.
  • Ein weiterer Speichervorgang aktualisiert die Zelle auf „BC“.

Mit dem VBA-Code kannst Du diese Automatisierung für alle Versionen, bis „ZZ“ und darüber hinaus, nutzen.

Tipps für Profis

  • Verwendung von Konstanten: Du kannst die Buchstaben in einem Array speichern, um die Versionen besser zu verwalten. Dies könnte besonders nützlich sein, wenn Du auch ältere Versionen zurückverfolgen möchtest.

  • Erweiterte Automatisierung: Nutze Ereignisse wie Workbook_BeforeClose oder Workbook_AfterSave, um die Versionsnummer noch flexibler zu gestalten, je nach Deinen Bedürfnissen.

FAQ: Häufige Fragen

1. Wie hochzählt die Versionsnummer nach „ZZ“?
Nach „ZZ“ geht es direkt weiter mit „AAA“, „AAB“ usw. Du kannst den Code anpassen, um diese Logik zu berücksichtigen.

2. Kann ich die Versionsnummer auch in einer anderen Zelle speichern?
Ja, ändere einfach Range("A1") auf die gewünschte Zelle, z.B. Range("B1").

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige