Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
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
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
1932to1936
1932to1936
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

vba, ID generieren (Datum & Textinhalt)

Forumthread: vba, ID generieren (Datum & Textinhalt)

vba, ID generieren (Datum & Textinhalt)
31.05.2023 09:38:00
Fred


Hallo Excel-Profis,
ich möchte jeden meiner Fußballspiele eine ID zuordnen.
Mein erster Gedanke; Jedes Team hat nicht mehr als 1 Spiel an einem Tag. Daher liegt es auf der Hand, eine ID aus Datum & Clubname.
In meiner formatierten Tabelle beginnen die Datumswerte und Vereinsnamen in der 11. Zeile.
Datumswert: Spalte 10
Clubname: Spalte 12
Ist es möglich, eine ID aus beiden Werten zu generieren?

Gruss
Fred

Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: vba, ID generieren (Datum & Textinhalt)
31.05.2023 09:51:25
Fred
.. mit einer Formel wäre dies eventuell so umzusetzen:
TEXT([@DATE];"TTMMJJJJ")&"-"&C11
Frage; Kann der Clubname eventuell in eine Zahl umgewandelt werden?
Gruss
Fred


AW: vba, ID generieren (Datum & Textinhalt)
31.05.2023 09:55:10
Oberschlumpf
Hi Fred,

in Zelle A11 diese Formel...

=J11 & "_" & L11
...und Formel in Spalte A runterziehen

Ach so, ist vllt Spalte A die falsche? Dann musst du A gegen den Spaltenbuchstaben austauschen, wo es für dich besser passt.

Hilfts?
Nein? Dann bitte per Upload eine hilfreiche Bsp-Datei.

Ciao
Thorsten


Anzeige
AW: vba, ID generieren (Datum & Textinhalt)
31.05.2023 10:04:26
Fred
Hallo Thorsten,
ich habe das nun mal als makro umgesetzt:
Sub GeneriereID()
    Dim letzteZeile As Long
    Dim i As Long
    
    letzteZeile = Cells(Rows.Count, 12).End(xlUp).Row
    
    For i = 11 To letzteZeile
        Cells(i, 9).Value = Format(Cells(i, 10).Value, "ddmmyyyy") & "_" & Cells(i, 12).Value
    Next i
End Sub
Besteht die Möglichkeit, den Vereinsnamen (Spalte 12) als Zahl zu generieren?

Gruss
Fred


Anzeige
AW: vba, ID generieren (Datum & Textinhalt)
31.05.2023 10:12:33
Fred
Hallo Thorsten,
.. im Web habe ich folgendes Makro entdeckt und auf meine Tabelle geändert:
Sub GeneriereIDs2()
    Dim letzteZeile As Long
    Dim i As Long
    
    letzteZeile = Cells(Rows.Count, 9).End(xlUp).Row
    
    For i = 11 To letzteZeile
        Dim clubName As String
        Dim clubNameNum As Double
        
        clubName = Cells(i, 12).Value
        
        ' Umwandlung des Clubnamens in eine Zahl
        For j = 1 To Len(clubName)
            clubNameNum = clubNameNum + Asc(Mid(clubName, j, 1))
        Next j
        
        ' Generierung der ID ohne den Clubnamen
        Cells(i, 9).Value = Format(Cells(i, 10).Value, "ddmmyyyy") & "-" & clubNameNum
        Cells(i, 9).NumberFormat = "0" ' Ändert das Format der ID-Zelle auf Zahl
    Next i
End Sub
Die generierte ID enthält nur eine Zahl, nicht den ursprünglichen Clubnamen,- indem die ASCII-Werte der einzelnen Zeichen des Namens zusammengezählt werden.
Gibt es da etwas einzuwenden?

Gruss
Fred


Anzeige
AW: vba, ID generieren (Datum & Textinhalt)
31.05.2023 10:29:34
Fred
Thorsten,
der Hintergrund; Es wirrd die Tabelle immer wieder ergänzt und mit anderen Tabellen u.U. gemixt (aus anderen Ligen usw.)
Um zB den gemixten Tabellen ursprüngliche Daten hinzuzufügen, sollte die ID tatsächlich einmalig sei,n- auf keinen Fall unterschiedlichen Clubspielen zugeordnet werden.


Anzeige
AW: vba, ID generieren (Datum & Textinhalt)
31.05.2023 10:47:33
Oberschlumpf
Fred,

zumindest ich mag deine datei nicht nachbauen - zeig doch bitte eine Bsp-Datei per Upload...mit Bsp-Daten in den richtigen Zellen

