Microsoft Excel で複数のセルの高さをパーセンテージで増やす方法

Question

20、30、40 のように異なる垂直高さのテーブルがあります。高さは自動調整で調整されます。問題は、セルが互いに非常に近いことです。上部と下部にスペースを入れたいのですが、垂直方向の配置を試しましたが、セル間にスペースを追加できませんでした。20、30、40 から 22、33、44 のように複数のセルのパーセンテージが 10% 増加すると便利です。または、20、30、40 から 22、32、42 のように一定の増加があると便利です。2 定数

Answer 1

VBA (マクロ) で問題を解決できます:

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

---

---

使い方：

• 列 A の適切なセルに値を挿入します。
• どちらか右クリックシートタブをクリックし、ポップアップメニューからコードを表示または押すAlt+F11VB エディターを入手します。
• 左上にプロジェクトエクスプローラー、 を選択シートタブそれから右クリックそしてヒット入れるそれからモジュール。
• コピー＆ペーストこのコード。
• 走るマクロ。
• 範囲を選択してA12:A17応答する入力ボックス& 終了わかりました

対応する行の高さは、セルの値を使用して設定されていることがわかりますA12:A17。

注意

• 標準の行の高さは、行の高さを増減することを考慮し15.00て値を挿入します。A12:A17

• 必要に応じてセル参照を調整できます。