Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zeilenhöhe automatisch anpassen funktioniert nicht

Zeilenhöhe automatisch anpassen funktioniert nicht
07.05.2024 13:11:33
LiLa
Hallo,
Ich habe immer wieder Schwierigkeiten mit der Anpassung von Zeilenhöhen.
Manchmal passt sich die Zeilenhöhe bei Zeilenumbruch nicht von alleine an.
Manchmal nützt es auch nichts, wenn ich "Zellen - Format - Zeilenhöhe automatisch anpassen" anklicke, es passiert einfach nichts.
In der Beispieldatei im Anhang ist das der Fall, man sieht es an Zeile 9. Ich finde aber nicht heraus, welche Formatierung ich wählen muss, damit es funktioniert - ?
Schon mal vielen Dank!
LiLa

https://www.herber.de/bbs/user/169324.xlsx
Anzeige

13
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilenhöhe automatisch anpassen funktioniert nicht
07.05.2024 13:19:10
Uduuh
Hallo,
das liegt an den verbundenen Zellen.

Gruß aus'm Pott
Udo
AW: Zeilenhöhe automatisch anpassen funktioniert nicht
07.05.2024 13:24:32
LiLa
Und es gibt keine Lösung, wie das auch bei verbundenen Zellen funktioniert?
AW: Zeilenhöhe automatisch anpassen funktioniert nicht
07.05.2024 14:45:49
Daniel
Nein.
Denn wie soll Excel wissen, welche der Zeilen oder Spalten angepasst werden soll?

Gruß Daniel
Anzeige
AW: Zeilenhöhe automatisch anpassen funktioniert nicht
07.05.2024 14:47:12
RPP63
Nö, geht nicht!
Aber mal etwas anderes:
Ich sehe keinen Sinn in Deinen Verbünden.
Warum machst du aus den
2*21,57
nicht einfach
1*43,14
(Spalte C verbreitern, Spalte D löschen, vorher Zellverbünde entfernen)?

Gruß Ralf
AW: Zeilenhöhe automatisch anpassen funktioniert nicht
08.05.2024 10:17:23
LiLa
Die Zellverbünde sind so, weil in der echten Datei oben drüber noch weitere Zeilen sind, die ich zum Hochladen im Forum weggelöscht habe.
Und es ist auch nur ein Beispiel, ich habe das Problem öfter - aber wahrscheinlich sind dann immer irgendwo verbundene Zellen, die das Problem verursachen.
Ich hätte erwartet, dass Excel die Zeilenhöhe so anpasst, dass der Text in jeder Zelle komplett angezeigt wird, mir leuchtet nicht ganz ein, warum das bei verbundenen Zellen nicht möglich ist.
Aber jetzt weiß ich wenigstens, dass es nicht geht, und ich nicht weiter nach meinem Fehler suchen muss.
Vielen Dank an alle!
Anzeige
Das geht nur...
08.05.2024 10:21:47
Case
Moin, :-)

... per VBA. Darfst/willst/kannst du das einsetzten?

Servus
Case
AW: Das geht nur...
08.05.2024 10:35:52
LiLa
- dürfen ja
- können fraglich :) aber mit Tipps und Zeit reinstecken wahrscheinlich möglich
- wollen hängt vom Aufwand ab, aber jetzt bin ich schon neugierig geworden, also würde ich es zumindest gern probieren!
Kannst du beschreiben wie?
Danke!
Anzeige
Bin jetzt...
08.05.2024 10:43:43
Case
Hallo, :-)

... unterwegs. Poste heute Nachmittag etwas. ;-)

Servus
Case
AW: Bin jetzt...
08.05.2024 10:48:29
LiLa
Super, Danke, bis dann!
AW: Hier jetzt das...
08.05.2024 13:59:43
LiLa
Danke!
Habe leider keine Zeit es gleich zu testen, melde mich danach nochmal ob es funktioniert hat.
Viele Grüße!
AW: Hier jetzt das...
10.05.2024 09:59:53
LiLa
Guten Morgen,
Entschuldigung, könntest du mir den VBA Code hier in den Text kopieren?
Wir dürfen zwar mit VBA arbeiten, aber keine entsprechenden Dateien herunterladen, das hatte ich leider nicht bedacht.
Viele Grüße!
Anzeige
Hier der...
10.05.2024 10:24:45
Case
Moin, :-)

... Code: ;-)

Option Explicit

