mein Code, den ich hier versucht habe, wird so nicht akzeptiert.
If ActiveSheet Is Sheets("XXX") And ActiveSheet = Cells(1, ActiveCell.Column).find(" (*)") Then
Auf Seite XXX soll, wenn sich in der Spalte, in der sich die akt. Zelle befindet, in Zelle 1 etwas in Klammern gefunden werden. Z. B. Hans (ggg). Was in den Klammern steht ist egal, Hauptsache Klammern.
Jemand weiß es bestimmt besser, wie es richtig aussehen muß.
Danke für die Hilfe.
Gruß
Karsten