Размеры фигур с ячеек в excel

 

Цитата: MickMick от 26.03.2008, 16:29
Можно ли сделать так, чтобы размеры прямоугольника изменялись сразу после ввода числа в ячейку?

Добавь в модуль листа (ПКМ по ярлычку листа -> Исходный текст) следующий код:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Application.Run "КнигаШпецаДокапыча!UprPryam_SHpetsStyle"
End Sub

Цитата: MickMick от 26.03.2008, 16:29
Возможно ли, чтобы заливкой прямоугольника был или цвет, или рисунок из файла?

Добавь ещё одну строчку, перед строкой Select Case …:

If Range("C2").Value Like "*.jpg" Then s.Fill.UserPicture Range("C2").Value Else s.Fill.Solid
Теперь указав в ячейке C2 полный путь к картинке в виде, например, «C:mylovefas.jpg» (без кавычек, jpg — строчными буквами), получаем требуемый результат.

MickMick, ты правильно решил управлять фигурами

Excel

посредством значений ячеек — это много удобнее, чем подгонять настройки мышкой. Дам тебе пару советов:

Совет №1:
Кроме способов заливки у автофигур есть множество других полезных свойств. Чтобы понять, как их запросто воткнуть в свой код, сделай следующее: включи макрорекордер, поменяй у фигуры какой-нибудь формат, выдели яч.»<любую>«, поменяй формат обратно, жми Alt+F11 и сравни два одинаковых столбика свойств: там, где значение менялось — и будет твоим параметром, которым ты потом можешь оперировать.

Совет №2:
Чтобы увидеть сразу все свойства и параметры свой автофигуры сделаем так:

Sub OkoSHpetsStyle()
   Set SH = ActiveSheet.Shapes("Прямоуг. 1")
End Sub
Не торопись его запускать на выполнение, он у нас для другого:

• вставляем этот код в обычный модуль VBA;
• отображаем окно View -> Locals Window;
• три раза жмём F8 (курсор ввода должен находиться внутри кода);
• в окне Locals появился плюсик рядом с SH, разворачиваем и видим ВСЁ, чем можно управлять с помощью VBA.

Резюмируя вышесказанное, делаем вывод, что, овладев нехитрыми приёмами программного (вместо мышиного) управления форматом автофигур, мы имеем возможность легко вертеть ими как вздумается. Один прямоугольничек, потом два. Человеку всегда хочется большего.

PS: Если для тебя имеет место точность размеров фигур на печати или ради любопытства – измерь линейкой что напечаталось и сравни с указанными размерами в Excel

И на десерт, в приложенном файле, пример на

схеме Аксёнова

. Технология та же: макрoс по моей таблице значений строит вышеназванный бланк, состоящий почти из ПОЛУТЫСЯЧИ автофигур 

Как автоматически изменить размер формы на основе / в зависимости от указанного значения ячейки в Excel?

Если вы хотите автоматически изменять размер фигуры на основе значения указанной ячейки, эта статья может вам помочь.

Автоматическое изменение размера формы на основе указанного значения ячейки с кодом VBA

---

Автоматическое изменение размера формы на основе указанного значения ячейки с кодом VBA

Следующий код VBA может помочь вам изменить определенный размер фигуры на основе указанного значения ячейки в текущем листе. Пожалуйста, сделайте следующее.

1. Щелкните правой кнопкой мыши вкладку листа с фигурой, размер которой нужно изменить, а затем щелкните Просмотреть код из контекстного меню.

2. в Microsoft Visual Basic для приложений окна, скопируйте и вставьте следующий код VBA в окно кода.

Код VBA: автоматическое изменение размера формы на основе указанного значения ячейки в Excel

Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    If Target.Row = 2 And Target.Column = 1 Then
        Call SizeCircle("Oval 2", Val(Target.Value))
    End If
End Sub
Sub SizeCircle(Name As String, Diameter)
    Dim xCenterX As Single
    Dim xCenterY As Single
    Dim xCircle As Shape
    Dim xDiameter As Single
    On Error GoTo ExitSub
    xDiameter = Diameter
    If xDiameter > 10 Then xDiameter = 10
    If xDiameter < 1 Then xDiameter = 1
    Set xCircle = ActiveSheet.Shapes(Name)
    With xCircle
        xCenterX = .Left + (.Width / 2)
        xCenterY = .Top + (.Height / 2)
        .Width = Application.CentimetersToPoints(xDiameter)
        .Height = Application.CentimetersToPoints(xDiameter)
        .Left = xCenterX - (.Width / 2)
        .Top = xCenterY - (.Height / 2)
    End With