Public Sub Main()
Dim lngTMP As Long
With Tabelle1
For lngTMP = 5 To .Cells(.Rows.Count, 3).End(xlUp).Row
ZeilenHoeheVerbundeneZellen (.Cells(lngTMP, 3))
Next lngTMP
End With
End Sub
Function ZeilenHoeheVerbundeneZellen(ByVal rngZelle As Range)
'passt die Zeilenhöhe bei verbundenen Zellen automatisch an
'von Hans Herber / angepasst von Thomas Ramel (t.ramel@mvps.org)
'Aufrufen per Übergabeparameter mit der folgenden Zeile:
'ZeilenhoeheVerbundeneZellen (ActiveSheet.Range("A1"))
Dim CurrentRowHeight As Single
Dim MergedCellRgWidth As Single
Dim CurrCell As Range
Dim CellWidth As Single
Dim PossNewRowHeight As Single
Dim iX As Integer
If IsEmpty(rngZelle) Then
Set rngZelle = ActiveCell
End If
If rngZelle.MergeCells Then
With rngZelle.MergeArea
If .Rows.Count = 1 And .WrapText = True Then
Application.ScreenUpdating = False
CurrentRowHeight = .RowHeight
CellWidth = rngZelle.ColumnWidth
For Each CurrCell In rngZelle.MergeArea
MergedCellRgWidth = CurrCell.ColumnWidth + MergedCellRgWidth
iX = iX + 1
Next
MergedCellRgWidth = MergedCellRgWidth + (iX - 1) * 0.71
.MergeCells = False
.Cells(1).ColumnWidth = MergedCellRgWidth
.EntireRow.AutoFit
PossNewRowHeight = .RowHeight
.Cells(1).ColumnWidth = CellWidth
.MergeCells = True
'.RowHeight = PossNewRowHeight
.RowHeight = IIf(CurrentRowHeight > PossNewRowHeight, _
CurrentRowHeight, PossNewRowHeight)
End If
End With
End If
End Function


Servus
Case
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Zeilenhöhe in Excel automatisch anpassen: Lösungen und Tipps


Schritt-für-Schritt-Anleitung

Um die Zeilenhöhe automatisch anzupassen, befolge diese Schritte:

  1. Wähle die Zeile(n) aus, deren Höhe Du anpassen möchtest.
  2. Klicke mit der rechten Maustaste auf die ausgewählte Zeile.
  3. Wähle „Zeilenhöhe automatisch anpassen“ aus dem Kontextmenü.

Falls dies nicht funktioniert, könnte das Problem an verbundenen Zellen liegen. In diesem Fall empfiehlt es sich, die verbundenen Zellen zu überprüfen.


Häufige Fehler und Lösungen

  • Excel passt Zeilenhöhe nicht automatisch an:

    • Ursache: Überprüfe, ob Zellen verbunden sind. Verbundene Zellen können die automatische Anpassung der Zeilenhöhe verhindern.
  • Excel automatische Zeilenhöhe funktioniert nicht:

    • Lösung: Stelle sicher, dass der Text in der Zelle umgebrochen wird. Aktiviere „Zeilenumbruch“ in den Zellenformatierungsoptionen.
  • Zeilenhöhe automatisch anpassen funktioniert nicht:

    • Überprüfe, ob die Zelle gesperrt ist oder ob Schattierungen/ Rahmen die Sichtbarkeit beeinträchtigen.

Alternative Methoden

Wenn die Standardmethode nicht funktioniert, kannst Du folgende Alternativen ausprobieren:

  1. VBA verwenden:

    • Wenn Du mit VBA vertraut bist, kannst Du einen kleinen Code verwenden, um die Zeilenhöhe für verbundene Zellen anzupassen. Hier ist ein einfaches Beispiel:
    Option Explicit
    Public Sub Main()
       Dim lngTMP As Long
       With Tabelle1
           For lngTMP = 5 To .Cells(.Rows.Count, 3).End(xlUp).Row
               ZeilenHoeheVerbundeneZellen (.Cells(lngTMP, 3))
           Next lngTMP
       End With
    End Sub
    
    Function ZeilenHoeheVerbundeneZellen(ByVal rngZelle As Range)
       'Hier wird die Zeilenhöhe für verbundene Zellen angepasst
       ...
    End Function
  2. Manuelle Anpassung:

    • Du kannst die Zeilenhöhe auch manuell anpassen, indem Du den Mauszeiger auf die untere Kante der Zeilenüberschrift ziehst und die Höhe anpasst.

Praktische Beispiele

  • Beispiel 1: Wenn Du einen langen Text in einer Zelle hast, der nicht vollständig angezeigt wird, kannst Du die Zeilenhöhe automatisch anpassen, um den gesamten Text sichtbar zu machen.

  • Beispiel 2: In einer Tabelle mit verbundenen Zellen kann es vorkommen, dass die Zeilenhöhe automatisch zu niedrig ist. Hier hilft oft nur die Verwendung eines VBA-Skripts, um die Höhe korrekt anzupassen.


Tipps für Profis

  • Überprüfe regelmäßig die Formatierung Deiner Zellen, insbesondere bei verbundenen Zellen. Oft kann die Zeilenhöhe nicht automatisch angepasst werden, weil die Zellen nicht richtig formatiert sind.
  • Nutze die AutoFit-Funktion in Excel, um eine schnelle Anpassung der Zeilenhöhe zu erreichen. Klicke doppelt auf die untere Kante der Zeilenüberschrift.
  • Wenn Du oft mit automatischer Zeilenhöhe arbeitest, erstelle eine Vorlage, die bereits die gewünschten Einstellungen hat.

FAQ: Häufige Fragen

1. Warum passt Excel die Zeilenhöhe nicht automatisch an?
Das liegt häufig an verbundenen Zellen oder an der Einstellung, dass der Text nicht umgebrochen wird.

2. Was kann ich tun, wenn die Zeilenhöhe immer zu niedrig ist?
Prüfe die Zellenformatierung und aktiviere den Zeilenumbruch. Falls nötig, verwende VBA, um die Höhe anzupassen.

3. Wie kann ich die Zeilenhöhe für verbundene Zellen anpassen?
Du kannst ein VBA-Skript nutzen, das speziell für verbundene Zellen entwickelt wurde, um die Zeilenhöhe korrekt anzupassen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige