Herbers Excel-Forum - das Archiv

zeilenhöhe leerer zeilen anpassen

Bild

Betrifft: zeilenhöhe leerer zeilen anpassen
von: Sandra

Geschrieben am: 18.03.2005 14:44:30
Hi!
Komme nicht weiter: Wie kann ich in einem definierten Bereich die Zeilenhöhe
leerer Zeilen an eine bestimmte Größe anpassen?
Hab schon alles mögliche an Makros ausprobiert, komme aber nicht so recht weiter. Meine VBA Kenntnisse reichen dafür noch nicht aus.
Wer kann helfen?
Vielen vielen Dank schon im Voraus!
Sandra
Bild

Betrifft: Range-Objekt: .Height oder .RowHeight - owT
von: Luc :-?
Geschrieben am: 18.03.2005 14:55:12
Bild

Betrifft: AW: zeilenhöhe leerer zeilen anpassen
von: ransi

Geschrieben am: 18.03.2005 14:59:51
hallo sandra
für die zeilen 1 bis 5 geht es via VBA so:
Public
Sub test()
Rows("1:5").RowHeight = 50
End Sub

ohne VBA:
den bereich markieren
menu format
zeile
zeilenhöhe
gewünschten wert eintragen
Fertig
ransi
Bild

Betrifft: AW: zeilenhöhe leerer zeilen anpassen
von: Sandra

Geschrieben am: 18.03.2005 15:25:44
Hi,
danke für die Antworten. Row und RowHeight kenne ich schon. Das Problem ist aber, dass
es in dem Bereich auch nicht leere Zeilen gibt, die nicht verkleinert werden sollen. Hätt ich vielleicht noch schrieben sollen, sorry.
Da muss also irgend ne Prüfung rein. Wenn Zeile leer, dann ändere Zeilenhöhe, wenn nicht leer, dann lass die Zeilenhöhe so wie sie ist o.ä.
Wie macht man das am besten?
Sandra
Bild

Betrifft: AW: zeilenhöhe leerer zeilen anpassen
von: K.Rola

Geschrieben am: 18.03.2005 15:53:39
Hallo,
so sollte es gehen:
Option Explicit
Sub Zeilehoehe_Leerzeilen()
Dim c As Range
For Each c In Selection.Rows
If Application.CountA(Rows(c.Row)) = 0 Then
c.RowHeight = 5
End If
Next
End Sub

Gruß K.Rola

Der Fleiß ist die Wurzel aller Häßlichkeit.

Oscar Wilde


Bild

Betrifft: AW: zeilenhöhe leerer zeilen anpassen
von: Sandra
Geschrieben am: 18.03.2005 16:05:11
@ K.Rola
Danke! Genau danach hab ich gesucht.
Schönes Wochenende!
Sandra
 Bild
Excel-Beispiele zum Thema "zeilenhöhe leerer zeilen anpassen"
SVERWEIS-Funktion ohne Berücksichtigung leerer Zellen Zeilenhöhe in cm festlegen
Summe gefilterter Zeilen Zeilenumbruch
Leere Zeilen löschen Spalten/Zeilen aus- und einblenden
Zeilenumbruch in Formel erzwingen Zeilen und Spalten über ein Drehfeld ein- und ausblenden
Alle Kopf-/Fußzeilen-Festlegungen löschen Fußzeilen beim Öffnen eintragen