ExitSub:
End Sub

Внимание: В коде «Овал 2»- это имя формы, размер которой вы измените. И Ряд = 2, Столбец = 1 означает, что размер формы «Овал 2» будет изменен на значение в A2. Пожалуйста, измените их по своему усмотрению.

Для автоматического изменения размера нескольких фигур на основе разных значений ячеек примените приведенный ниже код VBA.

Код VBA: автоматическое изменение размера нескольких фигур на основе значения разных указанных ячеек в Excel

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim xAddress As String
    On Error Resume Next
    If Target.CountLarge = 1 Then
        xAddress = Target.Address(0, 0)
        If xAddress = "A1" Then
            Call SizeCircle("Oval 1", Val(Target.Value))
        ElseIf xAddress = "A2" Then
            Call SizeCircle("Smiley Face 3", Val(Target.Value))
        ElseIf xAddress = "A3" Then
            Call SizeCircle("Heart 2", Val(Target.Value))
        End If
    End If
End Sub

Sub SizeCircle(Name As String, Diameter)
    Dim xCenterX As Single
    Dim xCenterY As Single
    Dim xCircle As Shape
    Dim xDiameter As Single
    On Error GoTo ExitSub
    xDiameter = Diameter
    If xDiameter > 10 Then xDiameter = 10
    If xDiameter < 1 Then xDiameter = 1
    Set xCircle = ActiveSheet.Shapes(Name)
    With xCircle
        xCenterX = .Left + (.Width / 2)
        xCenterY = .Top + (.Height / 2)
        .Width = Application.CentimetersToPoints(xDiameter)
        .Height = Application.CentimetersToPoints(xDiameter)
        .Left = xCenterX - (.Width / 2)
        .Top = xCenterY - (.Height / 2)
    End With
ExitSub:
End Sub

Ноты:

3. Нажмите другой + Q клавиши одновременно, чтобы закрыть Microsoft Visual Basic для приложений окно.

С этого момента, когда вы меняете значение в ячейке A2, размер овала 2 формы будет изменен автоматически. Смотрите скриншот:

Или измените значения в ячейках A1, A2 и A3, чтобы автоматически изменить размеры соответствующих форм «Овал 1», «Смайлик 3» и «Сердце 3». Смотрите скриншот:

Внимание: Размер фигуры больше не будет изменяться, если значение ячейки больше 10.

---

---

Статьи по теме:

• Как добавить указатель мыши к определенной форме в Excel?
• Как заполнить фигуру прозрачным цветом фона в Excel?
• Как скрыть или показать определенную фигуру на основе указанного значения ячейки в Excel?

При размещении фигуры (или рисунка) на листе EXCEL, например прямоугольника, часто необходимо выровнять ее по границам ячеек. Ускорить этот процесс помогает клавиша

ALT

.

Предположим, что фигуру Прямоугольник нужно расположить точно над ячейками

B

2:

D

6

. Для этого необходимо:

• выбрать фигуру-прямоугольник через меню

  ;

• подвести курсор поближе к верхнему левому углу ячейки
  
  B
  
  2
  
  ;
• нажать и удерживать клавишу
  
  ALT
  
  ;
• нажать левую кнопку мыши;
• подвести курсор к правому нижнему углу ячейки
  
  D
  
  6
  
  ;
• отпустить клавишу мыши и
  
  ALT
  
  .

Фигура должна точно «накрыть» ячейки

B

2:

D

6

.

При перемещении фигуры также можно воспользоваться клавишей

ALT

: фигура будет «прилипать» к близлежащим границам ячеек (наподобие, как это делает проигрыватель

WinAmp

к границе экрана).

Эти же идеи применимы и в случае перемещения рисунков (см. меню

).

Работа с фигурами в VBA Excel: создание фигур методом Shapes.AddShape, типы фигур (MsoAutoShapeType), обращение к фигурам и изменение их свойств. Примеры.

Объекты для работы с фигурами

Фигуры в VBA Excel представлены тремя объектами:

Объект	Описание
Shapes	Коллекция всех фигур на рабочем листе. Используется для создания новых фигур, для обращения к одной фигуре по имени и для перебора фигур циклом.
ShapeRange	Коллекция нескольких фигур, аргументом которой является массив имен выбранных объектов. Используется для редактирования сразу всех фигур, входящих в эту коллекцию.
Shape	Объект, представляющий одну фигуру. Используется для редактирования одной этой фигуры.

Фигуры в VBA Excel создаются методом Shapes.AddShape.

Синтаксис метода AddShape

Shapes.AddShape (Type, Left, Top, Width, Height)

