---

@Excel-Experts,
hallo Leute,
mich nervenŽs schon wieder mal und zwar wollen unsere Herren bei bestimmten Dokumenten
die Zeilen mittels "optimaler Höhe" auf Wunschgröße anpassen, nicht wie fest vorgegeben.
D.h.: statt 12,75 bei einzeilig möchten wir z. B. 30 haben.

Machbar?
mfg
Harald

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Harald,

da gibt es schon einen Befehl im Excel: im Menü unter "Format, Zeile, Höhe" kann für die aktuell markierten Zeilen die Höhe in pt angegeben werden.

Sollte dieser Weg über's Menü zu aufwändig erscheinen, den Befehl als Makro aufzeichnen, die gewünschte Zeilenhöhe als Fixwert angeben  oder mit einer InputBox abfragen und das Makro z.B. einer Schaltfläche zuordnen.

Ich würde mir das Makro aber auf alle Fälle sparen, weil der Befehl ja schon da ist.

Ciao,
WolfgangE

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Wolfgang,
erstmal vielen Dank für Deine Antwort,
nur ist das bekannt und löst nicht ganz unser Problem. Vielleicht habe ich das auch nicht klar rübergebracht:
wir wollen, das eine Vorlage sowohl den einzeiligen Text, als auch den mehrzeiligen in einem schönen gleichen Bild automatisch darstellt.
Z. B.: wenn man mit Zeilenumbruch arbeitet und in einer Spalte soviel Text eingibt, das dieser wirksam wird, ergibt eine weitere Bearbeitung mittels "optimaler Höhe" ein anderes Darstellungsbild als mit einem nur einzeilig erzeugten Text.
Explizit möchten wir bei einzeiligen Text und optimaler Höhe z. B.: 30 Pixel voreinstellen können. Dies würde ein ähnliches Bild abgeben wie Absatz formatierte Zeilen in Word.
Solltest Du solch ein Makro wissen, wäre ich dankbar (mit Word diese Dokumente erstellen ist nicht so einfach wie mit Excel - viel Nachbearbeitung, hauptsächlich mit den Seitenumbrüchen).
Hoffe unser Problem nun besser dargestellt zu haben.
mfg
Harald

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Harald,

das klärt natürlich einiges. Hier ist der Text für ein Makro, das alle markierten Zeilen auf Zellehöhe 30 einstellt:

Sub Zeilenhoehe()
    Selection.RowHeight = 30
End Sub

Sind tatsächlich nur diese drei Zeilen. Du musst das Makro nur noch einbauen (Menü "Extras, Makro, VisualBasicEditor" und dann ein neues Modul einfügen. Dort das Makro einfach reinkopieren) und vielleicht einer Schaltfläche oder einem Icon zuweisen.

Um solche Makros zu erstellen, empfehle ich dir den Makro-Recorder. Damit kannst du alle Aktionen wie mit einem Aufnahmegerät als Makro automatisch schreiben lassen.
Dazu das Menü "Extras, Makro, Aufzeichnen" wählen und einen Namen für das Makro vergeben.
Ab jetzt werden alle Aktionen aufgezeichnet (z.B. das Einstellen der Zeilenhöhe). Wenn du das blaue Quadrat in der eingeblendeten Symbolleiste anklickst, wird die Aufzeichnung beendet.

Über das Menü "Extras, Makro, Makros" kannst du die Makros ausführen, anzeigen, bearbeiten etc. Über den Punkt "Optionen" kannst du auch noch einen ShortCut definieren, mit dem das Makro aufgerufen wird. Pass' aber auf, dass du nicht bestehene ShortCuts vom Excel überschreibst, zumindest nicht die häufig verwendeten.

Hoffe, geholfen zu haben. Ciao,
WolfgangE

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

in Ergänzung hierzu:
'flächenübergreifende' Formatierung ohne vorherige Markierung

sub zeilenhoehe30()
cells.entirerow.rowheight = 30
end sub

die revers dazu

sub zeilenhoehenormal()
cells.entirerow.rows.autofit
end sub

Beide Makros, wie Wolfgang schon beschrieben hat, im vbe in ein normales Modul reinkopieren & bei Bedarf ausführen.

lg Nancy

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

`n Morgen,
@ Nancy
@ Wolfgang,

Dank an Euch Beiden,
das wars,
UŽunterwegs,

mfg
Harald

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP