Has du mich missverstanden? - ich sagte dochj, es geht - nur nicht so, wie du meintest.
statt dieser Zeilen mit Datum und Uhrzeit
Format( Date , "YYMMDD" ) & _
Format(Time, "HHMM" ) & _
diese Zeile
Range( "Tabelle1!A77" ) &_ wenn zähler sich auf Tabelle1 Zelle A77 befinden würde
(der Wert der Zelle, die den von mir erwähnten Zähler enthält)
und am ende (oder sogar besser am anfang) des makros die Zelle A77 um 1 erhöhen lassen:
Sheets("Tabelle1").Cells(77,1) = Cells(77,1) + 1
schon hast du:
- Nr_1_52_Sabine_Schuster
- Nr_2_52_Manfred_Neumann
- Nr_3_52_Sabine_Schuster
- Nr_4_01_Max_Mustermann
Danach hast du genau das, was du wolltest.
|