Shapes — выражение, возвращающее коллекцию фигур на рабочем листе, например: ActiveSheet.Shapes.

Параметры метода AddShape

Параметр	Описание
Type	Константа из коллекции MsoAutoShapeType, определяющая тип создаваемой фигуры.
Left	Расстояние от левой границы фигуры до левой границы табличной части рабочего листа в пунктах.. Тип данных — Single.
Top	Расстояние от верхней границы фигуры до верхней границы табличной части рабочего листа в пунктах.. Тип данных — Single.
Width	Ширина фигуры по внешним границам в пунктах.
Height	Высота фигуры по внешним границам в пунктах.

Все параметры метода Shapes.AddShape являются обязательными.

Константы MsoAutoShapeType

Константы коллекции MsoAutoShapeType, определяющие основные типы создаваемых фигур:

Константа	Значение	Тип фигуры
msoShapeRectangle	1	Прямоугольник
msoShapeParallelogram	2	Параллелограмм
msoShapeTrapezoid	3	Трапеция
msoShapeDiamond	4	Ромб
msoShapeRoundedRectangle	5	Прямоугольник: скругленные углы
msoShapeOctagon	6	Восьмиугольник (октаэдр)
msoShapeIsoscelesTriangle	7	Равнобедренный треугольник
msoShapeRightTriangle	8	Прямоугольный треугольник
msoShapeOval	9	Овал
msoShapeHexagon	10	Шестиугольник (гексаэдр)
msoShapeCross	11	Крест
msoShapeRegularPentagon	12	Пятиугольник (пентаэдр)
msoShapeCan	13	Цилиндр
msoShapeCube	14	Куб
msoShapeDonut	18	Круг: прозрачная заливка (кольцо)
msoShapeLightningBolt	22	Молния
msoShapeSun	23	Солнце
msoShapeMoon	24	Месяц (луна)
msoShape5pointStar	92	Звезда: 5 точек (пятиконечная)
msoShapeCloud	179	Облако

Все доступные константы из коллекции MsoAutoShapeType смотрите на сайте разработчиков.

Создание объекта ShapeRange

Создание коллекции ShapeRange из выбранных фигур:

Dim myShapeRange As ShapeRange Set myShapeRange = ActiveSheet.Shapes.Range(Array(«Пятиугольник 140», «Солнце 141», «Облако 144»))

Объектная переменная myShapeRange не обязательна, можно обратиться непосредственно к возвращенной коллекции, например, присвоив всем ее элементам синий цвет:

ActiveSheet.Shapes.Range(Array(«Пятиугольник 140», «Солнце 141», «Облако 144»)).Fill.ForeColor.RGB = vbBlue

Примеры работы с фигурами

Пример 1

Создание пяти разных фигур из кода VBA Excel методом Shapes.AddShape:

Sub Primer1()     With ActiveSheet.Shapes         ‘При создании фигуры без присвоения ее переменной скобки не нужны         .AddShape msoShapeCube, 30, 40, 72, 72         .AddShape msoShapeIsoscelesTriangle, 130, 40, 72, 72         .AddShape msoShapeSun, 230, 40, 72, 72         .AddShape msoShapeLightningBolt, 330, 40, 72, 72         ‘Чтобы выбрать фигуру, параметры необходимо заключить в скобки         .AddShape(msoShapeCloud, 430, 40, 72, 72).Select     End With End Sub

Результат работы кода:

Пример 2

Работа с одной фигурой:

Sub Primer2() Dim myShape As Shape ‘Создаем фигуру «Месяц» и присваивает ссылку на нее переменной myShape Set myShape = ActiveSheet.Shapes.AddShape(msoShapeMoon, 50, 50, 80, 80)     With myShape         ‘Меняем высоту и ширину фигуры         .Height = 150         .Width = 100         ‘Меняем цвет фигуры         .Fill.ForeColor.RGB = vbYellow         ‘Поворачиваем фигуру влево на 40 градусов         .Rotation = —40     End With End Sub

Пример 3

Редактирование одновременно нескольких фигур с помощью коллекции ShapeRange:

Sub Primer3()     With ActiveSheet.Shapes.Range(Array(«Овал 1», «Овал 2», «Овал 3»))         ‘Меняем цвет всех фигур из коллекции ShapeRange         .Fill.ForeColor.RGB = vbBlue         ‘Задаем высоту и ширину овалов         .Height = 150         .Width = 50         ‘Поворачиваем фигуры вправо на 45 градусов         .Rotation = 45     End With End Sub

Пример 4

