Hallo,
eben hat mir MichaV geholfen wie ich die Tabellen fortlaufend numerieren kann :
For i = 1 To Sheets.Count
Sheets(i).Name = CStr(i + 5000) '5001, 5002, 5003....
Next i
Jetzt aber wie muss ich code schreiben wenn ich Text und Nummern zusammenbinde, wie z.B.
Pos5000, pos5001, pos5002 usw
danke im voraus