No Microsoft Excel,
Euquerofazeraalturadasprimeirastrêslinhasedasprimeirasquatrocolunas(12célulasnocantosuperioresquerdo)deformaqueessascélulassejamquadradas.Comoissopodeserfeito?
Surpreendentemente,oExceldiz:
Rowheight:15Columnwidth:8.43Então,essesnãoestãonamesmaescala.
Fazendoambos8.43medáisto:
Agora, o que devo fazer?
Mais uma maneira ... mude sua visão para o Layout da página. Isso altera a escala de grade para polegadas e, em seguida, você pode definir especificamente a altura e a largura para o mesmo valor (por exemplo, 25 polegadas). O layout da página da IMO é a melhor visualização padrão para trabalhar na aparência da planilha.
Veja um exemplo com as dimensões reais das duas visualizações:
Selecione tudo (ou as linhas / colunas que você precisa) e arraste para redimensionar para o tamanho desejado.
Feito!
A largura da coluna do Excel é medida pelo número de zeros (0) que podem caber na célula no estilo Normal. Para converter em pontos (como a altura da linha é medida), consulte
Se você não precisa ser exato, apenas olhe para ele. Se você precisa estar mais perto do que olhando, coloque um quadrado da barra de ferramentas Desenho na sua folha e dimensione-o. Se você quiser 10 x 10, use um código como este:
sheet1.Shapes(1).Height = 10
sheet1.Shapes(1).Width = 10
sheet1.Shapes(1).Top = sheet1.Shapes(1).TopLeftCell.Top
sheet1.Shapes(1).Left = sheet1.Shapes(1).TopLeftCell.Left
Depois, você pode dimensionar manualmente sua linha e coluna para ajustar-se ao quadrado e ler a altura e a largura de coluna.
O VBA parece um pouco exagerado para um resultado tão simples. Se você clicar e segurar quando for arrastar para alterar o tamanho da linha / colo, o tamanho em pixels será exibido entre colchetes. Essas unidades não são dimensionadas e, portanto, se você definir os tamanhos de linha e coluna para pixels iguais, eles serão quadrados. Claro, este é um processo manual ... mas você pode encontrar os tamanhos equivalentes e, em seguida, selecionar um intervalo de linhas / colunas e definir todos os seus tamanhos de uma só vez.
Aqui está uma solução do VBA.
Private Sub MakeSquareCells()
'// Create graph paper in Excel see http://www.erlandsendata.no/english/index.php?d=envbawssetrowcol if you want cm or inches
Set Cursheet = ActiveSheet
'don't drive the person crazy watching you work
UpdateScreen = Application.ScreenUpdating
Application.ScreenUpdating = False
With wksToHaveSquareCells
.Columns.ColumnWidth = 5 '// minimum 2, max 400 ; above 7 --> zoom doesn't work nice
.Rows.EntireRow.RowHeight = .Cells(1).Width
'// ActiveWindow.Zoom = true
End With
Application.ScreenUpdating = UpdateScreen
Cursheet.Activate '// Reactivate sheet that has been active at entrance of this subroutine
End Sub
Você precisa estar ciente de que o que é matematicamente um quadrado e o que é visualmente quadrado é diferente. Nem todos os monitores são feitos da mesma maneira. Normalmente, os pixels são mais largos do que altos.
Veja a seguinte imagem:
Cada subpixel vermelho, verde e azul compõe o pixel inteiro. Como você pode ver, a combinação dos 3 é mais larga que a altura de 1 subpixel. Na maioria dos casos, a diferença é sutil e a maioria das pessoas pode não perceber. No entanto, em alguns casos, as pessoas fazem.
Primeiro, selecione as células que você deseja redimensionar. Em seguida, na guia Home , acesse Cells box e clique na opção Format . Aqui você pode alterar as Row Height e Column Width das células selecionadas conforme desejar.
Se você quisesse fazer isso para a planilha inteira, você poderia usar esse truque - o que pode ser útil mesmo assim: clique na caixa à esquerda do cabeçalho da coluna A para selecionar todas as células; clique e arraste um dos divisores de cabeçalho da coluna para o tamanho desejado, observando o número de pixels para a largura da célula resultante (estou usando o Excel 2007, que mostra isso); faça o mesmo para um dos divisores de etiqueta de linha, correspondendo-o à largura da coluna por pixels. Isso deve fazer todas as células nas caixas de folha. O que, claro, não é o que você pediu, mas eu esperava que esse truque funcionasse com um subconjunto de células. Infelizmente isso não acontece.
Eu queria fazer uma grade quadrada perfeita para um projeto de costura e continuei recebendo todos os tipos de respostas estranhas para essa pergunta, então decidi brincar com ela para descobrir. Eu descobri que é impossível conseguir um quadrado perfeito, mas cheguei o mais perto que você pode conseguir, apenas uma lasca.
Usando uma régua, descobri que tinha apenas uma fração de 7 e 10 polegadas de comprimento. Espero que isso ajude.
Eu uso uma proporção de 5-1 / 3, altura da linha para largura da coluna.
Por exemplo, crie uma linha 53.33 alta e a largura da coluna 10, ou 106,66 e 20, respectivamente, e você estará perto o suficiente para o trabalho do governo.
Eu determinei que um quadrado pode ser feito com uma razão de altura de 7,25 linhas para cada 1,0 ponto de largura da coluna.
Na verdade, eu tive o mesmo problema no passado. O que funciona melhor para mim é o seguinte código VBA. Eu encontrei a relação linear apenas por tentativa e erro.
O código funciona para células individuais, mas também para uma seleção. Neste último caso, os quadrados são baseados na largura ou altura total da seleção.
Sub MakeCellSquareByColumn()
Selection.RowHeight = Selection.Width / Selection.Columns.Count
Selection.ColumnWidth = (((Selection.Width / Selection.Columns.Count) / 0.75 - 5) / 7)
End Sub
Sub MakeCellSquareByRow()
Selection.ColumnWidth = (((Selection.Height / Selection.Rows.Count) / 0.75 - 5) / 7)
Selection.RowHeight = Selection.Height / Selection.Rows.Count
End Sub
Você pode colocar essas macros em um módulo e atribuir botões a elas na barra de acesso rápido
Observe que os quadrados desaparecem (por uma largura de coluna variável) quando você altera o tipo ou o tamanho da fonte. Isso ocorre devido ao modo como o Excel calcula a largura da coluna. Consulte: link
Clique e arraste na borda entre as linhas. Para redimensionar mais de uma vez coluna / linha de cada vez, selecione todas elas, clique com o botão direito do mouse e clique em "Altura da linha ..." e defina-a na mesma altura das linhas.
Selecione as colunas (clique na coluna A, mantenha pressionada a tecla shift e clique na outra extremidade)
Clique com o botão direito do mouse em uma das colunas, clique em Largura da coluna e insira um novo valor.
Você pode fazer o mesmo com uma linha e clicar em Altura da linha para obter a altura de uma linha.
Isso faz o truque muito bem usando o VBA. Defina um rowHeight uniforme, em seguida, use a propriedade Width (retorna o tamanho da coluna em pontos) e divida RowHeight por ele para obter uma proporção de altura / largura sem unidade. Faça o novo ColumnWidth que vezes o ColumnWidth original para fazer tudo quadrado.
Sub makeSquares()
Cells.RowHeight = 20
With Cells(1, 1)
W = .ColumnWidth
HWratio = .RowHeight / .Width
Cells.ColumnWidth = W * HWratio
End With
End Sub
Se você quiser criar linha & coluna parece quadrado, por favor, selecione todas as células que você deseja fazer quadrado e alterar a altura da linha para 28,8 E alterar a largura da coluna para 4,56.
Excel 2010 Ajustar na exibição de layout de página e alternar de volta para a exibição normal não funciona. Eu consegui validar usando as ferramentas de desenho e criando um quadrado perfeito na visualização Normal. Este é o método mais fácil de fazer quadrados em qualquer tamanho.
Largura da coluna = 2,71 Altura da Fileira = 18.
Uma solução simples