Редактирование одновременно всех фигур на рабочем листе с помощью коллекции ShapeRange:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Sub Primer4() Dim myShapeRange As ShapeRange, i As Integer, _ myShape As Shape, myArray() As String ‘Задаем массиву размерность от 1 до количества фигур на листе ReDim myArray(1 To ActiveSheet.Shapes.Count)     ‘Проходим циклом по всем фигурам коллекции и записываем их имена в массив     For Each myShape In ActiveSheet.Shapes         i = i + 1         myArray(i) = myShape.Name     Next ‘Создаем коллекцию ShapeRange и присваиваем ссылку на нее переменной myShapeRange Set myShapeRange = ActiveSheet.Shapes.Range(myArray)     With myShapeRange         ‘Изменяем цвет всех фигур на рабочем листе         .Fill.ForeColor.RGB = RGB(100, 150, 200)         ‘Поворачиваем все фигуры вокруг вертикальной оси         .Flip msoFlipVertical     End With End Sub

Пример 5

Добавление надписи (текста) на фигуру:

Sub Primer5() Dim myShape As Shape Set myShape = ActiveSheet.Shapes.AddShape(msoShapeCloud, 50, 30, 300, 300)     With myShape.TextFrame2         ‘Добавление текста на фигуру         .TextRange.Characters.Text = «Объект TextFrame представляет текстовую рамку в объекте Shape. Содержит текст в текстовом кадре, а также свойства и методы, которые контролируют выравнивание и закрепление текстового кадра.»         ‘Задаем курсивное начертание         .TextRange.Characters.Font.Italic = True         ‘Указываем размер шрифта         .TextRange.Characters.Font.Size = 13         ‘Отступ левой границы текстового поля от левой внутренней границы фигуры         .MarginLeft = 30         ‘Отступ верхней границы текстового поля от верхней внутренней границы фигуры         .MarginTop = 20     End With End Sub

Результат работы кода:

Изменить цвет текста, например на черный, можно двумя способами:

‘С помощью константы MsoThemeColorIndex myShape.TextFrame2.TextRange.Characters.Font.Fill.ForeColor.ObjectThemeColor = msoThemeColorDark1 ‘С помощью цветовой модели RGB myShape.TextFrame2.TextRange.Characters.Font.Fill.ForeColor.RGB = RGB(0, 0, 0)

С константами из коллекции MsoThemeColorIndex вы можете ознакомиться на сайте разработчиков.

Пример 6

Удаление фигур с рабочего листа из кода VBA Excel с помощью метода Delete.

Удаление одной фигуры:

ActiveSheet.Shapes(«Ромб 5»).Delete

Удаление нескольких фигур:

ActiveSheet.Shapes.Range(Array(«Овал 1», «Овал 2», «Овал 3»)).Delete

Удаление всех фигур с рабочего листа с помощью цикла:

Sub Primer6() Dim myShape As Shape     For Each myShape In ActiveSheet.Shapes         myShape.Delete     Next End Sub

В 7 примере рассмотрено удаление всех фигур без цикла.

Пример 7

Выделение всех фигур на рабочем листе:

ActiveSheet.Shapes.SelectAll

Выбор всех фигур и удаление выбранного (всех фигур):

Sub Primer7()     ActiveSheet.Shapes.SelectAll     Selection.Delete End Sub

---

Продолжение темы в статье VBA Excel. Копирование, перемещение и поворот фигур.

---

Как в Excel задать ширину и высоту ячейки в см или мм (см)?

Как в Excel задать ширину и высоту ячейки в см или мм чтобы потом не подбирать их вручную при печати? Существует ли простой способ без вычислений типа: 1 пункт = 1/72 дюйма = 1.33 пикселя = 0.35 мм. 1 пиксель = 0.75 пункта = 0.24мм. 1 мм = 2.85 пунктов = 3.8 пикселей и т. д. Может быть можно как-то сразу нарисовать прямоугольник или квадрат нужного размера?

Файл/параметры/дополнительно ищете строку»Единицы на линейке» выбираете Сантиметры/Миллиметры «ОК». Возвращаетесь и строчки со столбцами будут в ваших единицах только при режиме Вид/Разметка страницы. Удачи!

В отличие от программы Microsoft Word в другой программе Microsoft Excel, к сожалению, нет просто горизонтальных, а также вертикальных линеек. Создатели Excel не добавили туда такой простой и удобный инструмент.

Можно выйти из этого таким способом:

Выбираем инструмент “Прямоугольник”.

Указываем нужный размер.

Вкладка “Свойства” избираем: Не передвигать и не трансформировать величину совместно с ячейками.

Потом используем данный “ЭТАЛОННЫЙ” прямоугольник и подгоняем размеры ячеек, просто подгоняя размеры под наш прямоугольник.