Ciao


AW: vba, ID generieren (Datum & Textinhalt)
31.05.2023 11:12:14
Fred
Hallo Thorsten,
hier ein Auszug einer meiner relevanten Dateien;
https://www.herber.de/bbs/user/159392.xlsb
Die Tabelle beinhaltet zB Daten aus 1 & 2. Bundesliga
Meine "Unsicherheit" in Hinsicht auf eine eindeutige Kennung der einzelnen Spiele kommt daher, das ja im Makro die ASCII-Werte der einzelnen Zeichen verwendet werden.
Beispiel 832
Kann gelesen (interpretiert) werden als
832, oder 8 und 32 oder 83 und 2 undundund
Verstehst du?
Ich will mir nur in Zukunft sicher sein, das jedes einzelne Spiel tatsächlich eine eindeutige Kennung hat.

Gruss
Fred


Anzeige
AW: vba, ID generieren (Datum & Textinhalt)
31.05.2023 12:31:57
Oberschlumpf
Hi Fred

1. du verwendest diesen Befehl

Cells(i, 9).NumberFormat = "0" ' Ändert das Format der ID-Zelle auf Zahl
Wieso? Versuch mal in irgdeiner Zelle diese Formel: =I11+1 (als Werte wäre das =21052023-832 + 1

Was denkst du, kommt da als Ergebnis raus? Etwa 21052023-833???
FALSCH! Das Ergebnis ist #WERT!....weil die ID ein - enthält! Somit bleibt die ID ein Text, egal, wie oft du diese Zellen als Zahl formatierst.
Den oben zitierten Befehl kannst du also löschen.

2. Du schreibst "...Kann gelesen (interpretiert) werden als 832, oder 8 und 32 oder 83 und 2 undundund..."

Ja, stimmt, ID kann so oder so gelesen/interpretiert werden....aber!!!!....DU allein entscheidest in deinem Code und in den Formeln, WIE etwas gelesen/interpretiert wird!
Und der Inhalt aus Spalte ID MUSS natürlich IMMER als gesamter Inhalt verwendet/gelesen/interpretiert werden - und nich nur ein Teil davon.

3. Die Warnung von Steuerfuzzi wegen vielleicht möglicher doppelter Werte halte ich für unbegründet, weil ja die "Summe" für ID immer aufsummiert wird - so ist es eigtl unmöglich, dass irgdwann mal z Bsp der Wert 832 (oder jeder andere schon geschriebene Wert) erneut vorkommt, weil ja - immer - jede folgende ID hinter dem -Zeichen größer ist als die vorhergehende ID.
Aber natürlich kann ich mich auch irren - und Steuerfuzzi hat vllt doch recht....aber das musst halt du ausprobieren

4. Die Warnung von Steuerfuzzi wegen zu großer Zahlen halte ich auch für unbegründet, weil ja die ID ein TEXTeintrag ist und keine echte Zahl. Somit kann es nur passieren, dass die aktuelle Spaltenbreite für ID zu klein wird, um die gesamte ID anzuzeigen.

Sooo..."unterm Strich" würd ich sagen:
Deine Datei - so, wie wir sie jetzt kennen! - kann so bleiben (mit Löschen des obigen Codes).
Und, wie gesagt, wenn du mein 2. beachtest, wieso sollte die ID dann anders interpretiert werden?

Ciao
Thorsten


Anzeige
AW: vba, ID generieren (Datum & Textinhalt)
31.05.2023 13:35:01
Fred
Thorsten,
vielen Dank für deine ausführliche Beschreibung!
Nach deinen Ausführungen ist mir der Code eigentlich so richt bewußt und paßt nicht mehr ins gewünschte :-(
weil "... weil ja die "Summe" für ID immer aufsummiert wird"
Es ist halt so, das wenn die Tabelle immer wieder ergänzt wird und auch anders sortiert wird, auch die ID vergeben werden soll.
Nutze ich nun das letzte Makro, wird folglich (zumindest wenn anders sortiert) eine andere ID dem Spiel zugefügt :-(
Ich denke mal, das es doch wohl in diesen Fall sinnvoller ist, wenn ich die ID so wie in meinem ersten Makro bestimme:
Sub GeneriereID()
    Dim letzteZeile As Long
    Dim i As Long
    
    letzteZeile = Cells(Rows.Count, 12).End(xlUp).Row
    
    For i = 11 To letzteZeile
        Cells(i, 9).Value = Format(Cells(i, 10).Value, "ddmmyyyy") & "_" & Cells(i, 12).Value
    Next i
End Sub
so bin ich mir 100% sicher, dass immer die gleiche ID für ein Spiel generiert wird,- egal wie sortiert ist.

Gruss
Fred


Anzeige
AW: vba, ID generieren (Datum & Textinhalt)
31.05.2023 11:44:50
Der Steuerfuzzi
Hallo,

grundsätzlich ist nichts gegen die Summe einzuwenden. Man muss nur aufpassen, dass die Werte nicht zu groß werden (z. B. bei recht langen Namen) und dass es nicht zu doppelten Werten kommt.

Gruß
Michael

;
Anzeige
Anzeige

Infobox / Tutorial

ID in Excel generieren: So funktioniert's mit VBA

Schritt-für-Schritt-Anleitung

Um eine ID in Excel zu generieren, die aus einem Datum und dem Clubnamen besteht, kannst Du VBA verwenden. Hier ist eine einfache Anleitung:

  1. Öffne den VBA-Editor: Drücke ALT + F11 in Excel.

  2. Füge ein neues Modul hinzu: Rechtsklicke auf "VBAProject (DeineDatei.xlsx)" > Einfügen > Modul.

  3. Füge folgenden Code ein:

    Sub GeneriereID()
   Dim letzteZeile As Long
   Dim i As Long

   letzteZeile = Cells(Rows.Count, 12).End(xlUp).Row

   For i = 11 To letzteZeile
       Cells(i, 9).Value = Format(Cells(i, 10).Value, "ddmmyyyy") & "_" & Cells(i, 12).Value
   Next i
End Sub

  4. Führe das Makro aus: Drücke F5 oder gehe zu Ausführen > Sub/UserForm ausführen.

  5. Überprüfe die Ergebnisse: Die IDs sollten in Spalte 9 (Spalte I) erscheinen.

Häufige Fehler und Lösungen

  • Fehler: #WERT! in der ID-Zelle

    • Lösung: Achte darauf, dass Du die ID nicht als Zahl formatierst. Das Minuszeichen im ID-Format führt zu einem Textwert.

  • Fehler: ID wird nicht korrekt generiert

    • Lösung: Überprüfe, ob die Werte in Spalte 10 (Datum) und Spalte 12 (Clubname) korrekt eingegeben sind.

  • Fehler: Doppelte IDs

    • Lösung: Stelle sicher, dass das Datum und der Clubname einzigartig sind, um eine eindeutige ID zu garantieren.

Alternative Methoden

Neben VBA kannst Du auch Excel-Formeln verwenden, um IDs zu generieren. Hier ist eine einfache Formel:

=TEXT(J11, "ddmmyyyy") & "_" & L11

Du kannst diese Formel in Zelle A11 eingeben und nach unten ziehen, um IDs für alle Spiele zu generieren.

Praktische Beispiele

Nehmen wir an, Du hast folgende Daten:

Datum Clubname
01.05.2023 FC Bayern
02.05.2023 Borussia Dortmund

Nach der Anwendung des VBA-Codes oder der Formel würde die ID wie folgt aussehen:

ID
01052023_FC Bayern
02052023_Borussia Dortmund

Tipps für Profis

  • Verwende die ASCII-Werte: Wenn Du den Clubnamen in eine Zahl umwandeln möchtest, kannst Du die ASCII-Werte der Buchstaben addieren, um eine ID zu generieren. Dies ist in vielen Fällen hilfreich, um eine numerische ID zu erhalten.

  • Automatisiere den Prozess: Wenn Du regelmäßig neue Daten hinzufügst, denke daran, das Makro so anzupassen, dass es automatisch beim Öffnen der Datei oder beim Hinzufügen neuer Daten ausgeführt wird.

  • Datensicherung: Bevor Du Makros ausführst, sichere Deine Daten, um Datenverlust zu vermeiden.

FAQ: Häufige Fragen

1. Wie kann ich die ID in eine Zahl umwandeln? Du kannst die ASCII-Werte der Buchstaben summieren, um eine numerische ID zu erstellen.

2. Was passiert, wenn zwei Clubs am gleichen Tag spielen? Wenn zwei Clubs am gleichen Tag spielen, wird die ID aufgrund der Namensunterschiede dennoch einzigartig sein.

3. Ist VBA notwendig, um eine ID zu generieren? Nein, Du kannst auch Excel-Formeln verwenden, um IDs zu erstellen, aber VBA bietet mehr Flexibilität und Automatisierung.

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