Microsoft Excel

Herbers Excel/VBA-Archiv

Zeilenhöhe automatisch anpassen

    Betrifft: Zeilenhöhe automatisch anpassen von: Chris
    Geschrieben am: 01.09.2003 13:43:50

    Hallo,

    ich möchte die Zeilenhöhe meines Blattes automatisch anpasse, aber irgendwie funktioniert mein Makro nicht, könnte mal jemdand kurz drüber schauen?

    Workbooks("Datenname.xls").Worksheets("Übersichtsblatt").Activate
    Range("B17:G42").Select
    Selection.Rows.AutoFit

    Oder wo muss ich das Makro denn reinschreiben!?

    Danke für Eure Hilfe!

    LG Chris

      


    Betrifft: AW: Zeilenhöhe automatisch anpassen von: geri
    Geschrieben am: 01.09.2003 13:52:20

    Hallo Chris

    so geht es

    Sub Zeile()
        Rows("2:7").Select  ' Bereich Zeile 2 bis 7
        Selection.Rows.AutoFit
        Range("D8").Select
    End Sub
    




    Sub Spalte()
    
        Columns("B:C").Select
        Selection.Columns.AutoFit
        
    End Sub
    



    gruss geri


     

    Beiträge aus den Excel-Beispielen zum Thema " Zeilenhöhe automatisch anpassen"