If / Else funzt net :-(
stefan
For i = 1 To Sheets.Count
If SheetName = Sheets(i).Name Then Exit Sub
End If
Next i
Sheets.Add
ActiveSheet.Name = SheetName
Was ist hier falsch? Ich will abgleichen, ob es das Sheet schonmal gibt. Wenn ja, abbrechen - ansonsten neu anlegen.
Danke Euch