Como aumentar a altura de múltiplas células por porcentagem no Microsoft Excel

Question

Tenho uma mesa com diferentes alturas verticais como 20, 30 e 40. As alturas são organizadas por autofit. O problema é que as células estão muito próximas umas das outras. Quero dar um espaço na parte superior e inferior. Tentei o alinhamento vertical, mas não consegui adicionar um espaço entre as células. Seria ótimo se houvesse um aumento percentual de múltiplas células como de 20,30,40 para 22,33, 44. 10% Ou também seria ótimo se houvesse um aumento constante como de 20,30, 40 para 22 , 32, 42. 2 constante

Answer 1

VBA (Macro) pode resolver seu problema:

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

---

---

Como funciona:

• Insira valores na célula apropriada da Col A.
• QualquerClique com o botão direitoa guia Planilha e no menu exibido, cliqueVer códigoou pressioneAlt+F11para obter o editor VB.
• No canto superior esquerdo, encontreExplorador de projetos, selecione osGuia FolhaentãoClique com o botão direitoe bateuInserirentãoMódulo.
• cópia de&Colareste código.
• CORRERa Macro.
• Selecione Intervalo A12:A17para responder aoCaixa de entrada& terminar comOK

Você descobre que a altura da linha correspondente foi definida usando os valores da célula em A12:A17.

Observação

• A altura da linha padrão é, 15.00portanto, inserir valores A12:A17considerando isso para aumentar ou mesmo diminuir a altura da linha.

• Você pode ajustar as referências das células conforme necessário.