Как установить размер ячейки в см (сантиметрах) в Excel?
На листе предварительно установлены единицы измерения высоты строки и ширины столбца по умолчанию, ширина столбца по умолчанию составляет 8.38 символа, а высота строки по умолчанию - 12.75 пункта. А в Excel вам сложно установить высоту строки или ширину столбца в дюймах или сантиметрах. Но иногда вам нужно для какой-то цели изменить высоту и ширину на сантиметры. Как бы вы могли решить эту проблему?
Установите размер ячейки в см (сантиметрах) с помощью кода VBA
Установите размер ячейки в см (сантиметрах) с помощью Kutools for Excel
Установите размер ячейки в см (сантиметрах) с помощью кода VBA
Вы не можете установить высоту и ширину в сантиметрах с помощью функций Excel, за исключением использования кода VBA. Приведенные ниже два кода могут помочь вам установить ширину столбца и высоту строки. Сделайте следующее:
1. Выберите ячейки, которые вы хотите установить в сантиметрах.
2. Нажмите Застройщик > Визуальный Бейсик, Новый Microsoft Visual Basic для приложений появится окно, щелкните Вставить > Модули, и введите в модуль следующий код:
Код для установки высоты строки в сантиметрах:
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 Sub3. Затем нажмите 
кнопку для выполнения кода. Появится окно с подсказкой, в котором вам будет предложено ввести значение высоты строки. Смотрите скриншот:
Внимание: введенное вами число должно быть меньше 15. И этот код VBA не изменит высоту строки, если вы введете 0 в этом диалоговом окне.
4. Нажмите OK. Высота ряда выбранных ячеек установлена равной 2 сантиметрам. Смотрите скриншот:
 |
 |
 |
Если вы хотите также установить ширину столбца в сантиметрах, вы можете ввести следующий код:
Код для установки ширины столбца в сантиметрах:
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 Установите размер ячейки в см (сантиметрах) с помощью Kutools for Excel
С помощью приведенных выше кодов вы можете установить размер ячейки только в сантиметрах, сегодня я представлю вам многофункциональный инструмент, Kutools for Excel который может не только устанавливать размер ячейки в сантиметрах, но также в дюймах, фунтах и пикселях.
| Kutools for Excel, с более чем 300 удобные функции, облегчающие вашу работу. | ||
После установки Kutools for Excel, сделайте следующее:（Бесплатная загрузка Kutools for Excel прямо сейчас!)
1. Выделите ячейки, которые вы хотите установить в сантиметрах.
2. Нажмите Kutools > Format > Adjust Cell Size, см. снимок экрана:
3. в Adjust Cell Size диалогового окна, выберите Unit type вам нужно и укажите Row height и Column width от Set values раздел. Смотрите скриншот:
4. Затем нажмите OK or Применить. Вы получите ячейки с высотой строки 2 см и шириной столбца 3 см.
Установите размер ячейки в см (сантиметрах) с помощью Kutools for Excel
| Kutools for Excel: 300 + функций, которые вы должны иметь в Excel, 30-дневная бесплатная пробная версия отсюда. |
Статьи по теме:
Установить ширину столбца и высоту строки для диапазона
Как возвести в квадрат несколько ячеек в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
