Еще один способ… изменить вид на “Макет страницы”. При этом изменяется шкала сетки на дюймы, а затем вы можете специально установить одинаковую высоту и ширину (например, 25 дюймов). Макет страницы IMO является лучшим стандартным видом для работы над внешним видом электронной таблицы.

Вот пример с фактическими размерами для обоих видов:

Выберите все (или нужные вам строки/коллы), затем перетащите их в нужный размер.

1. Перетащите край заголовка колонки, чтобы изменить размер ширины колонки. Появится всплывающая подсказка с точным количеством пикселей.
2. Запомните значение пикселей!
3. Перетащите край заголовка строки, чтобы изменить высоту строки, это работает точно так же.
4. Перетащите на то же самое значение пиксела.

Готово!

Ширина столбца Excel измеряется количеством нулей (0), которые могут поместиться в ячейку в Нормальном стиле. Для преобразования в точки (как измеряется высота строки) см. http://www.dailydoseofexcel.com/archives/2004/06/01/column-widths-in-points/

Если не нужно быть точным, просто посмотрите на это. Если вам нужно быть ближе, чем глазное яблоко, положите на лист квадрат из панели инструментов Рисование и задайте его размер. Если вы хотите, чтобы он был 10 х 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

Тогда вы можете вручную задать размер вашей строки и столбца, чтобы соответствовать квадрату и прочитать высоту и ширину столбца.

VBA, кажется, немного переборщила с таким простым исходом… Если вы нажмете и удержите, когда будете перетаскивать, чтобы изменить размер строки/столбца, размер в пикселях будет показан в скобках. Эти единицы не масштабируются, и, таким образом, если вы установите размеры строки и столбца равными пикселям, они будут квадратными. Конечно, это ручной процесс… но вы можете найти эквивалентные размеры, а затем выбрать диапазон строк/столбцов и задать все их размеры сразу.

Следующий код работал для меня

Sub Grid_Squares()
    With Cells(1, 1)
        Cells.RowHeight = .Width
        Cells.ColumnWidth = .ColumnWidth
    End With
End Sub

Результат:

Вы должны знать, что то, что математически является квадратом, а что визуально - квадратом, отличается. Не все мониторы сделаны одинаково. Обычно пиксели шире, чем высокие.

Посмотрите на следующую картинку:

Каждый красный, зеленый и синий субпиксель составляет весь пиксель. Как видите, комбинация 3 шире, чем высота 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

Я определил, что квадрат можно сделать с соотношением 7,25 высоты ряда на каждые 1,0 точки ширины колонны.

Если вы хотите сделать это для всего листа, вы можете использовать этот трюк - который может быть полезен в любом случае: щелкните по ячейке слева от заголовка колонки A, чтобы выделить все ячейки; щелкните и перетащите один из делителей заголовков колонки на нужный вам размер, отмечая количество пикселей для полученной ширины ячейки (я использую Excel 2007, который показывает это); сделайте то же самое для одного из делителей меток строк, сопоставляя его с шириной колонки по пикселям. Это должно сделать все ячейки в ячейках листа. Это, конечно, не то, что вы просили, но я надеялся, что этот трюк сработает с подмножеством ячеек. К сожалению, это не так.

Вот решение 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
```.

Я использую соотношение 5-1/3, высота ряда к ширине колонны.

Например, сделайте ряд высотой 53,33, а ширину колонны 10, или 106,66 и 20, соответственно, и вы будете достаточно близко для работы в правительстве.

Сначала выберите ячейки, которые нужно изменить размер. Затем на вкладке Home перейдите в поле Cells и нажмите на опцию Format. Здесь вы можете изменить Row Height и Column Width выбранных ячеек по своему усмотрению.

Я считаю, что это самое простое решение…

Этот метод использует линейку Excel, таким образом, более понятные/более легкие и точные размеры строк и столбцов.

• Выберите View на ленте
• В просмотрах рабочей книги выберите Page Layout
• Если линейка не отображается, установите флажок Ruler (Линейка) в группе “Показать”.
• Нажмите кнопку Select All (Выбрать все) (верхний левый угол под именной книгой)
• Щелкните правой кнопкой мыши строку, выберите опцию регулировки размера, а затем введите желаемое значение измерения. Щелкните правой кнопкой мыши & повторите для столбца

Это действительно так. В результате получится то, что будет выглядеть как визуально идеальные квадраты. Есть даже возможность изменить единицы измерения в группе “Дисплей” на вкладке “Дополнительно” в разделе “Параметры Excel”. Надеюсь, это будет очень полезно! :)

Я хотел сделать идеальную квадратную сетку для швейного проекта и продолжал получать всевозможные странные ответы на этот вопрос, поэтому решил поиграть с ней сам, чтобы разобраться. Я обнаружил, что невозможно получить идеальный квадрат, но я подошел так близко, как только можно.

1. Выделите квадраты, которые хотите отформатировать.
2. Перейдите на вкладку “Форматирование”.
3. Отформатируйте ширину колонки на 12.43
4. Затем отформатируйте высоту ячейки до 75.00.

Используя найденную мной линейку, я был всего лишь дробью на 7 и 10 дюймов в длину. Надеюсь, это поможет.

Это делает трюк довольно аккуратно, используя VBA. Установите uniform 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

Нажмите и перетащите границу между строками. Чтобы изменить размер нескольких столбцов/строк одновременно, выделите их все, кликните правой кнопкой мыши на “Row Height…” (Высота строк…) и установите ее на ту же высоту, что и ширину строк.

Простое решение

• выберите все ячейки
• перетащите столбцы на нужный размер пикселей (при перетаскивании и изменении размера столбцов вы увидите размер столбцов и в точках, и в пикселях)
• повторите для строк (выбирая одинаковое количество пикселей)
• это должно дать вам ячейки идеального квадратного размера по всему рабочему листу.

Excel 2010 Настройка в режиме просмотра макета страницы с последующим переключением обратно в режим “Нормальный” не работает. Я смог подтвердить это с помощью инструментов рисования и сделать идеальный квадрат в представлении “Нормальный”. Это самый простой способ сделать квадрат любого размера.

Ширина столбца = 2.71 Высота строки = 18.

• Выберите All - Ctrl+A
• Щелкните правой кнопкой мыши по любому заголовку колонки и выберите Column width
• Введите значение = 4 > Ok
• Там вы увидите все ячейки в идеальной квадратной форме.

• Выберите столбцы (нажмите на столбец A, затем удерживайте сдвиг и нажмите на другой конец)

• щелкните правой кнопкой мыши на один из столбцов, нажмите кнопку Ширина столбца, а затем введите новое значение.

• Вы можете сделать то же самое со строкой, а затем нажмите кнопку Row Height, чтобы получить высоту строки.

Если вы хотите, чтобы строка и столбец выглядели квадратными, пожалуйста, выберите все ячейки, которые вы хотите сделать квадратными, и измените высоту строки на 28,8 И измените ширину столбца на 4,56.