Como definir o tamanho da célula em cm (centímetros) no Excel?
Em uma planilha, as unidades padrão para a altura da linha e largura da coluna são pré-configuradas, sendo a largura padrão da coluna de 8,38 caracteres e a altura padrão da linha de 12,75 pontos. No Excel, é difícil definir a altura da linha ou a largura da coluna em polegadas ou centímetros. No entanto, às vezes você precisa alterar a altura e a largura para centímetros para algum propósito específico. Como resolver esse problema?
Definir o tamanho da célula em cm (centímetros) com código VBA
Definir o tamanho da célula em cm (centímetros) com Kutools para Excel
Definir o tamanho da célula em cm (centímetros) com código VBA
Você não pode definir a altura e a largura em centímetros com as funções do Excel, exceto usando código VBA. Os dois códigos abaixo podem ajudá-lo a definir a largura da coluna e a altura da linha. Siga os passos abaixo:
1. Selecione as células que deseja definir em centímetros.
2. Clique em Desenvolvedor > Visual Basic, uma nova janela Microsoft Visual Basic for Applications será exibida, clique em Inserir > Módulo e insira o seguinte código no Módulo:
Código para definir a altura da linha em centímetros:
Sub RowHeightInCentimeters()
Dim cm As Single
cm = Application.InputBox("Enter Row Height in Centimeters", _
"Row Height (cm)", Type:=1)
If cm Then
Selection.RowHeight = Application.CentimetersToPoints(cm)
End If
End Sub
3. Em seguida, clique para executar o código. Uma caixa de diálogo será exibida solicitando que você insira um valor para a altura da linha. Veja a captura de tela:
Observação: o número inserido deve ser menor que 15. E este código VBA não alterará a altura da linha se você inserir 0 nesta caixa de diálogo.
4. Clique em OK. A altura da linha das células selecionadas foi definida como 2 centímetros. Veja a captura de tela:
![]() | ![]() | ![]() |
Se você também quiser definir a largura da coluna em centímetros, pode inserir o seguinte código:
Código para definir a largura da coluna em centímetros:
Sub ColumnWidthInCentimeters()
Dim cm As Single, points As Integer, savewidth As Integer
Dim lowerwidth As Integer, upwidth As Integer, curwidth As Integer
Dim Count As Integer
Application.ScreenUpdating = False
cm = Application.InputBox("Enter Column Width in Centimeters", _
"Column Width (cm)", Type:=1)
If cm = False Then Exit Sub
points = Application.CentimetersToPoints(cm)
savewidth = ActiveCell.ColumnWidth
ActiveCell.ColumnWidth = 255
If points > ActiveCell.Width Then
MsgBox "Width of " & cm & " is too large." & Chr(10) & _
"The maximum value is " & _
Format(ActiveCell.Width / 28.3464566929134, _
"0.00"), vbOKOnly + vbExclamation, "Width Error"
ActiveCell.ColumnWidth = savewidth
Exit Sub
End If
lowerwidth = 0
upwidth = 255
ActiveCell.ColumnWidth = 127.5
curwidth = ActiveCell.ColumnWidth
Count = 0
While (ActiveCell.Width <> points) And (Count < 20)
If ActiveCell.Width < points Then
lowerwidth = curwidth
Selection.ColumnWidth = (curwidth + upwidth) / 2
Else
upwidth = curwidth
Selection.ColumnWidth = (curwidth + lowerwidth) / 2
End If
curwidth = ActiveCell.ColumnWidth
Count = Count + 1
Wend
End Sub
Definir o tamanho da célula em cm (centímetros) com Kutools para Excel
Com os códigos acima, você só pode definir o tamanho da célula em centímetros. Hoje, vou apresentar uma ferramenta multifuncional, Kutools para Excel, que não apenas define o tamanho da célula em centímetros, mas também em polegadas, libras e pixels.
Após instalar o Kutools para Excel, siga os passos abaixo:(Baixe Grátis o Kutools para Excel Agora!)
1. Destaque as células que deseja definir em centímetros.
2. Clique em Kutools > Formatar > Ajustar Tamanho da Célula, veja a captura de tela:
3. Na caixa de diálogo Ajustar Tamanho da Célula, escolha o Tipo de Unidade necessário e especifique a Altura da Linha e Largura da Coluna na seção Definir Valores . Veja a captura de tela:
4. Em seguida, clique em OK ou Aplicar. Você obterá células com 2 cm de altura da linha e 3 cm de largura da coluna.
Demonstração: Definir o tamanho da célula em cm (centímetros) com Kutools para Excel
Artigos relacionados:
Definir largura da coluna e altura da linha para um intervalo
Como quadrar várias células no Excel?
Melhores Ferramentas de Produtividade para Office
Potencialize suas habilidades no Excel com o Kutools para Excel e experimente uma eficiência sem igual. O Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
O Office Tab traz interface com abas para o Office e facilita muito o seu trabalho
- Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas abas na mesma janela, em vez de abrir novas janelas.
- Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!