Zelle an Textlänge anpassen Schriftgrösse unveränd
07.12.2018 13:35:14
Carole
Ich versuche, einen längeren Text in eine Zelle unterzubringen, die Schriftgrösse soll sich dabei jedoch NICHT ändern. Es soll lediglich die Zellenhöhe entsprechend der Textlänge automatisch angepasst werden. Folgende Fehlversuche habe ich hinter mir und weiss nun nicht mehr weiter.
1. Versuch
Mittels Zeilenumbruch. So zwar der Text in der Zelle Platz, jedoch verkleinert sich die Schrift. Die Schriftgrösse sollte jedoch gleich bleiben.
2. Versuch
Über Format Zellengrösse automatisch anpassen. Der Text wird zwar getrennt, die Zelle auch deutlich höher, die Schriftgrösse bleibt wunschgemäss gleich gross. Jedoch lässt sich der Text in der ersten und untersten Zeile trotzdem nicht vollständig lesen.
3. Versuch
Als Leihe sicherlich ein überspitzter Versuch mittels Makro.
Sub HoeheAnpassen() ActiveSheet.Range("H10:H25").Rows.EntireRow.AutoFit End Sub
Da diese drei Varianten nicht funktionieren bin ich wiederum um jeden Hinweis dankbar. Kennt sich damit jemand aus?
Anzeige