Sub M_snb() With Columns(4) .Replace "Möbel", "=Möbel", 1 .Replace "Fahrzeuge", "=Fahrzeuge", 1 .SpecialCells(-4123).HorizontalAlignment = -4108 .SpecialCells(-4123).Font.Bold = True End With End Sub
dann stelle ich mal die Zusatzfrage, wie Du bei Bedarf z.B. Auto als weitere Überschrift festlegst? Du nimmst Fahrzeuge weg, indem Du dort ein x einträgst (oder nimmst einfach manuell Fett und zentriert weg), und woran soll der code nun erkennen, dass Auto die Überschrift sein soll?
... und die Frage von Berni bitte auch beantworten ...
. \\\|/// Hoffe, geholfen zu haben. ( ô ô ) Grüße, André aus G in T ooO-(_)-Ooo (Excel 97-2019+365)
offenbar habe ich mich in meinem Anliegen etwas missverständlich ausgedrückt ... bitte um Nachsicht.
Bitte meine eingangs erwähnte Darstellung mit "x", "y" als gegenstandslos anzusehen. Ich wollte dies in der nachfolgenden Beispieldatei besser verdeutlichen und habe es anders dargestellt. Auch ist die Bezeichnung "Überschrift" wohl auch irreführend gewesen, vielmehr hätte es Kategorienbezeichnung (als "Teilüberschrift") heißen sollen.
Ich denke der Hinweis "so baut man keine Tabelle auf" hat sich dadurch wohl auch erledigt, sonst müsste ich wohl die Gegenfrage stellen "wie baut man eine Tabelle auf?".
Den Script von Ralph habe ich ausgetestet, er funktioniert dem Grunde nach super und wäre genau das, wonach ich gesucht habe ... allerdings funktioniert er nur bei Eingaben in der Spalte A und C ... ich bräuchte ihn aber für die Spalte D ... sonderbar ...
Ich hoffe, ich konnte nun etwas Licht ins Dunkel bringen und bedanke mich für alle Hinweise und Kommentare. Leider verfüge ich nicht über überragende Excel-Kenntnisse.
Den alternativen Vorschlag habe ich auch ausprobiert, endete aber mit einem Hinweis ... "#NAME?" ... auch hatte ich den Eindruck, dass die Tabelle etwas blockiert worden ist ...
