Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1324to1328
1324to1328
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilenhöhe einstellen

Forumthread: Zeilenhöhe einstellen

Zeilenhöhe einstellen
19.08.2013 15:48:47
Sven
Hallo Spezies
ich arbeite mit meiner Mappe auf Bildschirmen verschiedener Größe.
Ich möchte nur die Zeilen 1-24 sichtbar machen. Lässt sich mit einem VBA-Code die Zeilenhöhe dieser Zeilen entsprechend des Monitors automatisch einstellen?
Besten Dak für Eure Hilfe.
Gruß
Sven

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilenhöhe einstellen
19.08.2013 16:15:19
krepp
Hallo,
Sub ZOOM()
Range("A1:A24").Select
ActiveWindow.ZOOM = True
Range("A1").Select
End Sub
Gruß And

AW: Zeilenhöhe einstellen
19.08.2013 16:49:07
Sven
Hallo And,
danke dir. Geht so etwas egentlich nur mit select?
Gruß Sven

AW: Zeilenhöhe einstellen
19.08.2013 17:19:54
Doris
Hallo Sven,
Wenn für Zeilen 1 bis 24 z.b Höhe=20 sein soll, geht es auch so
Rows("1:24").RowHeight = 40
Ich habe die Erfahrung gemacht, das man bei Aufzeichnungen die Zuweisungen (gerade beim Formatieren) mit False oder None rausschmeissen. Unten mal ein Beispiel. 
' Makro Aufzeichnung
Range("A6:C6").Select
With Selection.Font
.Name = "Arial"
.Size = 11
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ThemeColor = xlThemeColorLight1
.TintAndShade = 0
.ThemeFont = xlThemeFontNone
End With
' Kannst Du reduzieren auf
Range("A6:C6").Font.Name = "Arial"
Range("A6:C6").Font.Size = 11
Habe da auch 'ne Menge unter dem Motte probieren geht über studieren dazugelernt
Gruß Doris

Anzeige
AW: Zeilenhöhe einstellen
19.08.2013 17:27:01
Sven
Hallo Doris,
danke, aber bei der Methode richtet sich die Zeilenhöhe doch nicht nach dem Monitor.
Gruß Sven
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige