Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 12:16:26
Name von aktuellem VBA-Modul ausgeben
24.04.2024 12:07:15
Werte einer Liste vergleichen und markieren
24.04.2024 11:56:21
Export bestimmter Spalten in eine neue Exceldatei
24.04.2024 11:32:28
Formel für die letzten 1-2 Zeichen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1164to1168
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1164to1168
1164to1168
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Optimale Zeilenhöhe bei sehr viel Inhalt

Optimale Zeilenhöhe bei sehr viel Inhalt
touchmarul
Hallo Excel-Gemeinde !
Ich habe noch eine Frage:
In einer großen Tabelle setze ich bestimmte Zellen (in denen manchmal viel Text steht) per VBA auf optimale Zeilenhöhe. Das klappt aber nur bis zu einem bestimmten Umfang.
Je nachdem, welche Buchstaben sich in der Zelle befinden, wird ab einem Umfang von ca.
700 Zeichen (zB. lauter "W") bis ca. 1100 Zeichen (zB. lauter "i") bzw. ab einer Zeilenhöhe von 166 bis 410,
die Zeilenhöhe nicht mehr richtig angepasst und der restliche Text nicht mehr angezeigt.
Habt Ihr einen Tip ?
Vielen Dank im Voraus !

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Optimale Zeilenhöhe bei sehr viel Inhalt
29.06.2010 14:29:52
fcs
Hallo touchmarul,
die max. Zeilenhöhe ist in Excel auf 409,5 begrenzt. Die Zeichenzahl spielt dabei eine untergeordnetete Rolle. Bei vielen Zeilenschaltungen in der Zelle oder größer Schriftgröße braucht es nur wenige Zeichen.
Machen kann man nicht viel; außer die Zeilenhöhen zu kontrollieren und die Texte anzupassen bzw. auf mehrere Zeilen zu verteilen. 
'####      E X C E L   ist kein T E X T V E R A R B E I T U N G S P R O G R A M M     ####

Gruß
Franz 
Sub Check_Max_Zeilenhöhe()
Dim Zeile As Long, wks As Worksheet, sMsgtext As String
Set wks = ActiveSheet
wks.UsedRange.EntireRow.AutoFit
For Zeile = 1 To wks.Cells.SpecialCells(xlCellTypeLastCell).Row
If wks.Rows(Zeile).RowHeight > 400 Then
sMsgtext = sMsgtext & vbNewLine & "Zeile " & Zeile
End If
Next
If sMsgtext = "" Then
MsgBox "Alle Zeilenhöhen OK", vbInformation + vbOKOnly, "Prüfung Zeilenhöhen"
Else
MsgBox "Folgende Zeilen enthalten evtl. zu viel Text" & vbNewLine & sMsgtext, vbInformation  _
+ vbOKOnly, "Prüfung Zeilenhöhen"
End If
End Sub

Anzeige
AW: Optimale Zeilenhöhe bei sehr viel Inhalt
29.06.2010 23:22:52
touchmarul
HAllo Franz,
danke für Deine Info.
Wie's aussieht kann man dann eben nicht eindeutig ermitteln, ob ein Text noch vollständig in eine Zelle passt. (Weil zB. bei einem Text, der aus über 1000 "i" besteht schon ab einer Zeilenhöhe von 166 nicht mehr richtig abgebildet wird)
PS: Natürlich ist Excel kein Textverarbeitungsprogramm, die langen Texte werden in diesem Fall automatisch aus verschiedenen Einträgen in verschiedenen Spalten generiert.

30 Forumthreads zu ähnlichen Themen

Höhe Fußzeile dynamisch anpassen
Rene

Hallo,
in meine Fußzeile sollen bestimmte Filterwerte. Diese weiß ich zur Laufzeit per VBA. Aber nun kann es sein, dass dies mal 2 oder 3 oder auch bis zu 10 verschiedene Filter sind. Nun möchte ich die Höhe der Fußzeile immer so gering wie möglich halten. Mal brauche ich dafür dann nur 2,...
19.02.2010 14:06:51
Thread-ID: 1139771
3 Beiträge
Anzeige
Zellgröße automatisch an Textlänge anpassen?
Martin

Hallo liebe Herber-Gemeinde,
gibt es eine Möglichkeit die Zellgröße in Excel automatisch an den darin vorhandenen Text anzupassen, ohne dass der Text dabei verkleinert wird?
Die fragliche Zelle wird mittels einer Formel mit Text aus einem anderen Tabellenblatt befüllt, der von Monat zu...
02.06.2010 12:11:47
Thread-ID: 1159990
6 Beiträge
Zeilenhöhe automatisch anpassen
Felix

Hallo,
ich habe einen private sub, der mir die Zeilenhöhe automatisch anpasst. Dies passiert aber nur, wenn ich das worksheet wechsle.
Gibt eine eine Möglichkeit, das gleiche bei ENTER zu bekommen, also wenn ich das Schreiben in eine Zelle abschließe?
danke für die Hilfe!
Gr...
17.06.2011 13:56:36
Thread-ID: 1218708
3 Beiträge
Anzeige
Wandernde Dropbox anpassen; Text in Zahl wandeln
Marcus

Hallo,
folgenden Code hat mir Rudi Mantaire zur Verfügung erstellt.
Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim rngJahr As Range Set rngJahr = Intersect(Range("A1"), Target) If Not rngJahr Is Nothing Then varJahr = Range("A1").Value ComboBox1.Visible = False If Tar...
13.11.2014 14:52:13
Thread-ID: 1392208
10 Beiträge
Zeilenhöhe automatisch anpassen
Matthias

Hallo,
ich bräuchte ein Makro, dass bei angewendeten Blattschutz es zulässt, dass sich die Zeilenhöhe automatisch anpasst falls der Text zuviel wird.
Ich möchte dies, nicht im Blattschutz direkt zulassen, da sonst jeder die Zeilenhöhe varrieren kann.
16.03.2015 07:42:24
Thread-ID: 1415176
7 Beiträge
Im VBA Code, alle Zeilen, ein Hochkomma
Dieter(Drummer)
Guten Tag, Spezialisten,
ich suche eine Möglichkeit, vor ALLE markierten Codezeilen, ein Hochkomma zu setzen.
Kann man das in einem Rutsch machen und wie?
Danke für's drum kümmern.
Gruß,
Dieter(Drummer)
19.04.2015 15:54:04
Thread-ID: 1421703
14 Beiträge
Zeilenhöhe automatisch anpassen, wenn leer
Patrick

Hallo,
ich habe nun noch ein Problem. In einer Tabelle funktioniert die automatische Zeilenhöhe nun gut.
Nur wenn der Inhalt mit der Entf-Taste geleert wird, dann wird die Zeilenhöhe nicht angepasst. Wenn ich mit der Löschen-Taste aber den inhalt entferne schon.
Nur soll sich die Ze...
22.06.2016 16:18:30
Thread-ID: 1500372
3 Beiträge
Zeilenhöhe automatisch anpassen
Nati

Hallo zusammen,
ich brauche nochmal Rat.
Ich habe eine Liste mit mehreren Spalten.
Die Zeilenhöhe soll jeweils fix bei 45 liegen.
Wenn in einer Spalte ein längerer Text eingegeben wird, soll sich die Zeile automatisch dem Text anpassen, jedoch trotzem mind 45 beibehalten.
I...
13.03.2017 10:14:00
Thread-ID: 1546986
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
6
5
2
7
9
6
13
2
2
16
1
4
5
3
3
20
6
3
2
3
3
1
2
3