Guten Morgen Uwe, danke für deine Antwort.
Aber es ist das eingetreten von dem ich schon beim ersten Mal gesprochen habe und wir uns aneinander vorbeigedacht haben.
Wenn dein Code die Zeile "strSuchwort = Replace(.Cells(i, SP), " ", "_") 'Leerzeichen durch _ ersetzen" enthält, dann funktioniert er nur, wenn in der Importliste in Spalte E der Namen mit einem Leerzeichen zwsichen Zu- und Vornamen steht z.B. Hirtl Michael und der Blattnamen aber mit einem underline geschrieben wird z.B. Hirtl_Michael. Hier tut der Code so wie ich das brauche!!
Wenn dein Code die Zeile "strSuchwort = .Cells(i, SP)" enthält und in der Importliste in Spalte E der Namen mit einem Leerzeichen zwsichen Zu- und Vornamen steht z.B. Hirtl Michael und der Blattname ebenso mit einem Leerzeichen zwischen Zu- und Vornamen steht z.B. Hirtl Michael, dann kommt die Meldung dass das Blatt mit Hirtl Michael nicht vorhanden ist.
Wie gesagt, dass ist nur der Iststand, wenn du es hingekommst, dass man in Spalte E und im Tabellenblatt den Namen ohne underline verwenden kann ist das toll, wenn nicht, kann ich auch die Blattnamen mit dem underline versehen. Alles andere funktioniert ja super.
Vielen Dank Uwe und lg Christian
|