Я не совсем поняла вопрос.

Но, может быть, надо сделать ширину и высоту ячейки одинаковые для всей таблицы?

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

Поставьте курсор между буквами, он приобретёт вид вертикальной полосочки с двумя боковыми стрелочками. И нажимая на левую кнопку, перемещая курсор, сделайте нужную ширину.

В первой ячейке увидите точку (сверху справа). Нажмите на неё левой кнопкой и перетащите вправо. Всё ячейки станут одной ширины.

Аналогично делается и высота ячейки. Только выделять уже надо не столбец, а строку.

REALIX.RU — IT, компьютеры и всё остальное.

18 Ноя

Потребовалось мне сегодня нарисовать таблицу в Microsoft Excel с точными размерами ячеек в сантиметрах, но в отличии от Microsoft Word в Microsoft Excel нет горизонтальных и вертикальных линеек. Excel не позволяет измерять ширину и высоту ячеек в сантиметрах, миллиметрах, дюймах и подобных величинах. Единицы измерения, используемые в Microsoft Excel это пункты, пикселы и символы.

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

1 пункт = 1/72 дюйма = 1.33 пикселя = 0.35 мм
1 пиксель = 0.75 пункта = 0.24мм
1 мм = 2.85 пунктов = 3.8 пикселей

Ширина столбца задается количеством символов стандартного шрифта, помещающихся в ячейку.

Есть еще один способ как задать нужный размер ячейки в сантиметрах:

1. Воспользуемся инструментом “Прямоугольник” в панели “Рисование“. Нарисуем прямоугольник, размер которого можно указать в миллиметрах

2. На вкладке “Размер” диалогового окна “Формат Автофигуры” можно задать его размеры.

3. На вкладке “Свойства” выбираем: Не перемещать и не изменять размер вместе с ячейками. ( Это мы делаем для того, чтобы прямоугольник не перемещался по листу и не изменял размеры вместе с ячейками листа )

Теперь мы используем этот “ЭТАЛОННЫЙ” прямоугольник и выставляем размеры ячеек, подгоняя их под прямоугольник.

…но есть способ проще:

Нам потребуется OpenOffice.org Calc. В Open Office Calc можно выставлять точные размеры ячеек в сантиметрах. На рисунке ниже в зеленой рамке ( слева ) скриншот из приложения OpenOffice Calc. Во всплывающей подсказке виден размер в сантиметрах, а в красной рамке ( справа ) скриншот из приложения Microsoft Word, в котором ширина указана в пикселах.

Найти информацию в Интернете про: Размер ячейки в Excel в сантиметрах

Советуем прочитать:

• Бесплатный PDF принтер PDFCreator (2)
• Установка .NET Framework 3.5 в Windows 8 ошибка 0×800f0906 (8)
• Решаем проблему: “Spooler SubSystem App… Программа выполнила не допустимую операцию и будет закрыта” (83)
• Папка runauto.. Как удалить runauto.. (6)
• Ошибка 0×8024400A Windows Update на Windows XP (0)

Комментарии (13)

Ну это Вы перегибаете палку. Не согласен, не может такого быть, не можем мы такого допустить. Прямо буря в душе поднялась. Вчера читал об участившихся катастрофах авиалайнеров, пишут что сейчас в 12 раз чаще падают чем 20 лет назад. Говорят, что виной всему машины, и компьютеры, конечно, тоже, но мне кажется, что и летали раньше по другому реже я имею в виду. Т.е статистика перевирает или репортеры от себя что-то добавили.

:0 интересная статья спасибо афтору зачет!

Безусловно хорошая статья. Будем ждать новых

Как всегда на высоте (постоянный читатель 🙂 )

Добротно сделано, контент порадовал, сам на многие блоги и не зашёл бы никогда…

Кратко и понятно. Благодарность Автору — Lucky!

Статья может и интересная, но абсолютно неверная.
1 пиксель экселя = 0.2645 мм
Только что проверено “эталонным” методом.

Все неверно.
Размер пикселя в миллиметрах/дюймах зависит от текущего разрешения экрана.

Проблемма в том , что при печати данные не совпадают. Ни в open office, ни в екселе с фигурами.

Если работа ведется в режиме разметки страницы (вкладка Вид, группа Режимы просмотра книги, кнопка Разметка страницы), ширину столбца и высоту строки можно указывать в сантиметрах. В этом режиме по умолчанию единицами измерения являются сантиметры, но в качестве единиц измерения можно также выбрать миллиметры и дюймы (кнопка Microsoft Office Изображение кнопки Office, Параметры Excel, категория Дополнительно).

