Microsoft Excel에서
이 셀이 정사각형이되도록 처음 3 행과 처음 4 열 (왼쪽 상단 모서리에 12 셀)의 높이를 만들고 싶습니다. 이것을 어떻게 할 수 있습니까?
놀랍게도 Excel은 다음과 같이 말합니다.
Row height: 15
Column width: 8.43
따라서 이것들은 같은 규모가 아닙니다.
둘 다 8.43으로 만들면 다음과 같이됩니다.
이제 어떻게해야합니까?
Microsoft Excel에서
이 셀이 정사각형이되도록 처음 3 행과 처음 4 열 (왼쪽 상단 모서리에 12 셀)의 높이를 만들고 싶습니다. 이것을 어떻게 할 수 있습니까?
놀랍게도 Excel은 다음과 같이 말합니다.
Row height: 15
Column width: 8.43
따라서 이것들은 같은 규모가 아닙니다.
둘 다 8.43으로 만들면 다음과 같이됩니다.
이제 어떻게해야합니까?
답변:
한 가지 더 방법은 ...보기를 페이지 레이아웃으로 변경하십시오. 그리드 눈금을 인치로 변경 한 다음 높이와 너비를 모두 같은 값 (예 : 25 인치)으로 설정할 수 있습니다. IMO 페이지 레이아웃은 스프레드 시트 모양 작업을위한 최상의 표준보기입니다.
다음은 두보기의 실제 크기가 포함 된 예입니다.
모두 (또는 필요한 행 / 열)를 선택한 다음 드래그하여 원하는 크기로 조정하십시오.
끝난!
Excel의 열 너비는 일반 스타일의 셀에 맞는 0의 수로 측정됩니다. 포인트로 변환하려면 (행 높이 측정 방법)
http://www.dailydoseofexcel.com/archives/2004/06/01/column-widths-in-points/
정확하지 않아도되는 경우에는 시선을 사로 잡으십시오. 시선보다 가까이 있어야하는 경우 시트의 그리기 도구 모음에서 사각형을 배치하고 크기를 조정하십시오. 10 x 10을 원하면 다음과 같은 코드를 사용하십시오.
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
그런 다음 정사각형에 맞게 행과 열의 크기를 수동으로 조정하고 높이와 열 너비를 읽을 수 있습니다.
em
것이 더 합리적입니다.
전체 시트에 대해 원하는 경우이 트릭을 사용할 수 있습니다. 어쨌든 도움이 될 수 있습니다. 열 머리글 A 왼쪽의 상자를 클릭하여 모든 셀을 선택하십시오. 클릭하고 열 머리글 구분선 중 하나를 원하는 크기로 드래그하여 결과 셀 너비의 픽셀 수를 기록하십시오 (이는 Excel 2007을 사용하고 있습니다). 행 너비 구분선 중 하나에 대해서도 동일한 작업을 수행하고이를 열 너비 (픽셀 단위)와 일치시킵니다. 시트 상자의 모든 셀을 만들어야합니다. 물론 어떤 것이 당신이 요구 한 것이 아니지만,이 트릭이 셀의 하위 세트와 함께 작동하기를 바랍니다. 불행히도 그렇지 않습니다.
열 너비 1.0 포인트마다 7.25 행 높이의 비율로 사각형을 만들 수 있다고 결정했습니다.
.ColumnWidth = .RowHeight / 7
단순히 비율을 사용한다는 생각에 +1입니다.
사실, 나는 과거에 같은 문제가있었습니다. 나에게 가장 효과적인 것은 다음 VBA 코드입니다. 나는 시행 착오로 선형 관계를 발견했습니다.
이 코드는 단일 셀뿐만 아니라 선택에도 작동합니다. 후자의 경우, 제곱은 총 선택 폭 또는 높이를 기준으로합니다.
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
이 매크로를 모듈에 넣고 빠른 액세스 도구 모음에서 매크로를 지정할 수 있습니다
글꼴 유형이나 크기를 변경하면 사각형이 열 너비를 변경하여 사라집니다. 이것은 Excel에서 열 너비를 계산하는 방식 때문입니다. 참조 : https://support.microsoft.com/en-us/help/214123/description-of-how-column-widths-are-determined-in-excel
다음 코드는 나를 위해 일했습니다.
Sub Grid_Squares()
With Cells(1, 1)
Cells.RowHeight = .Width
Cells.ColumnWidth = .ColumnWidth
End With
End Sub
다음은 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
wksToHaveSquareCells
?
먼저 크기를 조정할 셀을 선택하십시오. 그런 다음 Home
탭에서 Cells
상자 로 이동하여 Format
옵션을 클릭하십시오 . 여기에서 원하는대로 Row Height
및 Column Width
선택한 셀을 변경할 수 있습니다 .
나는 바느질 프로젝트를위한 완벽한 정사각형 그리드를 만들고 싶었고이 질문에 대한 모든 종류의 이상한 대답을 계속 얻었습니다. 그래서 나는 그것을 알아 내기 위해 스스로 놀고하기로 결정했습니다. 나는 완벽한 사각형을 얻는 것이 불가능하다는 것을 알았지 만, 가능한 한 가깝게, 은색을 벗었습니다.
통치자를 사용하여 나는 길이가 7 인치와 10 인치에 불과하다는 것을 알았습니다. 도움이 되었기를 바랍니다.
5-1 / 3, 행 높이 대 열 너비의 비율을 사용합니다.
예를 들어, 행 53.33을 높이, 열 너비 10 또는 106.66 및 20을 각각 작성하면 정부 작업에 충분히 가까워집니다.
.ColumnWidth = .RowHeight / 7
단순히 비율을 사용한다는 생각에 +1입니다.
나는 이것이 가장 간단한 해결책이라고 생각합니다 ...
이 방법은 Excel 눈금자를 사용하므로보다 이해하기 쉽고보다 정확한 행 및 열 차원입니다.
그게 다야. 결과적으로 시각적으로 완벽한 사각형으로 나타납니다. Excel 옵션의 고급 탭에있는 디스플레이 그룹 내에서 측정 단위를 변경하는 옵션도 있습니다. 이것이 가장 도움이되기를 바랍니다! :)
Excel 2010 페이지 레이아웃보기에서 조정 한 다음 다시 표준보기로 전환하면 작동하지 않습니다. 그리기 도구를 사용하고 일반보기에서 완벽한 사각형을 만들어 유효성을 검사 할 수있었습니다. 이것은 크기를 정사각형으로 만드는 가장 쉬운 방법입니다.
열 너비 = 2.71 행 높이 = 18.
이것은 VBA를 사용하여 깔끔하게 트릭을 수행합니다. 균일을 설정 한 rowHeight
다음 Width
속성 을 사용하고 (열 크기를 포인트로 반환) RowHeight
단위가없는 높이 / 너비 비율을 얻습니다. 모든 것을 정사각형으로 만들기 위해 ColumnWidth
원본보다 새로운 것을 만드십시오 ColumnWidth
.
Sub makeSquares()
Cells.RowHeight = 20
With Cells(1, 1)
W = .ColumnWidth
HWratio = .RowHeight / .Width
Cells.ColumnWidth = W * HWratio
End With
End Sub