So erhöhen Sie die Höhe mehrerer Zellen in Microsoft Excel prozentual

Question

Ich habe eine Tabelle mit unterschiedlichen vertikalen Höhen wie 20, 30 und 40. Die Höhen werden automatisch angepasst. Das Problem ist, dass die Zellen sehr nahe beieinander liegen. Ich möchte oben und unten einen Abstand lassen. Ich habe es mit vertikaler Ausrichtung versucht, konnte aber keinen Abstand zwischen den Zellen hinzufügen. Es wäre toll, wenn es eine prozentuale Erhöhung mehrerer Zellen gäbe, z. B. von 20,30,40 auf 22,33, 44. 10 %. Oder es wäre auch toll, wenn es eine konstante Erhöhung gäbe, z. B. von 20,30, 40 auf 22, 32, 42. 2 konstant

Answer 1

VBA (Makro) kann Ihr Problem lösen:

Sub Setrowheight()

    Dim hgt As Variant
    Dim WorkRng As Range

    xTxt = ActiveWindow.RangeSelection.Address

    Set WorkRng = Application.InputBox("Please select the height range:", "Row Height", xTxt, , , , , 8)

For Each H In WorkRng
        If H.Value > 15 Then
            hgt = H.Value
            H.EntireRow.Select
            Selection.rowheight = hgt
        End If
    Next H
End Sub

---

---

Wie es funktioniert:

• Werte in entsprechende Zelle der Spalte A einfügen.
• EntwederRechtsklickKlicken Sie auf die Registerkarte „Tabelle“ und wählen Sie im eingeblendeten MenüCode anzeigenoder Drücken SieAlt+F11um einen VB-Editor zu erhalten.
• Oben links finden SieProjekt-Explorer, wähle ausRegisterkarte „Tabelle“DannRechtsklickund trafEinfügenDannModul.
• KopierenundPastedieser Code.
• LAUFENdas Makro.
• Wählen Sie „Bereich“ A12:A17, um zu antworten.Eingabefeld& Enden mitOK

Sie finden, dass die Höhe der entsprechenden Zeile mithilfe der Zellenwerte in festgelegt wurde A12:A17.

Achtung

• Bei der Standardzeilenhöhe handelt es sich 15.00daher um eingefügte Werte, bei denen A12:A17berücksichtigt wird, dass die Zeilenhöhe vergrößert oder verkleinert werden soll.

• Sie können die Zellbezüge nach Bedarf anpassen.