Спасибо за вразумительный рассказ. Помогли на все 100.

1 дюйм = 2,54 см; 1 пункт = 1/72 дюйма; 1 пиксель = 0.75 пункта
Получаем: 1 пиксель = 0,2646 мм

Изменение ширины столбцов и высоты строк

Примечание: Мы стараемся как можно оперативнее обеспечивать вас актуальными справочными материалами на вашем языке. Эта страница переведена автоматически, поэтому ее текст может содержать неточности и грамматические ошибки. Для нас важно, чтобы эта статья была вам полезна. Просим вас уделить пару секунд и сообщить, помогла ли она вам, с помощью кнопок внизу страницы. Для удобства также приводим ссылку на оригинал (на английском языке).

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

Если вы работаете в режиме разМетки страницы (вкладка «вид «, Группа » представления книги «, кнопка «разметка страницы «), можно задать ширину столбца или высоту строки в дюймах, сантиметрах и миллиметрах. По умолчанию единица измерения — дюймы. Перейдите в меню файл _гт_ Параметры _гт_ Advanced _гт_ Display _гт_ выберите параметр в списке единицы измерения линейки. При переключении в обычный режим значения ширины столбцов и высоты строк будут отображаться в точках.

Отдельные строки и столбцы могут иметь только один параметр. Например, один столбец может иметь ширину 25 пунктов, но она не может быть шириной 25 пунктов для одной строки, а 10 пунктов для другой.

Установка заданной ширины столбца

Выберите столбец или столбцы, ширину которых требуется изменить.

На вкладке Главная в группе Ячейки нажмите кнопку Формат.

В разделе Размер ячейки выберите пункт Ширина столбца.

Введите значение в поле Ширина столбцов.

Нажмите кнопку ОК.

Совет: Чтобы быстро задать ширину одного столбца, щелкните его правой кнопкой мыши, выберите пункт Ширина столбца, введите нужное значение и нажмите кнопку ОК.

Выберите столбец или столбцы, ширину которых требуется изменить.

На вкладке Главная в группе Ячейки нажмите кнопку Формат.

В разделе Размер ячейки выберите пункт Автоподбор ширины столбца.

Примечание: Чтобы быстро подобрать ширину всех столбцов листа, нажмите кнопку Выделить все и дважды щелкните любую границу между заголовками двух столбцов.

Выделите ячейку, которая имеет нужную ширину.

Нажмите сочетание клавиш CTRL+C или на вкладке Главная в группе Буфер обмена нажмите кнопку Копировать.

Щелкните правой кнопкой мыши ячейку в целевом столбце, выберите пункт Специальная Вставка, а затем нажмите кнопку ширины столбцов источника.

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

Выполните одно из указанных ниже действий.

Чтобы изменить ширину столбца по умолчанию для листа, щелкните ярлычок листа.

Чтобы изменить ширину столбца по умолчанию для всей книги, щелкните правой кнопкой мыши ярлычок какого-либо листа, а затем выберите пункт Выделить все листы в контекстное менюTE000127572.

На вкладке Главная в группе Ячейки нажмите кнопку Формат.

В разделе Размер ячейки выберите пункт Ширина по умолчанию.

В поле Ширина столбца введите новое значение, а затем нажмите кнопку ОК.

Советы: Если вы хотите задать ширину столбца по умолчанию для всех новых книг и листов, можно создать шаблон книги или шаблон листа, а затем создать на основе этих шаблонов книги или листы. Дополнительные сведения см. по следующим ссылкам:

Выполните одно из указанных ниже действий.

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

Чтобы изменить ширину нескольких столбцов, выделите столбцы, ширину которых требуется изменить, а затем перетащите правую границу заголовка любого выделенного столбца.

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

Чтобы изменить ширину всех столбцов на листе, нажмите кнопку Выделить все, а затем перетащите правую границу заголовка любого столбца.

Выберите строку или строки, высоту которых требуется изменить.

На вкладке Главная в группе Ячейки нажмите кнопку Формат.

В разделе Размер ячейки выберите пункт Высота строки.

Введите значение в поле Высота строки и нажмите кнопку ОК.

Выберите строку или строки, высоту которых требуется изменить.

На вкладке Главная в группе Ячейки нажмите кнопку Формат.

В разделе Размер ячейки выберите пункт Автоподбор высоты строки.

Совет: Чтобы быстро подобрать высоту всех строк листа, нажмите кнопку Выделить все и дважды щелкните нижнюю границу заголовка любой строки.

Выполните одно из указанных ниже действий.

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

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

