Automatische zeilenhÖhe in excel

Guten Tag,
hallo, ich habe folgendes Problem:
ich schreibe den Zelleninhalt bestimmer Zellen aus Tabellenblatt 1 automtisch in ein anderes Tabellenblatt 2. Die Zeilenhöhe in dem anderen Tabellenblatt 2 sollte sich automatisch anpassen, aber wenn ich es über Format oder zeilenhöhe fixiere, dann ist es weg, wenn ich in dem 1. Tabellenblatt ändere, bzw. neu dazuschreibe. Gibt es ein Makro mit dem ich das ganze Blatt so einstellen kann, dass immer angepasst wird oder was habe ich sonst für Möglichkeiten?

Hallo waltervonbayern,

da muss ich passen bzw. ich habe den Verdacht, dass man hier auch mit einer Makro nur unter gewissen Randbedingungen weiter kommen könnte.

MfG Georg V.

Hallo Walter

Die einzige Möglichkeit - die ich kenne - ist alle
Tabellenblätter zu markieren und dass Format anzupassen
(z. B. Duppelklick zwischen die Zeilen oder Spalten
oder über Format -> automatische Höhe/Breite). Achtung!
Unbedingt darauf achten, dass Du danach die Markierung
der Tabellenblätter wieder entfernst…

Gruss

Guten Tag,
hallo, ich habe folgendes Problem:
ich schreibe den Zelleninhalt bestimmer Zellen aus
Tabellenblatt 1 automtisch in ein anderes

Tabellenblatt 2. Die

Zeilenhöhe in dem anderen Tabellenblatt 2 sollte sich
automatisch anpassen, aber wenn ich es über Format

oder

zeilenhöhe fixiere, dann ist es weg, wenn ich in dem

Tabellenblatt ändere, bzw. neu dazuschreibe. Gibt es

ein Makro

mit dem ich das ganze Blatt so einstellen kann, dass

immer

angepasst wird oder was habe ich sonst für

Möglichkeiten?

Sub HoeheAnpassen()
ActiveSheet.Range(„a1:a10“).Rows.EntireRow.AutoFit
End Sub

Gruß

hallo, dass sieht gut aus, aber wie bringe ich das makro jetzt in meine Liste, damit es jedesmal aktiv ist, wenn ich auf auf das Tabellenblatt anwähle, ich meine wenn ich unten in der Menüleiste von Tabllenblatt 1 in Tabellenblatt 2 wechsle. Ich weiss schon wie man ein Marko erstellt und ich kann deinen Text dann auch reinkopieren, aber wie aktiviere ich es dass es aktive ist, sobald ich das Tabellenblatt öffne?

Sub HoeheAnpassen()
ActiveSheet.Range(„a1:a10“).Rows.EntireRow.AutoFit
End Sub

Gruß

danke, habe es so gemacht, aber wenn ich auf den Button drücke passiert nichts, was kann ich falsch machen?

Hallo, danke funktioniert jetzt doch

Gruss

Walter

Sub HoeheAnpassen()
ActiveSheet.Range(„a1:a10“).Rows.EntireRow.AutoFit
End Sub

Gruß