Чтобы изменить высоту всех строк на листе, нажмите кнопку Выделить все, а затем перетащите нижнюю границу заголовка любой строки.

Чтобы изменить высоту строки в соответствии с содержимым, дважды щелкните нижнюю границу заголовка строки.

Если вы предпочитаете работать с шириной столбцов и высотой строк в дюймах, то следует работать в режиме разМетки страницы (вкладка «вид «, Группа » представления книги «, кнопка » Разметка страницы «). В режиме разМетки страницы можно задать ширину столбца или высоту строки в дюймах. В этом представлении единицы измерения по умолчанию представлены в дюймах, но вы можете изменить единицы измерения на сантиметры или миллиметры.

В Excel 2007 нажмите кнопку Microsoft Office _гт_ Параметры Excel _гт_.

В Excel 2010 перейдите в раздел Параметры _гт_ _гт_ Дополнительно.

Установка заданной ширины столбца

Выберите столбец или столбцы, ширину которых требуется изменить.

На вкладке Главная в группе Ячейки нажмите кнопку Формат.

В разделе Размер ячейки выберите пункт Ширина столбца.

Введите значение в поле Ширина столбцов.

Выберите столбец или столбцы, ширину которых требуется изменить.

На вкладке Главная в группе Ячейки нажмите кнопку Формат.

В разделе Размер ячейки выберите пункт Автоподбор ширины столбца.

Совет . Чтобы быстро подобрать ширину всех столбцов листа, нажмите кнопку Выделить все и дважды щелкните любую границу между заголовками двух столбцов.

Выделите ячейку, которая имеет нужную ширину.

На вкладке Главная в группе Буфер обмена нажмите кнопку Копировать и выберите нужный столбец.

На вкладке Главная в группе Буфер обмена щелкните стрелку под кнопкой Вставить и выберите команду Специальная вставка.

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

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

Выполните одно из указанных ниже действий.

Чтобы изменить ширину столбца по умолчанию для листа, щелкните ярлычок листа.

Чтобы изменить ширину столбца по умолчанию для всей книги, щелкните правой кнопкой мыши ярлычок какого-либо листа, а затем выберите пункт Выделить все листы в контекстное менюTE000127572.

На вкладке Главная в группе Ячейки нажмите кнопку Формат.

В разделе Размер ячейки выберите пункт Ширина по умолчанию.

В поле Ширина столбца введите новое значение.

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

Выполните одно из указанных ниже действий.

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

Чтобы изменить ширину нескольких столбцов, выделите столбцы, ширину которых требуется изменить, а затем перетащите правую границу заголовка любого выделенного столбца.

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

Чтобы изменить ширину всех столбцов на листе, нажмите кнопку Выделить все, а затем перетащите правую границу заголовка любого столбца.

Выберите строку или строки, высоту которых требуется изменить.

На вкладке Главная в группе Ячейки нажмите кнопку Формат.

В разделе Размер ячейки выберите пункт Высота строки.

Введите значение в поле Высота строки.

Выберите строку или строки, высоту которых требуется изменить.

На вкладке Главная в группе Ячейки нажмите кнопку Формат.

В разделе Размер ячейки выберите пункт Автоподбор высоты строки.

Совет . Чтобы быстро подобрать высоту всех строк листа, нажмите кнопку Выделить все и дважды щелкните нижнюю границу заголовка любой строки.

Выполните одно из указанных ниже действий.

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

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

Чтобы изменить высоту всех строк на листе, нажмите кнопку Выделить все, а затем перетащите нижнюю границу заголовка любой строки.

Чтобы изменить высоту строки в соответствии с содержимым, дважды щелкните нижнюю границу заголовка строки.

Изменяем размер ячеек в Excel

Для любой, не только электронной, таблицы высота и ширина ячейки это один из базовых вопросов. Чего стоят, например, различные унифицированные формы, которые часто реализуются средствами Excel. Из этой статьи вы узнаете о способах задания размеров элементов электронных таблиц (строк, столбцов, ячеек).

Рассмотрим несколько вариантов:

• ручная настройка границ;
• автоподбор в зависимости от того, что введено в ячейку;
• точное задание размеров в выбранных единицах измерения;
• использование буфера обмена;
• объединение ячеек, как способ изменения размеров.

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

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

• выделите элемент или несколько элементов таблицы, для которых устанавливаются размеры;
• на вкладке Главная разверните список у команды Формат и выберите соответствующую команду автоподбора.

Результат автоподбора ширины столбцов можно видеть на рисунке.

Для различных стандартизованных таблиц важно установить размеры элементов точно. В этом случае сначала нужно определиться с единицами измерения. По умолчанию размеры на листах Excel задаются в дюймах. Изменить эти настройки можно в разделе Дополнительно команды Параметры на вкладке Файл.

Изменения нагляднее отображаются в режиме Разметка страницы (на вкладке Вид найдите соответствующую команду). Становятся видны линейки с разметкой в выбранных единицах, например сантиметрах. Далее выделите настраиваемый элемент (столбец или строку) и установите размер элемента (в примере это столбец) с помощью соответствующей команды в меню кнопки Формат.

Если нужны два одинаковых по размерам элемента, то можно использовать Специальную вставку. Для этого сначала нужно скопировать элемент-образец. Затем выделить тот элемент, к которому нужно применить настройки форматирования (в том числе размеры) и выбрать Специальную вставку в вариантах команды Вставка, далее в диалоговом окне — Ширины столбца.

Часто возникает задача изменить размеры только одной ячейки. Это возможно в Word, но невозможно в Excel, поэтому приходится прибегать к обходным маневрам, а именно к объединению ячеек. Это можно проиллюстрировать на примере унифицированной формы. Сначала для всех столбцов устанавливается ширина 1 мм, а затем в нужной строке выделяется некоторое количество ячеек и объединяется с помощью кнопки Объединить и поместить в центре.

Сочетание всех возможностей изменения размеров позволяет создавать сложнейшие таблицы, сохраняя при этом все плюсы автоматизации вычислений в Excel.

Как задать ширину столбцов в сантиметрах в Excel?

Как задать ширину столбцов в сантиметрах в Excel?

Ширина столбцов в сантиметрах

Microsoft Excel позволяет указать ширину столбца в привычных человеку единицах измерения: миллиметрах, сантиметрах и даже дюймах. Для этого нужно перейти из «Обычного режима» просмотра документа в режим «Разметка страницы», в котором вы сможете просматривать документы в том виде, в котором они будут напечатаны. Вам будут хорошо видны начало и конец страниц, а также все их колонтитулы.

Включить режим «Разметка страницы» легко:

• на ленте вкладка «Вид» → группа «Режим просмотра книги» → «Режим разметки».
• в строке состояния рядом с ползунком масштабирования → кнопка «Режим разметки».

Изменить единицы измерения можно в параметрах Excel: «Файл» → «Параметры» → «Дополнительно» → секция «Экран» → параметр «Единицы на линейке».

Создайте любую фигуру на текущем листе, например, прямоугольник («Вставка» → «Иллюстрации» → «Фигуры» → «Прямоугольник»). В свойствах фигуры укажите необходимый размер, а также выберите опцию «Не перемещать и не изменять размеры». Используйте этот прямоугольник, чтобы подбирать нужную ширину столбцов текущего листа.

Excel предлагает пользователям готовые фигуры, среди которых такие популярные изображения, как сердце, молния и звезда. Готовые фигуры можно выбрать непосредственно в галерее фигур во вкладках Вставка и Формат. После того, как вы уже вставили фигуру в рабочий лист, вы можете изменить ее размер при помощи манипуляторов размера. К большинству фигур прикреплен так называемый регулятор — желтый или розовый ромб, расположенный рядом с манипулятором размера, при помощи которого можно изменить фигуру. Чтобы

установить точный размер фигуры, вызовите диалоговое окно Размер inewi и задайте новый размер.

Чтобы нарисовать фигуру:

Нажмите на вкладку Вставка.

Нажмите на кнопку Фигуры

Выберите фигуру, которую вы хотите нарисовать.

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

При рисовании фигуры используются цвета линий и заливки в соответствии с темой рабочей книги.

БЫСТРЫЙ СПОСОБ

Чтобы нарисовать пропорциональную фигуру, удерживайте клавишу Shirt.

Чтобы изменить размер фигуры:

Выделите фигуру, размер которой вы хотите изменить.

Перетащите один из манипуляторов размера:

Чтобы изменить размер объекта в вертикальном или горизонтальном направлении, перетащите манипулятор размера на стороне рамки выделения объекта;

Чтобы изменить размер объекта как в вертикальном, так и в горизонтальном направлении, перетащите манипулятор размера в углу рамки выделения объекта;

Чтобы задать точный новый размер фигуры, нажмите на вкладку Формат в группе Средства рисования и укажите точные параметры высоты и ширины объекта в группе Размер

Чтобы преобразовать фигуру:

Выделите фигуру, которую вы хотите преобразовать.

Щелкните по один из регуляторов (маленькие желтые ромбы), а затем перетащите его. чтобы изменить форму фигуры.

Перейти к содержанию