Сжатие отдельных рисунков
Если для получения приемлемой версии изображения пиксель не требуется каждый элемент, можно сжать изображения, чтобы уменьшить размер файла.
-
Открыв файл в приложении Microsoft Office, выберите один или несколько рисунков для сжатия.
-
В разделе Работа с рисунками на вкладке Формат в группе Изменение нажмите кнопку Сжать рисунки.
Если вкладки Работа с рисунками и Формат не отображаются, убедитесь, что рисунок выделен. Дважды щелкните рисунок, чтобы выделить его и открыть вкладку Формат.
В зависимости от размера экрана в группе Изменение могут отображаться только значки. В этом случае кнопка Сжать рисунки отображается без подписи.
-
Чтобы выполнить сжатие только для выбранных, а не для всех рисунков в документе, установите флажок Применить только к этому рисунку.
Снятие флажка Применить только к этому рисунку перекроет любые изменения, внесенные для других отдельных рисунков в этом документе.
-
В разделе Разрешение выберите нужный вариант и нажмите кнопку ОК.
Примечания:
-
Разрешение рисунка по умолчанию в Office равно 220 ppi. Вы можете изменить разрешение рисунка по умолчанию илиотключить сжатие рисунков.
-
Сжатие применяется после закрытия этого диалогового окна. Если вас не устраивают результаты, вы можете отменить изменения.
-
Сжатие рисунка может сделать изображение другим из-за потери детализации. По этой причине перед применением этого эффекта необходимо сжать рисунок и сохранить файл.
Щелкните заголовки ниже, чтобы получить дополнительные сведения.
-
Важно: Этот параметр применяется только к рисункам в текущем документе или в документе, выбранном из списка рядом с разделом Размер и качество изображения. Чтобы использовать его для всех новых документов, нужно выбрать другое значение в раскрывающемся списке.
Обратите внимание на то, что эта функция недоступна в Microsoft Project 2013 или Office 2007.
-
Откройте вкладку Файл.
-
Нажмите кнопку Параметры и выберите пункт Дополнительно.
-
В разделе Размер и качество изображения в раскрывающемся списке укажите, применить ли изменения к определенному документу, или применять их ко всем создаваемым документам.
-
Выберите разрешение, которое вы хотите использовать по умолчанию, и нажмите кнопку ОК.
Все сведения об изменениях, внесенных в рисунок, хранятся в файле. Вы можете уменьшить размер файла, удалив эти данные редактирования, но если вы хотите отменить изменения, потребуется повторно вставить рисунок.
Примечание: Эта функция недоступна в Microsoft Project 2013 или Microsoft Project 2016.
-
Откройте вкладку Файл.
-
Нажмите кнопку Параметры и выберите пункт Дополнительно.
-
В разделе Размер и качество изображения выберите документ, из которого необходимо удалить данные о редактировании рисунка.
-
В разделе Размер и качество изображения установите флажок Отменить данные редактирования.
Примечание: Этот параметр применяется только к рисункам в текущем документе или в документе, выбранном из списка рядом с разделом Размер и качество изображения.
См. также
Изменение разрешения по умолчанию для вставки рисунков в Office
Редактирование фотографий без использования диспетчера рисунков
Сжатие файлов мультимедиа в презентации
Обрезка рисунка
Отключение сжатия рисунка
Сжатие отдельных рисунков
-
Чтобы сжать все рисунки в документе, на ленте выберите файл > «Сжать рисунки» (или «> уменьшить размер файла»).
Чтобы сжать только выбранные рисунки, удерживая нажатой клавишу SHIFT, щелкните нужные рисунки и нажмите кнопку »
рисунки» на вкладке «Формат рисунка«.
-
Выберите параметр в поле «Качество рисунка». Наивысшее разрешение отображается первым, а наименьшее — последним.
Совет: Если вы обрезали какие-то из рисунков, то размер файла можно дополнительно уменьшить, установив флажок Удалить обрезанные области рисунков.
-
Выберите выделенным рисункам или всем рисункам в этом файле.
Примечание: Если выбрать все рисункина шаге 1 с помощью меню «Файл», эти параметры будут недоступны. Сжатие будет применяться ко всем изображениям в документе.
Обычно вставленные изображения плавают над ячейками, и большую часть времени одно изображение покрывает множество ячеек. Если на листе много изображений, вы можете поместить каждое изображение в одну ячейку. Но как с этим бороться? На самом деле, есть несколько хитрых способов помочь нам быстро изменить размер изображений, чтобы они соответствовали размеру ячеек.
Измените размер выбранного изображения, чтобы оно соответствовало одной ячейке с помощью VB Macro
Измените размер вставленных изображений, чтобы они соответствовали ячейкам с помощью Kutools for Excel
Измените размер выбранного изображения, чтобы оно соответствовало одной ячейке с помощью VB Macro
Мы можем применить макросы VB для изменения размера выбранного изображения, чтобы оно соответствовало одной ячейке, но не вручную изменять размер изображения по ширине и высоте. Вы можете сделать это, выполнив следующие действия:
Шаг 1. Вставьте изображения на лист и выберите изображение, размер которого вы измените, чтобы он соответствовал одной ячейке.
Шаг 2: Удерживайте ALT + F11 ключи, и он открывает Microsoft Visual Basic для приложений окно.
Шаг 3: нажмите Вставить > Модулии вставьте следующий макрос в окно модуля.
VBA: изменение размера выбранного изображения по размеру ячейки.
Public Sub FitPic()
On Error GoTo NOT_SHAPE
Dim PicWtoHRatio As Single
Dim CellWtoHRatio As Single
With Selection
PicWtoHRatio = .Width / .Height
End With
With Selection.TopLeftCell
CellWtoHRatio = .Width / .RowHeight
End With
Select Case PicWtoHRatio / CellWtoHRatio
Case Is > 1
With Selection
.Width = .TopLeftCell.Width
.Height = .Width / PicWtoHRatio
End With
Case Else
With Selection
.Height = .TopLeftCell.RowHeight
.Width = .Height * PicWtoHRatio
End With
End Select
With Selection
.Top = .TopLeftCell.Top
.Left = .TopLeftCell.Left
End With
Exit Sub
NOT_SHAPE:
MsgBox "Select a picture before running this macro."
End Sub
Шаг 4: нажмите F5 ключ для запуска этого макроса.
Шаг 5: Повторите шаги выше, чтобы изменить размер других изображений, чтобы они соответствовали одной ячейке.
Теперь все вставленные картинки изменены и помещаются в ячейки. См. Следующий снимок экрана:
Внимание: Вы можете изменить размер только одного изображения один раз. Если вы выберете более одного изображения один раз, появится диалоговое окно с предупреждением.
Измените размер вставленных изображений, чтобы они соответствовали ячейкам с помощью Kutools for Excel
Если у вас есть Kutools for Excel установлен, вы можете применить его Импорт изображений инструмент для изменения размера всех изображений в соответствии с ячейками или с фиксированной высотой во время вставки изображений.
Kutools for Excel включает более 300 удобных инструментов Excel. Бесплатная пробная версия без ограничений в течение 30 дней. Получить сейчас.
Шаг 1. Выберите ячейки диапазона, в которые вы хотите вставить изображения, и щелкните значок Предприятие >Импорт/Экспорт > Импорт изображений. См. Следующий снимок экрана:
Шаг 2: в Импорт изображений диалоговом окне выберите порядок вставки в раскрывающемся списке и нажмите Добавить кнопку, чтобы добавить нужные изображения из файла или папки, затем нажмите Размер кнопка. Смотрите скриншот:
Шаг 3: проверьте Соответствующий размер ячейки вариант. Затем нажмите Ok > Импортировать закрыть диалоги. Смотрите скриншот:
Теперь вы можете видеть, что изображения вставлены по размеру ячеек.
Внимание: Вы также можете указать высоту и ширину ячейки на шаге 3, чтобы изменить размер изображений.
Если вы хотите узнать больше об этом Импорт изображения функция, пожалуйста, посетите здесь.
Связанная статья:
Как быстро изменить размер нескольких ячеек, чтобы они соответствовали изображениям над ними в Excel?
Лучшие инструменты для работы в офисе
Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%
- Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
- Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
- Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
- Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
- Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
- Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
- Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
- Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
- Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Москва: | +7 (495) 797-43-37 |
Россия: | +7 (800) 775-03-87 |
06.06.2014
Файлы Excel, помимо прочего, широко применяются для подготовки спецификаций и каталогов товаров и их последующей рассылки контрагентам. Вложенные в них графические элементы (фотографии товаров, чертежи, графики и пр.) сильно раздувают их размер, что затрудняет пересылку по почте (у кого-то каналы связи плохие, у кого-то установлены драконовские ограничения на максимальный размер почтового сообщения на серверах). При этом архивация этих файлов традиционными средствами — WinRAR’ом или 7zip’ом — помогает не сильно: и без того сжатые графические форматы ни в какую не желают сокращаться в размерах. Однако есть способ сжимать графику внутри файлов собственными средствами Excel. Приступим.
Для наглядности мы подготовили увесистый excel-файл. Он насчитывает с десяток фотографий и весит порядка 7 Мбайт:
Открываем его в Excel, выделяем любой рисунок, в меню сверху выбираем «Работа с рисунками — Формат», после чего нажимаем кнопку «Сжать рисунки»:
В появившимся окне убираем галочку «Применить только к этому рисунку» (мы же хотим сжать всю графику?) и выбираем качество вывода в зависимости от потребности. Уровень «Электронная почта» для нас представляется оптимальным:
Нажимаем «Ок», проверяем «читаемость» графики (чтобы она не выглядела хуже, чем была при исходных параметрах), сохраняем файл. И проверяем его размер:
Сжатие почти в 10 раз — это, кажется, успех! Осталось только разослать полученный файл контрагентам. Благо теперь для этого практически никаких препятствий нет.
Изменение размеров и обрезка рисунков
Изменение размеров и обрезка рисунков
Вне зависимости от того, добавили ли вы рисунок из коллекции клипов Office или из другого места, к изображениям на листе книги Excel применяются одинаковые методы изменения размеров и обрезки. Далее при описании этих методов, а также при применении эффектов и стилей к рисункам мы не будем делать различия между рисунками из коллекции клипов и рисунками, добавленными из других источников, поскольку никакой разницы между этими изображениями нет. Вся разница состоит лишь в методе их добавления на лист книги.
Чтобы изменить размеры любого рисунка на листе, нужно выполнить следующие действия.
1. Выделите рисунок на листе, щелкнув на нем кнопкой мыши. По углам рисунка появятся круглые маркеры, а по сторонам – квадратные.
2. Установите указатель мыши на один из круглых маркеров по углам рамки рисунка. Он примет вид двух противоположно направленных стрелок.
3. Нажав и удерживая кнопку мыши, перетащите указатель. В зависимости от того, в какую сторону вы перемещаете указатель мыши, размер рисунка будет увеличиваться или уменьшаться.
4. Отпустите кнопку мыши, когда добьетесь требуемых размеров рисунка.
Обратите внимание, что при таком изменении размера пропорции рисунка остаются неизменными. Ширина и высота рисунка изменяются пропорционально. Кроме того, при изменении размеров путем перетаскивания углового маркера размер трансформируется относительно противоположного угла, то есть противоположный угол остается на месте. Вы можете изменять размеры рисунка относительно его центра, если при перетаскивании углового маркера будете удерживать нажатой клавишу Ctrl.
Чтобы изменить только горизонтальный или вертикальный размер рисунка, перетащите с помощью мыши один из квадратных маркеров. При этом будет изменяться только ширина или высота рисунка, то есть будут изменены пропорции его сторон. Изображение рисунка в этом случае подвергнется искажению (будет растянуто или сжато).
Есть и другой способ изменить размер рисунка.
1. Выделите рисунок.
2. Перейдите на вкладку Формат ленты.
3. Установите значения высоты и ширины рисунка в соответствующих полях группы Размер в сантиметрах. Размеры рисунка будут изменены в соответствии с введенными вами значениями.
Вы также можете воспользоваться расширенными средствами изменения размера рисунка, расположенными в диалоговом окне Размер и свойства.
1. Выделите рисунок.
2. Нажмите кнопку, расположенную в правой нижней части группы Размер на вкладке Формат. Появится диалоговое окно Размер и свойства (рис. 9.4).
Рис. 9.4. Диалоговое окно Размер и свойства
3. Перейдите на вкладку Размер.
4. В полях Высота и Ширина, расположенных в группе Размер и поворот, установите нужные размеры рисунка.
5. Закройте диалоговое окно Размер и свойства.
ПРИМЕЧАНИЕ
Вы также можете изменить размеры рисунка в процентном отношении от первоначального размера. Для этого нужно изменить значения в полях Высота и Ширина в группе Масштаб. Однако, если установлен флажок Сохранять пропорции, вы можете изменять только одну величину (ширину или высоту), вторая будет автоматически изменяться пропорционально.
Мы описали три способа изменения размеров рисунка. Какой из этих способов выбрать, вы решите сами. Возможно, при разных обстоятельствах вы будете прибегать к разным методам изменения размеров.
Вы, наверное, обратили внимание на круглый зеленый маркер, расположенный чуть выше рамки рисунка. Он служит для поворота рисунка.
1. Установите указатель мыши на маркер поворота рисунка. Указатель примет вид круговой стрелки.
2. Нажав и удерживая левую кнопку мыши, переместите указатель вправо или влево. Рисунок будет поворачиваться.
3. Отпустите кнопку мыши, как только повернете рисунок на требуемый угол (рис. 9.5).
Рис. 9.5. Рисунок повернут
Нередки случаи, когда в документе (в нашем случае – на листе книги Excel) нужно разместить не весь рисунок, а только его фрагмент. Конечно, вы можете перед добавлением в документ обработать рисунок в любом графическом редакторе, «отрезав» от него лишние части и сохранив в отдельный файл, но Excel позволяет вам сделать это, не прибегая к помощи сторонних программ. Программа Excel содержит собственный инструмент обрезки изображений.
На рис. 9.6 вы видите изображение мяча и волейбольной сетки. Этот рисунок взят из коллекции клипов Office. Мы обрежем его так, чтобы отсечь сетку и оставить только мяч.
Рис. 9.6. Рисунок до обрезки
1. Выделите рисунок.
2. Нажмите кнопку Обрезка, расположенную в группе Размер вкладки Формат. По периметру рисунка появятся маркеры обрезки.
ПРИМЕЧАНИЕ
Вы можете более точно установить угол поворота рисунка в поле Поворот, расположенном на вкладке Размер диалогового окна Размер и свойства.
3. Перетаскивая границы рамки за маркеры обрезки (угловые или расположенные на сторонах рамки), добейтесь того, чтобы в рамке остался только нужный вам фрагмент (рис. 9.7).
Рис. 9.7. Рисунок после обрезки
4. Щелкните на кнопке Обрезка повторно, чтобы выключить инструмент обрезки.
Вы можете также обрезать рисунок, установив нужные значения в полях, расположенных в группе Обрезка вкладки Размер диалогового окна Размер и свойства.
Программа Excel «помнит» исходные размеры рисунка и его вид до обрезки, то есть в случае необходимости вы можете восстановить обрезанные фрагменты. Для этого достаточно выделить рисунок, выбрать инструмент Обрезка и растянуть его за маркеры обрезки. Ранее обрезанные фрагменты будут восстановлены.
Любые ранее сделанные изменения в рисунке вы можете отменить, вернув рисунок в первоначальный вид. Для этого следует выделить рисунок и нажать кнопку Сброс параметров рисунка. Все совершенные изменения (масштабирование и обрезка) будут отменены, а рисунок предстанет в том виде, в каком вы его добавили на лист книги.
Данный текст является ознакомительным фрагментом.
Читайте также
5.5. Изменение размеров фреймов
5.5. Изменение размеров фреймов
По умолчанию размеры фреймов можно изменять с помощью указателя мыши. Необходимо просто навести указатель на границу между фреймами и, зажав левую кнопку мыши, переместить границу влево или вправо, вверх или вниз (рис. 5.7).
Рис. 5.7. Изменение
23.3.3. Изменение размеров окна
23.3.3. Изменение размеров окна
Вам кажется, что окно слишком маленькое и не подходит для нашей программы? Для изменения размеров окна лучше всего использовать функциюvoid gtk_window_set_default_size(GtkWindow *window, gint width, gint height);Эта функция устанавливает ширину окна window равной width, а высоту —
Обрезка объектов
Обрезка объектов
Команда TRIM, которая осуществляет отсечение объектов по режущей кромке, вызывается из падающего меню Modify ? Trim или щелчком на пиктограмме Trim на панели инструментов Modify.Запросы команды TRIM:
Current settings: Projection=UCS Edge=None – текущие установки
Select cutting edges … – выбор
Обрезка и удлинение трехмерных объектов
Обрезка и удлинение трехмерных объектов
Любой трехмерный объект можно обрезать либо удлинить до другого объекта независимо от того, лежат ли они оба в одной плоскости и каким кромкам параллельны: режущим или граничным.Чтобы данные операции были выполнены успешно,
Изменение размеров элементов таблицы
Изменение размеров элементов таблицы
Ширину столбцов и высоту строк можно изменять несколькими способами. Самый простой способ– при помощи мыши. Для этого подведите указатель к правой границе столбца или к нижней границе строки. Когда указатель примет форму двойной
Обрезка объектов
Обрезка объектов
Команда TRIM, которая осуществляет отсечение объектов по режущей кромке, вызывается из падающего меню Modify ? Trim или щелчком на пиктограмме Trim на панели инструментов Modify.Запросы команды TRIM:Current settings: Projection=UCS Edge=None – текущие установкиSelect cutting edges.. – выбор
Обрезка и удлинение трехмерных объектов
Обрезка и удлинение трехмерных объектов
Любой трехмерный объект можно обрезать либо удлинить до другого объекта независимо от того, лежат ли они оба в одной плоскости и каким кромкам параллельны: режущим или граничным. Чтобы произвести обрезку (удлинение), с помощью
Обрезка объектов
Обрезка объектов
Команда TRIM , которая осуществляет отсечение объектов по режущей кромке, вызывается из падающего меню Modify ? Trim или щелчком на пиктограмме Trim на панели инструментов Modify.Запросы команды
Обрезка и удлинение трехмерных объектов
Обрезка и удлинение трехмерных объектов
Любой трехмерный объект можно обрезать либо удлинить до другого объекта независимо от того, лежат ли они оба в одной плоскости и каким кромкам параллельны: режущим или граничным. Чтобы произвести обрезку (удлинение), с помощью
Обрезка объектов
Обрезка объектов
Команда TRIM, которая осуществляет отсечение объектов по режущей кромке, вызывается из падающего меню Modify ? Trim или щелчком на пиктограмме Trim на панели инструментов Modify.Запросы команды TRIM:Current settings: Projection=UCS Edge=None – текущие установкиSelect cutting edges … – выбор
Пример. Обрезка объектов
Пример. Обрезка объектов
Отсечь части окружности, нарисованные пунктирной линией (рис. 11.11).Запустите команду TRIM, вызвав ее из падающего меню Modify ? Trim или щелчком на пиктограмме Trim на панели инструментов Modify. Ответьте на запросы:_TRIMCurrent settings: Projection=UCS Edge=NoneSelect cutting edges …Select
Обрезка и удлинение трехмерных объектов
Обрезка и удлинение трехмерных объектов
Любой трехмерный объект можно обрезать либо удлинить до другого объекта независимо от того, лежат ли они оба в одной плоскости и каким кромкам параллельны – режущим или граничным. Чтобы произвести обрезку (удлинение), с помощью
12.6. Инструмент Crop (Обрезка)
12.6. Инструмент Crop (Обрезка)
Этот инструмент
предназначен для так называемого кадрирования – обрезки изображения. Находится он на палитре инструментов, закрепленная горячая клавиша – С. По способу использования Crop (Обрезка) очень похож на Free Transform (Произвольное
Изменение размеров и перемещение окон
Изменение размеров и перемещение окон
Обычно размеры окон можно изменять. Те, для которых разрешена эта операция, имеют специально обозначенный уголок в нижнем правом углу (рис. 8.8).
Рис. 8.8. Угол «перемещения»После наведения на этот элемент указатель мыши примет форму
Кадрирование (обрезка) фотографии
Кадрирование (обрезка) фотографии
Так, надеюсь копию фотогафии вы сделали? Нет? Выбираете понравившуюся фотографию, щелкаете правой кнопкой мыши по ее значку и в контекстном меню выбираете Копировать. Выбираете место, куда хотите сохранить скопированную фотографию.
Содержание
- Уменьшение размера файла изображения в Microsoft Office
- Сжатие отдельных рисунков
- См. также
- Сжатие отдельных рисунков
- 8 способов уменьшить размер файла Excel (которые действительно работают)
- Советы по уменьшению размера файла Excel
- Удалите ненужные рабочие листы / данные
- Преобразовать в двоичный формат (XLSB)
- Что такое XLSB?
- XLSB против XLSX / XLSM
- Удалите ненужные формулы
- Сжать изображения (до и после загрузки)
- Удалите сводный кеш для экономии места
- Сохранить исходные данные и удалить сводный кеш
- Сохраните сводный кеш и удалите исходные данные
- Сжать файл (ZIP IT)
- Удалить форматирование данных
- Удалить условное форматирование
- Советы по повышению производительности Excel
Уменьшение размера файла изображения в Microsoft Office
Вы можете уменьшить размер файлов и сэкономить пространство на диске с помощью сжатия рисунков в документе. Параметры сжатия уменьшают размер файла и размер рисунка в зависимости от того, как вы планируете использовать рисунок, например при просмотре на экране или в сообщении электронной почты. Сжать можно все рисунки в файле или только специально выделенные.
Эти функции доступны не в Microsoft 365 для Интернета, а только в классических версиях набора Office.
Вы можете отправлять файлы без ограничений, в том числе изображения высокого качества, сохранив их в облаке, а затем предоставив к ним общий доступ в OneDrive.
Сжатие отдельных рисунков
Если для получения приемлемой версии изображения пиксель не требуется каждый элемент, можно сжать изображения, чтобы уменьшить размер файла.
Открыв файл в приложении Microsoft Office, выберите один или несколько рисунков для сжатия.
В разделе Работа с рисунками на вкладке Формат в группе Изменение нажмите кнопку Сжать рисунки.
Если вкладки Работа с рисунками и Формат не отображаются, убедитесь, что рисунок выделен. Дважды щелкните рисунок, чтобы выделить его и открыть вкладку Формат.
В зависимости от размера экрана в группе Изменение могут отображаться только значки. В этом случае кнопка Сжать рисунки отображается без подписи.
Чтобы выполнить сжатие только для выбранных, а не для всех рисунков в документе, установите флажок Применить только к этому рисунку.
Снятие флажка Применить только к этому рисунку перекроет любые изменения, внесенные для других отдельных рисунков в этом документе.
В разделе Разрешение выберите нужный вариант и нажмите кнопку ОК.
Разрешение рисунка по умолчанию в Office равно 220 ppi. Вы можете изменить разрешение рисунка по умолчанию илиотключить сжатие рисунков.
Сжатие применяется после закрытия этого диалогового окна. Если вас не устраивают результаты, вы можете отменить изменения.
Сжатие рисунка может сделать изображение другим из-за потери детализации. По этой причине перед применением этого эффекта необходимо сжать рисунок и сохранить файл.
Щелкните заголовки ниже, чтобы получить дополнительные сведения.
Важно: Этот параметр применяется только к рисункам в текущем документе или в документе, выбранном из списка рядом с разделом Размер и качество изображения. Чтобы использовать его для всех новых документов, нужно выбрать другое значение в раскрывающемся списке.
Обратите внимание на то, что эта функция недоступна в Microsoft Project 2013 или Office 2007.
Откройте вкладку Файл.
Нажмите кнопку Параметры и выберите пункт Дополнительно.
В разделе Размер и качество изображения в раскрывающемся списке укажите, применить ли изменения к определенному документу, или применять их ко всем создаваемым документам.
Выберите разрешение, которое вы хотите использовать по умолчанию, и нажмите кнопку ОК.
Все сведения об изменениях, внесенных в рисунок, хранятся в файле. Вы можете уменьшить размер файла, удалив эти данные редактирования, но если вы хотите отменить изменения, потребуется повторно вставить рисунок.
Примечание: Эта функция недоступна в Microsoft Project 2013 или Microsoft Project 2016.
Откройте вкладку Файл.
Нажмите кнопку Параметры и выберите пункт Дополнительно.
В разделе Размер и качество изображения выберите документ, из которого необходимо удалить данные о редактировании рисунка.
В разделе Размер и качество изображения установите флажок Отменить данные редактирования.
Примечание: Этот параметр применяется только к рисункам в текущем документе или в документе, выбранном из списка рядом с разделом Размер и качество изображения.
См. также
Сжатие отдельных рисунков
Чтобы сжать все рисунки в документе, на ленте выберите файл > «Сжать рисунки » (или «> уменьшить размер файла»).
Чтобы сжать только выбранные рисунки, удерживая нажатой клавишу SHIFT, щелкните нужные рисунки и нажмите кнопку » рисунки» на вкладке » Формат рисунка«.
Выберите параметр в поле «Качество рисунка». Наивысшее разрешение отображается первым, а наименьшее — последним.
Совет: Если вы обрезали какие-то из рисунков, то размер файла можно дополнительно уменьшить, установив флажок Удалить обрезанные области рисунков.
Выберите выделенным рисункам или всем рисункам в этом файле.
Примечание: Если выбрать все рисунки на шаге 1 с помощью меню «Файл», эти параметры будут недоступны. Сжатие будет применяться ко всем изображениям в документе.
Источник
8 способов уменьшить размер файла Excel (которые действительно работают)
Книги Excel, как известно, становятся мучительно медленными и тяжелыми по мере добавления в них большего количества данных / формул / изображений.
Иногда легко избавиться от лишних хлопот и контролировать размер файла Excel, а иногда это не так.
А поскольку Excel не является веб-инструментом, большинство из нас работает и сотрудничает, отправляя файлы Excel по электронной почте. А большим файлом Excel, который весит 50 МБ, может быть сложно поделиться с коллегами / клиентами.
В моей последней работе мы использовали почтовый клиент Lotus Notes, который работает очень медленно, и отправка тяжелых файлов Excel через это была пыткой.
Хотя волшебного способа уменьшить размер книги Excel не существует, есть несколько приемов, которые можно использовать, чтобы немного сократить размер книги.
Примечание: влияние этих методов на уменьшение размера файла Excel будет зависеть от ваших данных. Для некоторых это может помочь уменьшить размер на 50%, а для некоторых это может привести к уменьшению размера только на 5%.
Советы по уменьшению размера файла Excel
Ниже приведены методы, которые можно использовать для уменьшения размера файла книги Excel.
Для каждого совета я провел небольшое тестирование и добавил снимки, чтобы показать вам влияние на размер файла. Полученные вами результаты будут зависеть от ваших данных и файлов.
В зависимости от вашей рабочей тетради вы можете использовать один или несколько из этих советов.
Удалите ненужные рабочие листы / данные
Лучшие решения часто самые простые.
И эта техника больше соответствует здравому смыслу, а не волшебству Excel.
Если у вас есть книга Excel, в которой есть листы, которые не нужны (и не используются ни в каких формулах), попробуйте избавиться от них.
Это напрямую связано с размером файла Excel. Поэтому, как только вы удалите некоторые листы и сохраните книгу, вы сразу увидите уменьшенный размер файла.
Результаты теста:
Я создал файл Excel с 10 листами, каждый из которых содержит 2,6 миллиона точек данных (26 столбцов по 100 000 точек данных в каждом столбце).
В результате размер этой книги составляет 143 МБ (и требуется некоторое время, чтобы сохранить и открыть).
Теперь, когда я удалил пять листов, размер уменьшился вдвое (да).
Как видите, данные на вашем листе напрямую зависят от размера файла.
Преобразовать в двоичный формат (XLSB)
Знаете ли вы, что просто сохранив файл Excel в формате XLSB, можно уменьшить размер файла?
Все, что вам нужно сделать, это при сохранении книги использовать формат .xlsb.
Вот как это сделать:
- Щелкните вкладку Файл.
- Щелкните Сохранить как.
- Щелкните Обзор.
- В диалоговом окне «Сохранить как» измените тип файла на двоичная книга Excel (.xlsb).
Результаты теста
У меня была книга Excel, которая занимала 14,6 МБ места.
После преобразования того же файла в формат XLSB я смог уменьшить его размер до 10,4 МБ (уменьшение размера на
Что такое XLSB?
Когда вы сохраняете файл Excel (.xlsx или .xlsm), он сохраняется в формате XML.
Например, если я изменю расширение файла XLSX на ZIP, а затем открою его, я получу вот что.
И если я дальше перейду в папку «xl», а затем перейду в папку рабочего листа, он покажет мне рабочие листы в этой книге (и эти рабочие листы сохранены как XML-документ).
Теперь сделаем то же самое с файлом XLSB.
Поэтому я сначала меняю расширение файла на ZIP, затем открываю его и нахожу Sheet1. Вот что вы получите:
Вы заметите, что и XLSX, и XLSB сохраняют лист в другом формате.
XLSX / XLSM сохраняет его как файл XML, а XLSB сохраняет его как двоичный (.bin) файл.
И, не вдаваясь в технические подробности, файлы XML имеют большой размер по сравнению с двоичным файлом.
Поэтому, когда вы сохраняете книгу Excel в формате XLSB, размер файла уменьшается. В приведенном выше примере уменьшение размера составило
XLSB против XLSX / XLSM
Когда дело доходит до использования формата XLSB, уменьшение размера является огромным преимуществом. Но при работе с форматом XLSB нужно быть немного осторожным.
Преимущества формата XLSB:
- Уменьшает размер файла Excel. Это может быть полезно, если у вас есть большие файлы, и вы хотите поделиться ими по электронной почте. Вы можете быстро уменьшить размер, сохранив его в формате XLSB.
- Файлы XLSB открываются и сохраняются быстрее, чем файлы XML. Судя по проведенным мною ограниченным тестам, файлы XLSB открывались и сохранялись на 25-50% быстрее. Эта разница заметна только в больших файлах Excel. С файлами меньшего размера и XLSB, и XLSX работают быстро.
Хотя XLSB выглядит великолепно, есть несколько причин, по которым вам следует придерживаться файлов XLSX / XLSM:
- С форматом XLSB у вас нет возможности узнать, есть ли в нем макрос или нет. Это делает его более рискованным, поскольку кто-то может использовать его для выполнения вредоносного кода.
- Файлы XLSB кодируются в проприетарном формате файлов bin, в то время как XML — это читаемый формат файлов с открытым исходным кодом. Это означает, что если вы используете сторонние инструменты с Excel, лучше использовать формат XML.
- Power Query не может читать данные из файла XLSB. Поэтому, если вы используете Power Query, лучше хранить данные в форматах XLSX / XLSM.
Как правило, если размер вашего файла небольшой (менее 5 МБ), лучше придерживаться форматов XLSX / XLSM.
Основываясь на том, что я слышал от людей и читал на многих форумах, многие люди предпочитают использовать XLSB в качестве формата файла, когда дело доходит до использования Excel.
Вот хорошая статья о формате XLSB.
Удалите ненужные формулы
Слишком много формул увеличат размер файла вашей книги.
Поэтому, если у вас есть набор данных, который вам нужен, но формулы в нем не нужны, лучше преобразовать эти формулы в значения.
Вот шаги, чтобы быстро преобразовать формулы в значения в Excel:
- Выберите весь рабочий лист / набор данных.
- нажмите F5 ключ.
- В диалоговом окне «Перейти» нажмите «Special».
- В диалоговом окне «Перейти к специальному» выберите «Формулы».
- Щелкните ОК.
Вышеупомянутые шаги позволят выбрать все ячейки, в которых есть формула.
Теперь используйте следующие шаги, чтобы преобразовать эти формулы в значения:
- Скопируйте выделенные ячейки (Ctrl + C)
- Щелкните вкладку «Главная».
- В группе «Буфер обмена» нажмите «Вставить».
- Щелкните значок «Вставить значение».
Вышеупомянутые шаги преобразуют все ячейки с формулами в значения.
Результаты теста
Я создал файл Excel с 2,7 миллионами точек данных (1048576 * 26), а затем добавил три столбца с формулами (SUM, COUNT и AVERAGE).
Затем я преобразовал эти формулы в значения и сохранил файл под другим именем.
Размер файла без формул примерно на 8% меньше (обратите внимание, что у меня было всего 3 столбца с формулами).
Если у вас много формул, можно увеличить размер.
ПРИМЕЧАНИЕ: Неустойчивые формулы могут действительно увеличить размер вашего файла. В рамках теста, когда я заменил формулу СУММ на изменчивую формулу (СМЕЩЕНИЕ), это привело к скачку размера файла (с 186 МБ до 198 МБ). Поэтому, если у вас есть изменчивые формулы, которые вы можете заменить энергонезависимыми формулами или преобразовать их в значения, это поможет вам уменьшить размер файла.
Сжать изображения (до и после загрузки)
Если вы работаете с файлами Excel, в которых есть изображения, вам необходимо оптимизировать эти изображения и убедиться, что размер меньше.
Проблема с изображениями заключается в том, что при их сжатии также происходит снижение качества, которое может вам не понадобиться.
При работе с изображениями лучший способ сохранить небольшой размер файла Excel — это сжать изображения перед их вставкой в Excel.
Хороший онлайн-инструмент для этого — TinyPNG (или вы можете использовать Photoshop или любой другой аналогичный инструмент).
Это бесплатный инструмент, который может уменьшить размер изображения до 90% и при этом сохранить приличное качество изображения.
Ниже приведен снимок экрана, на котором я смог сжать изображение размером 3,9 МБ до 331 КБ с минимальной потерей качества.
После того, как вы загрузили эти сжатые изображения в Excel, вы можете дополнительно сжать их, используя встроенную опцию Excel.
Вот шаги для сжатия изображения в Excel:
- Выберите изображение, которое вы хотите сжать.
- Перейдите на вкладку «Формат работы с изображениями». Это контекстная вкладка, которая появляется только при нажатии на картинку.
- В группе «Настроить» выберите параметр «Сжать изображение».
- В диалоговом окне «Сжать изображения»:
- Снимите флажок «Применить только к этому изображению», если вы хотите сжать все изображения в книге.
- Выберите «Электронная почта» (96 пикселей на дюйм) для максимального сжатия.
- Щелкните ОК.
- Сохраните файл.
Это сжимает все изображения и помогает уменьшить размер файла книги Excel.
Результаты теста:
Я использовал опцию сжатия изображения в Excel, используя одно изображение.
Ниже приведены результаты:
При использовании параметра сжатия изображения размер файла уменьшился с 445 КБ до 43 КБ (уменьшение размера файла примерно на 90%).
Это также будет зависеть от изображения. Изображение, которое уже сжато, может не привести к значительному уменьшению размера.
Удалите сводный кеш для экономии места
Если вы работаете со сводными таблицами и боретесь с большими файлами Excel, знание о кэше сводных таблиц может быть полезно.
Когда вы создаете сводную таблицу с использованием набора данных, Excel автоматически создает сводный кэш.
Сводный кеш — это объект, содержащий реплику источника данных.
Хотя вы его не видите, он является частью книги и связан со сводной таблицей. Когда вы вносите какие-либо изменения в сводную таблицу, она не использует источник данных, а использует сводный кеш.
Хотя вы думаете, что напрямую связаны с исходными данными, на самом деле вы получаете доступ к сводному кешу (а не к исходным данным), когда вносите изменения в сводную таблицу.
Теперь, когда вы создаете реплику набора данных, это займет немного места.
Итак, как только вы создадите сводную таблицу, вы заметите, что размер файла Excel увеличивается.
В приведенном выше примере, как только я добавляю сводную таблицу, размер файла увеличивается вдвое.
Теперь есть два способа уменьшить размер файла при работе со сводными таблицами.
- Сохраните исходные данные и удалите Pivot Cache
- Сохраните Pivot Cache и удалите исходные данные
Давайте посмотрим на оба этих метода.
Сохранить исходные данные и удалить сводный кеш
Когда вы закончите работу со сводной таблицей и сохраните ее, вы можете заставить Excel сохранять только исходные данные и итоговую сводную таблицу, но не сводный кеш.
Это сделает ваш файл Excel легче, и у вас будет возможность воссоздать кеш сводной таблицы, когда он вам понадобится в следующий раз.
Ниже указана разница в размере при сохранении файла Excel со сводным кешем и без него.
Вот шаги, чтобы НЕТ сохранить сводный кеш:
- Выберите любую ячейку в сводной таблице.
- Щелкните вкладку «Анализ».
- Щелкните значок «Параметры» сводной таблицы.
- В диалоговом окне «Параметры сводной таблицы» перейдите на вкладку «Данные».
- В параметрах данных сводной таблицы снимите отметку «Сохранить исходные данные в файл». Этот параметр гарантирует, что сводный кэш не сохраняется при сохранении книги (и помогает уменьшить размер файла Excel).
- Установите флажок «Обновлять данные при открытии файла». Этот параметр гарантирует, что сразу после открытия книги сводная таблица будет обновлена, а сводный кеш будет автоматически сгенерирован. Если вы не отметили этот параметр, вам придется обновить сводную таблицу вручную, чтобы создать сводный кеш.
- Щелкните ОК.
Теперь, когда вы сохраните файл со сводной таблицей, вы заметите уменьшение размера файла.
Сохраните сводный кеш и удалите исходные данные
Другой способ уменьшить размер файла Excel — удалить исходные данные сводной таблицы и оставить только сводный кеш.
Это работает так, как сводный кеш является зеркальным отражением ваших данных, и вы не получаете доступа к исходным данным при внесении изменений в сводную таблицу, вместо этого вы используете сводный кеш.
Ниже приведены результаты, когда я сохранил файл Excel без исходных данных.
Для этого просто удалите данные (либо удалив данные, либо рабочий лист с данными).
Если вы хотите вернуть исходные данные, дважды щелкните ячейку «Общий итог» сводной таблицы, и она мгновенно сгенерирует весь набор данных на новом листе.
Сжать файл (ZIP IT)
Это то, что вы можете делать вне приложения Excel.
Когда вы заархивируете файл Excel, вы сразу увидите уменьшение его размера примерно на 10-15%.
Затем вы можете отправить этот заархивированный файл по электронной почте, и человек, получивший его, может распаковать файл и использовать книгу Excel.
Вот шаги, чтобы заархивировать файл Excel (для Windows):
- Щелкните правой кнопкой мыши файл Excel.
- Наведите курсор на опцию Отправить.
- Нажмите на опцию «Сжатая (заархивированная) папка».
Это создаст заархивированный файл для выбранной книги Excel.
Вы также заметите уменьшение размера файла (как показано ниже).
Результаты теста
С помощью этой техники мне удалось уменьшить размер файла книги Excel на 8%.
Этот метод лучше подходит для файлов размером 20–50 МБ. По мере увеличения размера файла процентное уменьшение не очень велико.
Удалить форматирование данных
Форматирование данных, такое как применение цвета фона, добавление границ или изменение стиля шрифта, может увеличить размер файла.
Хотя, основываясь на своих тестах, я заметил, что это не оказывает большого влияния.
Ниже приведены размеры двух книг Excel, одна с 2,6 миллиона точек данных (на одном листе), а другая с теми же данными, но с примененным к ней форматированием (цвет ячейки, граница и курсив).
Результаты теста
Вы можете видеть, что разница между двумя файлами не так уж велика (хотя она оказывает влияние, когда у вас много данных).
Размер файла с данными составляет 14,6 МБ, а файла с данными и форматированием — 14,9 МБ.
Поэтому, если вы хотите уменьшить размер файла книги Excel, вы можете найти ненужное форматирование. Удаление может сэкономить место на диске.
Вот шаги, чтобы мгновенно удалить все форматирование, сохранив при этом данные:
- Выберите весь набор данных (из которого вы хотите удалить форматирование).
- Щелкните вкладку «Главная».
- В группе редактирования нажмите «Очистить».
- Нажмите «Очистить форматы».
- Сохраните книгу.
Удалить условное форматирование
Как и обычное форматирование данных, условное форматирование также увеличивает размер файла.
Однако, основываясь на своих тестах, я заметил, что разница меньше (если у вас нет нескольких правил, применяемых к нескольким листам с огромными наборами данных).
Тем не менее, рекомендуется удалить условное форматирование из любого набора данных, где оно вам не нужно.
Помимо размера, есть еще одна веская причина убрать условное форматирование — СКОРОСТЬ.
Условное форматирование непостоянно и при любых изменениях на листе пересчитывается. Это может привести к замедлению работы книги.
Результаты теста
Я создал файл с 27,2 миллионами точек данных и применил к нему 5 правил условного форматирования.
Разница в размере составляет всего несколько килобайт.
Советы по повышению производительности Excel
Хотя описанные выше методы помогут вам уменьшить размер файла Excel, вот несколько дополнительных советов по повышению производительности книг Excel:
- Избегайте использования летучих формул. Помимо увеличения размера файла, изменчивые формулы также замедляют работу ваших книг. Примеры изменчивых функций: RAND, TODAY, OFFSET, INDIRECT и т. Д.
- Если вам нужно создать сводку для большого набора данных, вместо использования формул, посмотрите, можете ли вы вместо этого использовать сводную таблицу. Сводная таблица работает быстро и интуитивно понятно по сравнению с формулами.
- Если вы извлекаете данные из нескольких источников или объединяете данные из нескольких файлов, используйте Power Query для получения и преобразования данных. Вы можете сохранить данные как соединение Power Query, а не хранить их на листе. Вы можете легко создать сводную таблицу, используя подключения, созданные с помощью Power Query.
- Преобразуйте табличные данные в таблицу Excel и используйте таблицу Excel в формулах. Это ускоряет работу вашей книги, а формулами, созданными с использованием структурированных ссылок Excel Table, легче управлять (поскольку они более интуитивно понятны).
- Избегайте ссылки на всю строку или столбец в формуле. Это повысит эффективность ваших формул.
- Если в вашей книге много формул, отключите автоматический расчет и переключитесь на ручной расчет. Таким образом, каждый раз при изменении рабочих листов формулы не будут пересчитываться. Вы можете внести это изменение, перейдя на вкладку «Формула» и изменив «Параметры расчета».
Надеюсь, вы найдете метод и советы из этого руководства полезными.
Что еще я мог бы добавить к этому руководству, чтобы сделать его более полезным? Пожалуйста, дайте мне знать в разделе комментариев.
Источник
Обычно вставленные изображения плавают над ячейками, и большую часть времени одно изображение покрывает множество ячеек. Если на листе много изображений, вы можете поместить каждое изображение в отдельную ячейку. Но как с этим бороться? На самом деле, есть несколько хитрых способов помочь нам быстро изменить размер изображений, чтобы они соответствовали размеру ячеек.
Изменить размер выбранного изображения, чтобы оно соответствовало одной ячейке с помощью VB Macro
Измените размер вставленных изображений, чтобы они соответствовали ячейкам с помощью Kutools for Excel
Вкладка Office Включить вкладки Редактирование и просмотр в Office, упрощение вашей работы …
Подробнее … Бесплатная загрузка …
Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%.
- Повторное использование всего: добавьте наиболее часто используемые или сложные формулы, диаграммы и все остальное в избранное и быстро повторно используйте их в будущем.
- Более 20 текстовых функций: извлечение числа из текстовой строки; Извлечь или удалить часть текстов; Преобразование чисел и валют в английские слова.
- Инструменты слияния: несколько книг и листов в одну; Объединить несколько ячеек/строк/столбцов без потери данных; Объедините повторяющиеся строки и суммируйте.
- Инструменты разделения: разделение данных на несколько листов в зависимости от значения; Из одной книги в несколько файлов Excel, PDF или CSV; Один столбец в несколько столбцов.
- Вставить пропуск скрытых/отфильтрованных строк; Подсчет и сумма по цвету фона; Массовая отправка персонализированных писем нескольким получателям.
- Суперфильтр: создавайте расширенные схемы фильтров и применяйте их к любым листам; Сортировать по неделе, дню, частоте и т. Д. Фильтр жирным шрифтом, формулами, комментарием …
- Более 300 мощных функций; Работает с Office 2007-2019 и 365; Поддерживает все языки; Простое развертывание на вашем предприятии или в организации.
Подробнее … Бесплатная загрузка …
Изменить размер выбранного изображения по размеру одна ячейка с макросом VB
Потрясающе! Использование эффективных вкладок в Excel, таких как Chrome, Firefox и Safari!
Сэкономьте 50% своего времени и уменьшите тысячи щелчков мышью каждый день!
Мы можем применять макросы VB для изменения размера выбранного изображения, чтобы оно соответствовало одной ячейке, но не вручную изменять размер изображения по ширине и высоте. Вы можете сделать это, выполнив следующие действия:
Шаг 1. Вставьте изображения на рабочий лист и выберите изображение, размер которого вы измените, чтобы он соответствовал одной ячейке.
Шаг 2. Удерживайте ALT + F11 ключи, и он открывает окно Microsoft Visual Basic для приложений .
Шаг 3. Щелкните Insert > Module и вставьте следующий макрос в окно модуля.
VBA: изменение размера выбранного изображения по размеру ячейки.
Шаг 4. Нажмите клавишу F5 , чтобы запустите этот макрос.
Шаг 5. Повторите шаги, описанные выше, чтобы изменить размер других изображений, чтобы они соответствовали одной ячейке.
Теперь все вставленные изображения изменяются и помещаются в ячейки. См. Следующий снимок экрана:
Примечание. : вы можете изменить размер только одного изображения за один раз. Если вы выберете более одного изображения, появится диалоговое окно с предупреждением.
Измените размер вставленных изображений по размеру ячеек с помощью Kutools for Excel
Если у вас установлен Kutools for Excel , вы можете примените его инструмент Импорт изображений , чтобы изменить размер всех изображений в соответствии с ячейками или с фиксированной высотой во время вставки изображений.
Kutools for Excel включает более 300 удобных инструментов Excel. Бесплатная пробная версия без ограничений в течение 30 дней. Получить сейчас .
Шаг 1. Выберите ячейки диапазона, в которые вы хотите вставить изображения, и нажмите Enterprise > Импорт/экспорт > Импорт изображений . См. Следующий снимок экрана:
Шаг 2: В Импортировать изображения , выберите порядок вставки в раскрывающемся списке и нажмите кнопку Добавить , чтобы добавить нужные изображения из файла или папки, затем нажмите Кнопка размера . См. Снимок экрана:
Шаг 3. Установите флажок Соответствующий размер ячейки . Затем нажмите Ok > Импорт , чтобы закрыть диалоговые окна. См. Снимок экрана:
Теперь вы можете видеть, что изображения вставлены по размеру ячеек.
Примечание : вы также можете указать высоту и ширину ячейки на шаге 3, чтобы изменить размер изображений.
Если вы хотите узнать больше об этом, Импортируйте изображение посетите здесь .
Как быстро изменить размер нескольких ячеек, чтобы они соответствовали изображениям над ними в Excel?
Как уменьшить размер файла эксель с картинками
Уменьшение размера файла рисунка в Microsoft Office
Вы можете уменьшить размер файлов и сэкономить пространство на диске с помощью сжатия рисунков в документе. Параметры сжатия уменьшают размер файла и размеры рисунка в зависимости от того, как вы планируете использовать изображение, например просматривать на экране или в сообщении электронной почты. Сжать можно все рисунки в файле или только специально выделенные.
Эти возможности недоступны в Office Online, а только в классической версии набора приложений Office.
Вы можете отправлять файлы без ограничений, в том числе изображения высокого качества, сохранив их в облаке, а затем предоставив к ним общий доступ в OneDrive.
Сжатие отдельных изображений
Если вы не хотите использовать для получения приемлемой версии каждого отдельного пиксель изображения, вы можете сжать рисунки, чтобы уменьшить размер файла.
Открыв файл в приложении Microsoft Office, выберите один или несколько рисунков для сжатия.
В разделе Работа с рисунками на вкладке Формат в группе Изменение нажмите кнопку Сжать рисунки.
Если вкладки Работа с рисунками и Формат не отображаются, убедитесь, что рисунок выделен. Дважды щелкните рисунок, чтобы выделить его и открыть вкладку Формат.
В зависимости от размера экрана в группе Изменение могут отображаться только значки. В этом случае кнопка Сжать рисунки отображается без подписи.
Чтобы выполнить сжатие только для выбранных, а не для всех рисунков в документе, установите флажок Применить только к этому рисунку.
Снятие флажка Применить только к этому рисунку перекроет любые изменения, внесенные для других отдельных рисунков в этом документе.
В разделе Разрешение выберите нужный вариант и нажмите кнопку ОК.
По умолчанию в Office используется разрешение рисунка 220 ppi. Вы можете изменить разрешение рисунка по умолчанию или выключить Сжатие рисунков.
Сжатие применяется после закрытия этого диалогового окна. Если вас не устраивают результаты, вы можете отменить изменения.
Сжатие рисунков может привести к тому, что изображение будет выглядеть иначе из-за потери данных. Из-за этого вы должны сжать изображение и сохранить файл, прежде чем применять художественный эффект.
Щелкните заголовки ниже, чтобы получить дополнительные сведения.
Важно: Этот параметр применяется только к рисункам в текущем документе или в документе, выбранном из списка рядом с разделом Размер и качество изображения. Чтобы использовать его для всех новых документов, нужно выбрать другое значение в раскрывающемся списке.
Обратите внимание на то, что эта функция недоступна в Microsoft Project 2013 или Office 2007.
Откройте вкладку Файл.
Нажмите кнопку Параметры и выберите пункт Дополнительно.
В разделе Размер и качество изображения в раскрывающемся списке укажите, применить ли изменения к определенному документу, или применять их ко всем создаваемым документам.
Выберите разрешение, которое вы хотите использовать по умолчанию, и нажмите кнопку ОК.
Любые сведения об изменениях, внесенных в изображение, сохраняются в файле. Вы можете уменьшить размер файла, удалив данные для редактирования, но если вы хотите отменить изменения, вам нужно будет повторно вставить рисунок.
Примечание: Эта функция недоступна в Microsoft Project 2013 или Microsoft Project 2016.
Откройте вкладку Файл.
Нажмите кнопку Параметры и выберите пункт Дополнительно.
В разделе Размер и качество изображения выберите документ, из которого необходимо удалить данные о редактировании рисунка.
В разделе Размер и качество изображения установите флажок Отменить данные редактирования.
Примечание: Этот параметр применяется только к рисункам в текущем документе или в документе, выбранном из списка рядом с разделом Размер и качество изображения.
Обратная связь
Эта статья была обновлена с помощью Бен на 8/17/2019 в результате ваших замечаний. Если вы нашли ее полезными и, особенно, если вам не понравится, воспользуйтесь элементами управления отзывом, чтобы не отконструктиве идеи о том, как это можно сделать лучше.
Сжатие отдельных изображений
Чтобы сжать все рисунки в документе, на ленте выберите файл > Сжатие рисунков (или файл > уменьшить размер файла).
Чтобы сжать только выделенные изображения, щелкните их, удерживая нажатой клавишу SHIFT, а затем выберите команду Сжать рисунки на вкладке Формат рисунка .
В поле со списком качество рисунка выберите нужный вариант. Наилучшее разрешение указывается в списке в первую очередь, а минимальное разрешение — в списке последним.
Совет: Если вы обрезали какие-то из рисунков, то размер файла можно дополнительно уменьшить, установив флажок Удалить обрезанные области рисунков.
Выберите выделенным рисункам или всем рисункам в этом файле.
Примечание: Если вы используетеменю » файл» для выбора всех рисунков на этапе 1, эти параметры будут недоступны. Сжатие будет применено ко всем рисункам в документе.
Примечание: Эта страница переведена автоматически, поэтому ее текст может содержать неточности и грамматические ошибки. Для нас важно, чтобы эта статья была вам полезна. Была ли информация полезной? Для удобства также приводим ссылку на оригинал (на английском языке).
Как уменьшить размер файла эксель с картинками
Данный вопрос возникает периодически у многих и особенно на работе. Автор статьи решил написать некоторые рекомендации по уменьшению размера файла Microsoft Excel. Применив их Вы сможете понять – действительно ли Ваши данные настолько раздувают файл или же в файле имеется много лишнего.
Бывают ситуации, когда в файле всего один лист, данных на нем на 1000 строк и 20 столбцов. Никаких формул, только значения. Но размер файла непомерно велик – скажем 10 Мб и более. Это недопустимо. Или есть различные формулы, но Вы все равно считаете, что размер файла не соответствует тому, что должно бы быть по ощущениям. Следующие действия необходимо проделать на каждом листе книги:
- Первое, что необходимо вспомнить – а не в общем ли доступе Ваш файл? Если в Общем, то есть вероятность, что Ваш файл раздувается именно из-за этого. Дело в том, что при установке общего доступа к файлу, по умолчанию ведется журнал изменений, в который записываются все действия, произведенные в книге за период, указанный в параметрах. Как избавиться или изменить период: Excel 2007-2010:вкладка Рецензирование – Доступ к книге;Excel 2003:Сервис – Доступ к книге. Переходим на вкладку Подробнее. Для начала активируйте пункт “Не хранить журнал изменений”. Сохраните файл. Затем установите кол-во дней, в течении которых хотите хранить журнал. По умолчанию – 30, но Вы можете сделать меньше, если файл сильно разбухает.
- Перейдя на лист, нажмите Ctrl+End. Активируется последняя ячейка листа. Если она расположена ниже или правее последних данных таблицы(или просто данных) – то удалите все строки и столбцы после последних данных таблицы. Удалите полностью строки. Сделать это быстро можно так. Нажали Ctrl+End, попали на последнюю ячейку. Выделили эту строку, нажали Ctrl+Shift+стрелка Вверх. Выделились все строки вместе с последней строкой Ваших данных. Удерживая Shift жмете стрелку Вниз. Тоже самое и со столбцами.
- Посмотрите лист на предмет форматирования. Необходимо избегать форматирования ЦЕЛИКОМ столбцов либо строк. Это приводит к раздуванию файла. Все форматирование, выходящее за границы таблицы необходимо убрать. А еще лучше – вообще избегать излишнего форматирования, особенно если книгой никто, кроме Вас не пользуется. Вместо Заливки ячеек – Белым цветом ставьте “Нет заливки”.Чтобы убрать все форматирование из ячеек: выделяете необходимый диапазон и: для Excel 2003:Правка – Очистить – Формат. В Excel 2007-2010:вкладка Главная – Очистить – Очистить форматы.
- Удаляем объекты: В Excel 2003:меню Правка- Перейти – Выделить – Объекты. в Excel 2007-2010:вкладка Главная-Найти и выделить-Выделение группы ячеек-Объекты. Нажмите Delete. Все объекты на листе будут удалены. Правда есть небольшой шанс, что у Вас есть скрытые объекты. Тогда надо идти в редактор VBA(Alt+F11)-Ctrl+R. Отображаете окно свойств(F4). Находите в дереве слева объект ЭтаКнига(ThisWorkbook) и в нижнем окне свойств свойство – DisplayDrawingObjects и ставите там значение – -4104-xlDisplayShapes. После этого переходите опять на лист и повторяете операции по выделению и удалению объектов, описанные выше. Нахождение на листе объектов не означает, что Вы их видите. Как правило такие объекты попадают на лист в результате копирования из других файлов, содержащих объекты. Объекты в некоторых случаях переносятся с нулевой длиной и шириной. Как следствие – объект не видно, но файл увеличивается в размерах. И при каждом копировании он начинает увеличиваться в размерах в геометрической прогрессии. Мало того, файл начинает дико тормозить даже при выделении ячеек. Выделили ячейку, хотите выделить другую – файл задумался на пару секунд.
- Еще в книге могут содержаться скрытые листы, на которых может содержаться ненужная Вам информация и с которыми можно проделать операции, описанные выше. Как их обнаружить можно узнать, прочитав эти статьи: Как сделать лист скрытым? Как сделать лист очень скрытым
После всех этих действий необходимо сохранить файл, чтобы изменения вступили в силу. Только после этого Вы сможете проверить – изменился размер файла или нет. Я бы советовал сохранять файл как копию, если не уверены, что удалили действительно ненужное. Ну вот, вроде, и все. Надеюсь данная статья помогла Вам.
От себя лично добавлю, что чаще всего встречаются 2 и 4 пункты. Таким образом был «вылечен» файл размером 35Мб. Теперь он имеет размер 1.8Мб.
Как уменьшить размер файла Excel?
XLS таблицы могут весить несколько десятков мегабайт. Если для жесткого диска или даже самой небольшой флешки это не критично, то для скорости обработки самого файла – ощутимо. Более громоздкие файлы открываются медленнее, работать в них сложнее.
Предлагаем инструкцию, как можно уменьшить размер Excel-файла и ускорить работу с таблицами.
Уменьшить рабочую зону
Часто рабочая зона xls-файла не соответствует реальной. При открытии программа обрабатывает кучу пустых ячеек, которые не нужны для работы. Соответственно увеличивается и размер файла, и скорость работы в нем.
Откройте таблицу и нажмите клавиши Ctrl+End. Программа переместит вас на крайнюю строку, которую она считает рабочей. Сравните, где реально заканчивается ваша таблица и номер крайней ячейки.
Например, у вас таблица реально заканчивалась на 667 строке, а после нажатия клавиш Ctrl+End нас переместили на 1971 строку. Выходит, что 1304 строки нам не нужны, но программа считает их рабочими – и обрабатывает при открытии.
Нам нужно удалить лишние строки и ячейки. Кликаем на первую пустую ячейку под таблицей, нажимаем комбинацию клавиш Ctrl+Shift и стрелку вниз. Так выделятся все пустые строки. Забавно, что у нас выделилось более 60 тысяч строк, а не до 1971.
Кликаем правой кнопкой мышки на выделенную область и нажимаем «Удалить». Пользуйтесь только таким способом удаления, не нажимайте клавишу Del. Потому что с клавишей Delete удаляется только содержимое таблицы, но не сама таблица.
После этого появится сообщение, где мы выбираем «Строку» и нажимаем ОК.
Размер файла должен уменьшиться, и время на его обработку тоже сократится.
Лишнее форматирование
Сделайте таблицу с минимальным форматированием. Если специфика работы не требует выделения ячеек другим цветом и другой наглядности, откажитесь от этого. Даже выделение текста жирным шрифтом или курсивом – уже на несколько десятых килобайт утяжеляет таблицу.
То же касается, если таблица с картинками. Удалите лишние изображения.
Сжатие изображений
Но если все-таки нельзя удалить картинку или фото из документа, ее можно сжать. Выделяем изображение и кликаем на вкладку «Формат». Здесь нам нужно выбрать пункт «Сжать рисунки».
Выставляем настройки так, как показано на скриншоте, и нажимаем «ОК».
Качество изображение почти не изменилось, но его размер сократился. Так можно проделать и с другими картинками в таблице.
Удаление ссылок
Внутренние и внешние ссылки таблицы утяжеляют файл. Избавьтесь по возможности от них. Но делать это нужно осторожно: если ссылки в таблице динамические и будут изменяться со временем, удалять такое содержимое нельзя. Если же таблица содержит статические данные, которые не будут изменяться, удалите ссылки (замените их на статические).
Выделяем область ссылок. Копируем их клавишами Ctrl+C, а затем кликаем правой кнопкой мышки по выделенной области. Выбираем в параметрах вставках пункт «Значение» (обозначено на скриншоте).
Сохраняем файл в другом формате
Формат XLS – несколько устаревший, потому что сейчас новые версии Excel используют сжатый формат XLSX (по аналогии с вордом – docx). Чтобы сохранить файл в другом формате, кликните вверху таблицы контекстное меню «Файл» и нажмите «Сохранить как».
Сохраните файл на компьютер, выбрав тип файла «Книга Excel». Таблица сохранится в новом расширении xlsx и будет весить меньше. Для сравнения: наш файл xls весил чуть больше 200 Кб, а новый xlsx более чем в два раза меньше – 78 Кб.
Сжатие файлов онлайн
Можно воспользоваться онлайн-сервисами, которые предлагают сжать эксель файл. Один из таких – Wecompress (https://www.wecompress.com/ru/). Заходим на главную страницу и выбираем файл, нажав на плюсик.
Дождитесь окончания сжатия. Чем больше размер файла, тем дольше это займет времени.
В нашем случае сервис вообще не нашел элементов, которые можно сжать, о чем мы увидели сообщение.
Попробуем взять таблицу с изображением, чтобы посмотреть, как качественно работает сервис.
Мы загрузили файл размером 856 Кб, а вышло в итоге 356 Кб. Сервис быстро удалил ровно 500 Кб лишнего объема.
Кстати, можно установить расширение Wecompress для браузера Google Chrome.
Итак, сжать таблицу Excel можно с помощью 6 способов:
- удалить лишнее форматирование;
- удалить пустые строки и ячейки;
- убрать ссылки или сделать их статичными;
- сжать изображения внутри таблицы;
- изменить разрешение файла на xlsx;
- воспользоваться онлайн-сервисом и сжать файл.
Воспользуйтесь одним из способов, чтобы уменьшить объем excel файла и ускорить работу с таблицами.
Читайте еще много полезных статей о программе Excel:
Как уменьшить размер файла
Данный вопрос возникает периодически на различных форумах. Решил написать некоторые рекомендации по уменьшению веса файла. Применив их Вы сможете понять — действительно ли Ваши данные настолько раздувают файл или же в файле имеется много лишнего.
Почему я это пишу. Бывают ситуации, когда в файле всего один лист, данных на нем на 1000 строк и 20 столбцов. Никаких формул, только значения. Но размер файла непомерно велик — скажем 10 Мб. Этого недопустимо. Или есть различные формулы, но Вы все равно считаете, что размер файла не соответствует тому, что должно бы быть.
Автоматически убрать все лишнее из файла так же поможет команда надстройки MulTEx Оптимизировать книгу
При этом описанные ниже причины, которые влияют на размер файла, так же могут влиять и на его «быстродействие».
Следующие действия необходимо проделать на каждом листе книги:
- Первое, что необходимо вспомнить — а не в общем ли доступе файл ? Если в Общем, то есть вероятность, что размер файла растет именно из-за этого. Дело в том, что при установке общего доступа к файлу, по умолчанию ведется журнал изменений, в который записываются все действия, произведенные в книге каждым пользователем за период, указанный в параметрах. Чем больше пользователей — тем сильнее раздувается файл. Как избавиться или изменить период:
Excel 2007 и выше : вкладка Рецензирование (Review) — Доступ к книге (Shared workbook) ;
Excel 2003 : Сервис — Доступ к книге.
Переходим на вкладку Подробнее(Advanced) и выбираем Не хранить журнал изменений (don’t keep change history) .
Еще лучше — снять общий доступ с книги, сохранить. Если общий доступ все еще нужен, то открываем книгу и опять даем общий доступ, но теперь устанавливаем кол-во дней, в течении которых надо хранить журнал. По умолчанию — 30, но можно сделать меньше, если файл сильно разбухает за озвученный период. Далее неплохо бы отключить оба пункта в разделе Включить в личное представление (Include in personal view) : параметры печати (Print settings) и фильтры (Filter settings) . Личные представления позволяют сохранять для каждого пользователя файла свои параметры печати и настройки фильтров. Чем больше разных пользователей – тем больше настроек сохраняется и тем выше вероятность замедления работы файла и увеличения его размеров. А практическая ценность этих пунктов в ущерб удобству и быстроте работы с файлом сомнительная.
После этого сохранить файл.
Подробнее про общий доступ можно прочитать в статье: Ведение журнала сделанных в книге изменений - Убедитесь, что лист не содержит ячеек без данных , но занимающих пространство. Перейдя на лист, нажмите Ctrl+End. Активируется последняя ячейка листа. Если она расположена ниже или правее последних нужных рабочих данных — то удалите все строки и столбцы после последних данных таблицы. Удалите полностью строки. Сделать это быстро можно так. Нажимаем Ctrl+End и попадаем на последнюю ячейку. Выделяем эту строку и нажимаем Ctrl+Shift+стрелка Вверх. Выделились все строки вместе с последней строкой данных. Удерживая Shift жмем на клавиатуре стрелку Вниз. Тоже самое и со столбцами.
- Посмотрите лист на предмет форматирования . Необходимо избегать форматирования ЦЕЛИКОМ столбцов либо строк. Это приводит к раздуванию файла. Все форматирование, выходящее за границы таблицы необходимо убрать. А еще лучше — вообще избегать излишнего форматирования, особенно если книгой никто, кроме Вас не пользуется. Вместо Заливки ячеек — Белым цветом ставьте «Нет заливки».Чтобы убрать все форматирование из ячеек: выделяете необходимый диапазон и:
для Excel 2003 : Правка — Очистить — Формат.
В Excel 2007-2010 : вкладка Главная (Home) — Очистить (Clear) —Очистить форматы (Clear formats) - Проверить наличие в книге лишних объектов . Удаляем объекты:
В Excel 2003: меню Правка— Перейти – Выделить – Объекты.
в Excel 2007-2010: вкладка Главная (Home) —Найти и выделить (Find & Select) —Выделение группы ячеек (Go To Special. ) —Объекты (Objects) .
Нажмите Delete. Все объекты на листе будут удалены. Правда есть небольшой шанс, что на листе так же есть и скрытые объекты. Тогда надо идти в редактор VBA (Alt+F11) —Ctrl+R. Отображаете окно свойств (F4). Находите объект ЭтаКнига (ThisWorkbook), в окне свойств этого объекта находите свойство DisplayDrawingObjects и ставите там значение — -4104—xlDisplayShapes. После этого переходите опять на лист и повторяете операции по выделению и удалению объектов, описанные выше. Зачем все так сложно? То, что мы не видим все объекты на листе не означает, что их там нет. Плюс могут быть объекты нулевых размеров. Как правило «невидимые» и «нулевые» объекты попадают на лист в результате копирования из других файлов и работы различных макросов. И в некоторых случаях объекты переносятся с нулевой длиной и шириной или вообще невидимые. Как следствие — объект не видно, но файл увеличивается в размерах. И при каждом копировании он начинает увеличиваться в размерах в геометрической прогрессии, т.к. по умолчанию объекты копируются вместе с ячейками. После нескольких таких копирований-вставок файл начинает дико тормозить даже при выделении ячеек. Выделили ячейку, хотите выделить другую — файл задумался на пару секунд. - Если привыкли помечать ячейки примечаниями (вкладка Рецензирование —Создать примечание), то самое время задуматься так ли это необходимо. Т.к. примечание это тоже объект, то их избыточное количество на листах так же может привести к замедлению работы файла. Удалить все примечания из выделенных ячеек очень просто: выделяем ячейки — вкладка Рецензирование —Удалить. Небольшой совет: если нет прямой необходимости в хранении примечаний именно таким образом, то самый правильный способ выделить отдельный столбец в таблице, в который заносить примечания для строки данных. Данный способ оптимально подходит для таблиц в правильной структуре. Тогда можно будет осуществлять поиск, сортировку и фильтрацию по примечаниям. Если примечаний уже много и информацию из них необходимо перенести в ячейки, то можно воспользоваться этим решением: Как получить текст примечания в ячейку?
- Еще очень хорошо помогает удаление всех формул и связей . Удаление не в прямом смысле: заменить все формулы значениями, которые они вернули. Это можно сделать без макросов: выделяем все ячейки с данными на листе-Копируем-правая кнопка мыши-Специальная вставка-Значения. Но это не очень удобно, если листов много, поэтому я заготовил для этого еще и макрос, который проделает эту операцию на всех листах активной книги:
Sub All_Cells_In_All_Sheets_To_Value() Dim wsSh As Object For Each wsSh In Sheets wsSh.UsedRange.Value = wsSh.UsedRange.Value Next wsSh End Sub
Данный макрос необходимо вставить в стандартный модуль и выполнить (нажав F5 в редакторе VBA или непосредственно с листа: нажать Alt+F8-выбрать макрос All_Cells_In_All_Sheets_To_Value-Выполнить)
Так же в книге могут содержаться имена , которые тоже порой довольно неплохо прибавляют вес файлу. Посмотреть их можно, нажав сочетание клавиш Ctrl+F3на листе. Но может оказаться так, что имена будут скрытыми, и тогда Вы просто так их не увидите. Отобразить их можно при помощи следующего кода:
Sub All_Names_Visible() Dim objName As Object, wsSh As Object For Each objName In ActiveWorkbook.Names objName.Visible = True Next objName For Each wsSh In Sheets For Each objName In wsSh.Names objName.Visible = True Next objName Next wsSh End Sub
Данный код используется как и предыдущий. Он отображает все имена на листе и в книге. После выполнения макроса необходимо повторно нажать сочетание клавиш Ctrl+F3 на листе. Теперь Вы можете удалить ненужные Вам имена. Так же все имена можно сразу удалить при помощи следующего кода:
Sub Delete_All_Names() Dim objName As Object, wsSh As Object On Error Resume Next For Each objName In ActiveWorkbook.Names objName.Delete Next objName For Each wsSh In Sheets For Each objName In wsSh.Names objName.Delete Next objName Next wsSh End Sub
Только применяя данный код Вы должны быть уверены, что Вам действительно не нужны все имена в книге . Т.к. выполнив данный макрос Вы уже не сможете вернуть удаленные имена.
Как сделать лист скрытым?
Как сделать лист очень скрытым
После всех этих действий необходимо сохранить файл, чтобы изменения вступили в силу. Только после этого станет видно изменился размер файла или нет. Я бы советовал сохранять файл как копию, если не уверены, что удалили действительно ненужное.
Статья помогла? Поделись ссылкой с друзьями!
Код Excel для сжатия картинок
Из 1С формируется и сохраняется в Excel отчет с картинками, размер адский получается — 170 метров.
Заходим в Excel (говорю про 2003), выбираем картинку и жмем «формат рисунка», закладка «рисунок», жмем «Сжать. «, выбираем «ко всем рисункам документа», все подтверждаем и размер файла после сохранения падает до 12 метров.
Вопрос, а как это сделать программно? Тот макрос, который генерируется записью макросов ничего подобного сам не делает:
ActiveSheet.Shapes(«Picture 1»).Select
Selection.ShapeRange.PictureFormat.Brightness = 0.5
Selection.ShapeRange.PictureFormat.Contrast = 0.5
Selection.ShapeRange.PictureFormat.ColorType = msoPictureAutomatic
Selection.ShapeRange.PictureFormat.CropLeft = 0#
Selection.ShapeRange.PictureFormat.CropRight = 0#
Selection.ShapeRange.PictureFormat.CropTop = 0#
Selection.ShapeRange.PictureFormat.CropBottom = 0#
То есть если такой макрос запустить еще раз на не сжатых рисунках и сохранить, файл не сжимается.
Также прошу высказывать альтернативные решения.
Импортировать и подогнать размер фотографии можно (см.пример), но вот что касается сжатия, то хоть эта возможность и появилась в Excel XP, но программно она недоступна (если не считать не очень надёжного способа c использованием SendKeys)
1. 1С сохраняет (экспортирует свою мxl таблицу по умолчанию)
в MS EXCEL в формате 05 MS EXCEL)
— хорошо руками открываем файл и сохраняем в нужном нам формате.
Смотрим размер файла — 5,6 мб. уже хорошо, но еще нето.
2. В свойствах рисунка есть замечательная функция сжать.
Сохраняем файл и что мы видим файл весит 0,8 мб. да это прорыв.
Но это каждый раз ручками, лень.
Содержание
-
- 0.0.1 Как правильно вставить картинку или фото в Excel? Как отредактировать изображение?
- 0.0.2 Как прикрепить изображение к ячейке?
- 0.0.2.1 Алгоритм 1. Защита страницы от изменений
- 0.0.2.2 Алгоритм 2. Использование режима разработчика
- 1 Видео: Как в Excel вставить фото
- 2 Особенности вставки картинок
- 2.1 Вставка изображения на лист
- 2.2 Редактирование изображения
- 3 Прикрепление картинки
- 3.1 Способ 1: защита листа
- 3.2 Способ 2: вставка изображения в примечание
- 3.3 Способ 3: режим разработчика
- 3.4 Помогла ли вам эта статья?
Иногда в табличный редактор требуется вставка дополнительных объектов из внешнего хранилища. Попробуем разобраться, как вставить картинку или фото в Excel, а после произвести настройку компонента.
Как правильно вставить картинку или фото в Excel? Как отредактировать изображение?
На первом этапе нужно присоединить картинку к документу.
- Отмечаем курсором нужную ячейку. В меню ВСТАВКА нажать кнопку РИСУНКИ.
- Программа предлагает из окна выбора картинки найти подходящую, пользуясь проводником Windows. В начале отобразится папка ИЗОБРАЖЕНИЯ, расположенная в директории пользователя, поэтому можно сразу переместить нужное фото в неё. После выбора следует нажать на кнопку ВСТАВИТЬ.
На картинке видно, как рисунок по умолчанию помещается на страницу, заполняя буквально всё её пространство в зависимости от разрешения.
Далее следует процедура редактирования, предназначенная для подгонки параметров изображения под документ.
- По нажатию правой кнопки мыши на фото, выпадает меню, в котором нам нужен пункт РАЗМЕР И СВОЙСТВА.
- Программа предлагает окно форматирования картинки, в котором можно найти большое количество разнообразных параметров относительно размеров, настройки качества, добавления эффектов, обрезки по краям и многое другое.
- После добавления фото на лист на ленте настроек активируется вкладка ФОРМАТ, предлагающая оптимальным способом произвести настройку. Об этом есть отдельная статья.
- Если потребуется вставить картинку или фото в Excel в определённую ячейку, нужно изменить размер изображения относительно габаритов этой ячейки. Есть разные способы это сделать:
- Найти нужный пункт в ленте настроек рисунка.
- Через окно РАЗМЕРЫ И СВОЙСТВА.
- При использовании контекстного меню.
- Зажав кнопку мыши, изменить размеры методом перетаскивания границ.
Как прикрепить изображение к ячейке?
Подогнав размеры фото так, чтобы оно не выходило за пределы ячейки, нужно прикрепить его к объекту. Это позволяет при сортировке данных перемещать ячейку вместе с фотографией. Существует несколько вариантов такой процедуры.
Алгоритм 1. Защита страницы от изменений
- Определяем нужный размер картинки и вставляем её в ячейку.
- Нажимаем на фото правой кнопкой мыши и выбираем пункт РАЗМЕР И СВОЙСТВА.
- В левом меню окна ФОРМАТ РИСУНКА выбираем РАЗМЕР, и отмечаем пункты: «Сохранить пропорции», «Относительно исходного размера».
- Нажимаем на пункт меню СВОЙСТВА и отмечаем строки: «Выводить объект на печать», «Защищаемый объект». Активируем вариант привязки к фону: «Перемещать и изменять объект вместе с ячейками». После это нужно нажать на кнопку ЗАКРЫТЬ в нижней части окна, чтобы применить настройки.
Как закрепить рисунок в ячейке для Excel 2016
- При помощи сочетания CTRL+A выделяем всё на странице, и через контекстное меню нажимаем на пункт ФОРМАТ ЯЧЕЕК.
- В открывшемся окне на самой правой вкладке под названием ЗАЩИТА снимает отметку со строки «Защищаемая ячейка» и нажимаем кнопку ОК.
- Теперь аналогичное действие, но для ячейки с картинкой. Выделяем её, заходим в окно ФОРМАТ ЯЧЕЕК и отмечаем пункт «Защищаемая ячейка».
- На ленте настроек находим вкладку РЕЦЕНЗИРОВАНИЕ и нажимаем на кнопку ЗАЩИТИТЬ ЛИСТ.
- В окне защиты нужно ввести комбинацию символов для пароля и нажать ОК. Далее высветится окно, в котором нужно повторно указать пароль.
Теперь картинка привязана к выделенной ячейке и при любом изменении страницы изображение будет перемещаться вслед за ней.
Алгоритм 2. Использование режима разработчика
По умолчанию в редакторе этот режим не активирован, так как его используют только опытные пользователи.
- Переходим в Excel по вкладке ФАЙЛ и находим пункт меню ПАРАМЕТРЫ.
- Находим в появившемся окне пункт слева НАСТРОЙКА ЛЕНТЫ и отмечаем строку «Разработчик» в разделе ОСНОВНЫЕ ВКЛАДКИ. Нажимает ОК.
- Активируем ячейку курсором и во вкладке РАЗРАБОТЧИК на ленте настроек нажимаем кнопку ВСТАВИТЬ. В выпадающем меню нужно выбрать «Изображение» из элементов ActiveX.
- На листе появляется пустой квадрат, размеры которого можно настроить путём перетаскивания границ. Нажимаем на объекте ПКМ и переходим в окно СВОЙСТВА.
- Нужно изменить строку параметра PLACEMENT на «1». В строке PICTURE активируем кнопку с многоточием для вставки изображения.
- В окне проводника находим нужное фото и нажимаем ОТКРЫТЬ.
- После этих действий понадобится привязка картинки. Клацаем на изображении кнопкой мыши и во вкладке РАЗМЕТКА СТРАНИЦЫ нажимаем кнопку УПОРЯДОЧИТЬ. Выбираем пункт ВЫРОВНЯТЬ и нажимаем на кнопку выпадающего списка ПРИВЯЗАТЬ К СЕТКЕ. Далее следует потянуть мышкой за край картинки.
Теперь, так же, как и в первом способе, изображение будет двигаться вместе с ячейкой при сортировке или любом другом изменении расположения строк.
Поделитесь нашей статьей в ваших соцсетях:
(Visited 4 966 times, 1 visits today)
Сейчас сложно найти пользователя, который хотя бы иногда не пользовался программой Excel. В ней можно делать таблицы и расчеты, составлять диаграммы и даже вести домашнюю бухгалтерию. Лицензионную версию данной программы,которая входит в пакет Microsoft Office 2016 вы можете купить у нас со скидкой!
Бывают, ситуации, когда информацию в файле необходимо сопроводить картинкой или изображением. Для этого в электронную таблицу необходимо научиться вставлять фото.
- Откройте файл в программе Excel, в который необходимо добавить иллюстрацию. На панели инструментов откройте «Вставка», потом «Рисунок». Корме этого в Excel необходимо еще и выбрать «Из файла».
Фото, выбранное для вставки, отметьте и активируйте «Вставить». Если есть необходимость, можно изменить размеры картинки и перемещать его.
- Фрагмент иллюстрации можно вставить, используя любую программу для редактирования или просмотра типа фотошопа. Выделите необходимый фрагмент, скопируйте его, нажав на «Скопировать» или используя специальный клавиши — Ctrl+C.
- После этого вам необходимо открыть файл в программке Excel и нажать на «Вставить». Кликнув той же кнопкой на «Формат» и на «Свойства», можно выделить пункт «Перемещать», не меняя параметры.
- Можно также воспользоваться CorelDraw. Зайдите в программу и создайте новый холст нужных параметров. Для этого можно использовать сочетание клавиш Ctrl+N. Импортируйте фото на холст, используя клавиши Ctrl+I. Если нужно измените параметры картинки и откорректируйте ее. В Excel кликните по фото, выделив его. Держа левую кнопку мышки, переместите фото в файл. Появится меню, в котором необходимо выбрать «Копировать как CorelDRAW». Готово.
- Картинку в Excel можно также взять из интернета. Нажав на изображение правой кнопкой мыши, выбирайте «Копировать адрес».
Теперь необходимо открыть файл, куда необходимо вставить иллюстрацию, нажмите «Вставка», потом «Из файла». Скопированную адресную строку в графическом формате вставьте в соответствующее поле. Размер фото и его положение можно менять.
Некоторые задачи, выполняемые в таблицах, требуют установки в них различных изображений или фото. Программа Excel имеет инструменты, которые позволяют произвести подобную вставку. Давайте разберемся, как это сделать.
Особенности вставки картинок
Для того, чтобы вставить изображение в таблицу Эксель, оно сначала должно быть загружено на жесткий диск компьютера или подключенный к нему съёмный носитель. Очень важной особенностью вставки рисунка является то, что он по умолчанию не привязывается к конкретной ячейке, а просто размещается в выбранной области листа.
Урок: Как вставить картинку в Microsoft Word
Вставка изображения на лист
Сначала выясним, как вставить рисунок на лист, а уже потом разберемся, как прикрепить картинку к конкретной ячейке.
- Выделяем ту ячейку, куда вы хотите вставить изображение. Переходим во вкладку «Вставка». Кликаем по кнопке «Рисунок», которая размещена в блоке настроек «Иллюстрации».
- Открывается окно вставки рисунка. По умолчанию оно всегда открывается в папке «Изображения». Поэтому вы можете предварительно перебросить в неё ту картинку, которую собираетесь вставить. А можно поступить другим путем: через интерфейс этого же окна перейти в любую другую директорию жесткого диска ПК или подключенного к нему носителя. После того, как вы произвели выбор картинки, которую собираетесь добавить в Эксель, жмите на кнопку «Вставить».
После этого рисунок вставляется на лист. Но, как и говорилось ранее, он просто лежит на листе и фактически ни с одной ячейкой не связан.
Редактирование изображения
Теперь нужно отредактировать картинку, придать ей соответствующие формы и размер.
- Кликаем по изображению правой кнопкой мыши. Открываются параметры рисунка в виде контекстного меню. Кликаем по пункту «Размер и свойства».
- Открывается окно, в котором присутствует множество инструментов по изменению свойств картинки. Тут можно изменить её размеры, цветность, произвести обрезку, добавить эффекты и сделать много другого. Всё зависит от конкретного изображения и целей, для которых оно используется.
- Но в большинстве случаев нет необходимости открывать окно «Размеры и свойства», так как вполне хватает инструментов, которые предлагаются на ленте в дополнительном блоке вкладок «Работа с рисунками».
- Если мы хотим вставить изображение в ячейку, то самым важным моментом при редактировании картинки является изменение её размеров, чтобы они не были больше размеров самой ячейки. Изменить размер можно следующими способами:
- через контекстное меню;
- панель на ленте;
- окно «Размеры и свойства»;
- перетащив границы картинки с помощью мышки.
Прикрепление картинки
Но, даже после того, как изображение стало меньше ячейки и было помещено в неё, все равно оно осталось неприкрепленным. То есть, если мы, например, произведем сортировку или другой вид упорядочивания данных, то ячейки поменяются местами, а рисунок останется все на том же месте листа. Но, в Excel все-таки существуют некоторые способы прикрепления картинки. Рассмотрим их далее.
Способ 1: защита листа
Одним из способов прикрепить изображение является применение защиты листа от изменений.
- Подгоняем размер рисунка под размер ячейки и вставляем его туда, как было рассказано выше.
- Кликаем по изображению и в контекстном меню выбираем пункт «Размер и свойства».
- Открывается окно свойств рисунка. Во вкладке «Размер» удостоверяемся, чтобы величина картинки была не больше размера ячейки. Также проверяем, чтобы напротив показателей «Относительно исходного размера» и «Сохранить пропорции» стояли галочки. Если какой-то параметр не соответствует указанному выше описанию, то изменяем его.
- Переходим во вкладку «Свойства» этого же окна. Устанавливаем галочки напротив параметров «Защищаемый объект» и «Выводить объект на печать», если они не установлены. Ставим переключатель в блоке настроек «Привязка объекта к фону» в позицию «Перемещать и изменять объект вместе с ячейками». Когда все указанные настройки выполнены, жмем на кнопку «Закрыть», расположенную в нижнем правом углу окна.
- Выделяем весь лист, нажатием сочетания клавиш Ctrl+A, и переходим через контекстное меню в окно настроек формата ячеек.
- Во вкладке «Защита» открывшегося окна снимаем галочку с параметра «Защищаемая ячейка» и жмем на кнопку «OK».
- Выделяем ячейку, где находится картинка, которую нужно закрепить. Открываем окно формата и во вкладке «Защита» устанавливаем галочку около значения «Защищаемая ячейка». Кликаем по кнопке «OK».
- Во вкладке «Рецензирование» в блоке инструментов «Изменения» на ленте кликаем по кнопке «Защитить лист».
- Открывается окошко, в котором вводим желаемый пароль для защиты листа. Жмем на кнопку «OK», а в следующем открывшемся окне снова повторяем введенный пароль.
После этих действий диапазоны, в которых находятся изображения, защищены от изменений, то есть, картинки к ним привязаны. В этих ячейках нельзя будет производить никаких изменений до снятия защиты. В других диапазонах листа, как и прежде, можно делать любые изменения и сохранять их. В то же время, теперь даже если вы решите провести сортировку данных, то картинка уже никуда не денется с той ячейки, в которой находится.
Урок: Как защитить ячейку от изменений в Excel
Способ 2: вставка изображения в примечание
Также можно привязать рисунок, вставив его в примечание.
- Кликаем по ячейке, в которую планируем вставить изображение, правой кнопкой мышки. В контекстном меню выбираем пункт «Вставить примечание».
- Открывается небольшое окошко, предназначенное для записи примечания. Переводим курсор на его границу и кликаем по ней. Появляется ещё одно контекстное меню. Выбираем в нём пункт «Формат примечания».
- В открывшемся окне настройки формата примечаний переходим во вкладку «Цвета и линии». В блоке настроек «Заливка» кликаем по полю «Цвет». В открывшемся перечне переходим по записи «Способы заливки…».
- Открывается окно способов заливки. Переходим во вкладку «Рисунок», а затем жмем на кнопку с одноименным наименованием.
- Открывается окно добавления изображения, точно такое же, как было описано выше. Выбираем рисунок и жмем на кнопку «Вставить».
- Изображение добавилось в окно «Способы заливки». Устанавливаем галочку напротив пункта «Сохранять пропорции рисунка». Жмем на кнопку «OK».
- После этого возвращаемся в окно «Формат примечания». Переходим во вкладку «Защита». Убираем галочку с параметра «Защищаемый объект».
- Переходим во вкладку «Свойства». Устанавливаем переключатель в позицию «Перемещать и изменять объект вместе с ячейками». Вслед за этим жмем на кнопку «OK».
После выполнения всех вышеперечисленных действий, изображение не только будет вставлено в примечание ячейки, но и привязано к ней. Конечно, данный способ подходит не всем, так как вставка в примечание налагает некоторые ограничения.
Способ 3: режим разработчика
Привязать изображения к ячейке можно также через режим разработчика. Проблема состоит в том, что по умолчанию режим разработчика не активирован. Так что, прежде всего, нам нужно будет включить его.
- Находясь во вкладке «Файл» переходим в раздел «Параметры».
- В окне параметров перемещаемся в подраздел «Настройка ленты». Устанавливаем галочку около пункта «Разработчик» в правой части окна. Жмем на кнопку «OK».
- Выделяем ячейку, в которую планируем вставить картинку. Перемещаемся во вкладку «Разработчик». Она появилась после того, как мы активировали соответствующий режим. Кликаем по кнопке «Вставить». В открывшемся меню в блоке «Элементы ActiveX» выбираем пункт «Изображение».
- Появляется элемент ActiveX в виде пустого четырехугольника. Регулируем его размеры перетаскиванием границ и помещаем в ячейку, где планируется разместить изображение. Кликаем правой кнопкой мыши по элементу. В контекстном меню выбираем пункт «Свойства».
- Открывается окно свойств элемента. Напротив параметра «Placement» устанавливаем цифру «1» (по умолчанию «2»). В строке параметра «Picture» жмем на кнопку, на которой изображено многоточие.
- Открывается окно вставки изображения. Ищем нужную картинку, выделяем её и жмем на кнопку «Открыть».
- После этого можно закрывать окно свойств. Как видим, рисунок уже вставлен. Теперь нам нужно полностью привязать его к ячейке. Выделяем картинку и переходим во вкладку «Разметка страницы». В блоке настроек «Упорядочить» на ленте жмем на кнопку «Выровнять». Из выпадающего меню выбираем пункт «Привязать к сетке». Затем чуть-чуть двигаем за край рисунка.
После выполнения вышеперечисленных действий картинка будет привязано к сетке и выбранной ячейке.
Как видим, в программе Эксель имеется несколько способов вставить изображение в ячейку и привязать его к ней. Конечно, способ со вставкой в примечание подойдет далеко не всем пользователям. А вот два остальных варианта довольно универсальны и каждый сам должен определиться, какой из них для него удобнее и максимально соответствует целям вставки.
Мы рады, что смогли помочь Вам в решении проблемы.
Задайте свой вопрос в комментариях, подробно расписав суть проблемы. Наши специалисты постараются ответить максимально быстро.
Помогла ли вам эта статья?
Да Нет
Изменение размеров и обрезка рисунков
Вне зависимости от того, добавили ли вы рисунок из коллекции клипов Office или из другого места, к изображениям на листе книги Excel применяются одинаковые методы изменения размеров и обрезки. Далее при описании этих методов, а также при применении эффектов и стилей к рисункам мы не будем делать различия между рисунками из коллекции клипов и рисунками, добавленными из других источников, поскольку никакой разницы между этими изображениями нет. Вся разница состоит лишь в методе их добавления на лист книги.
Чтобы изменить размеры любого рисунка на листе, нужно выполнить следующие действия.
1. Выделите рисунок на листе, щелкнув на нем кнопкой мыши. По углам рисунка появятся круглые маркеры, а по сторонам – квадратные.
2. Установите указатель мыши на один из круглых маркеров по углам рамки рисунка. Он примет вид двух противоположно направленных стрелок.
3. Нажав и удерживая кнопку мыши, перетащите указатель. В зависимости от того, в какую сторону вы перемещаете указатель мыши, размер рисунка будет увеличиваться или уменьшаться.
4. Отпустите кнопку мыши, когда добьетесь требуемых размеров рисунка.
Обратите внимание, что при таком изменении размера пропорции рисунка остаются неизменными. Ширина и высота рисунка изменяются пропорционально. Кроме того, при изменении размеров путем перетаскивания углового маркера размер трансформируется относительно противоположного угла, то есть противоположный угол остается на месте. Вы можете изменять размеры рисунка относительно его центра, если при перетаскивании углового маркера будете удерживать нажатой клавишу Ctrl.
Чтобы изменить только горизонтальный или вертикальный размер рисунка, перетащите с помощью мыши один из квадратных маркеров. При этом будет изменяться только ширина или высота рисунка, то есть будут изменены пропорции его сторон. Изображение рисунка в этом случае подвергнется искажению (будет растянуто или сжато).
Есть и другой способ изменить размер рисунка.
1. Выделите рисунок.
2. Перейдите на вкладку Формат ленты.
3. Установите значения высоты и ширины рисунка в соответствующих полях группы Размер в сантиметрах. Размеры рисунка будут изменены в соответствии с введенными вами значениями.
Вы также можете воспользоваться расширенными средствами изменения размера рисунка, расположенными в диалоговом окне Размер и свойства.
1. Выделите рисунок.
2. Нажмите кнопку, расположенную в правой нижней части группы Размер на вкладке Формат. Появится диалоговое окно Размер и свойства (рис. 9.4).
Рис. 9.4. Диалоговое окно Размер и свойства
3. Перейдите на вкладку Размер.
4. В полях Высота и Ширина, расположенных в группе Размер и поворот, установите нужные размеры рисунка.
5. Закройте диалоговое окно Размер и свойства.
ПРИМЕЧАНИЕ
Вы также можете изменить размеры рисунка в процентном отношении от первоначального размера. Для этого нужно изменить значения в полях Высота и Ширина в группе Масштаб. Однако, если установлен флажок Сохранять пропорции, вы можете изменять только одну величину (ширину или высоту), вторая будет автоматически изменяться пропорционально.
Мы описали три способа изменения размеров рисунка. Какой из этих способов выбрать, вы решите сами. Возможно, при разных обстоятельствах вы будете прибегать к разным методам изменения размеров.
Вы, наверное, обратили внимание на круглый зеленый маркер, расположенный чуть выше рамки рисунка. Он служит для поворота рисунка.
1. Установите указатель мыши на маркер поворота рисунка. Указатель примет вид круговой стрелки.
2. Нажав и удерживая левую кнопку мыши, переместите указатель вправо или влево. Рисунок будет поворачиваться.
3. Отпустите кнопку мыши, как только повернете рисунок на требуемый угол (рис. 9.5).
Рис. 9.5. Рисунок повернут
Нередки случаи, когда в документе (в нашем случае – на листе книги Excel) нужно разместить не весь рисунок, а только его фрагмент. Конечно, вы можете перед добавлением в документ обработать рисунок в любом графическом редакторе, «отрезав» от него лишние части и сохранив в отдельный файл, но Excel позволяет вам сделать это, не прибегая к помощи сторонних программ. Программа Excel содержит собственный инструмент обрезки изображений.
На рис. 9.6 вы видите изображение мяча и волейбольной сетки. Этот рисунок взят из коллекции клипов Office. Мы обрежем его так, чтобы отсечь сетку и оставить только мяч.
Рис. 9.6. Рисунок до обрезки
1. Выделите рисунок.
2. Нажмите кнопку Обрезка, расположенную в группе Размер вкладки Формат. По периметру рисунка появятся маркеры обрезки.
ПРИМЕЧАНИЕ
Вы можете более точно установить угол поворота рисунка в поле Поворот, расположенном на вкладке Размер диалогового окна Размер и свойства.
3. Перетаскивая границы рамки за маркеры обрезки (угловые или расположенные на сторонах рамки), добейтесь того, чтобы в рамке остался только нужный вам фрагмент (рис. 9.7).
Рис. 9.7. Рисунок после обрезки
4. Щелкните на кнопке Обрезка повторно, чтобы выключить инструмент обрезки.
Вы можете также обрезать рисунок, установив нужные значения в полях, расположенных в группе Обрезка вкладки Размер диалогового окна Размер и свойства.
Программа Excel «помнит» исходные размеры рисунка и его вид до обрезки, то есть в случае необходимости вы можете восстановить обрезанные фрагменты. Для этого достаточно выделить рисунок, выбрать инструмент Обрезка и растянуть его за маркеры обрезки. Ранее обрезанные фрагменты будут восстановлены.
Любые ранее сделанные изменения в рисунке вы можете отменить, вернув рисунок в первоначальный вид. Для этого следует выделить рисунок и нажать кнопку Сброс параметров рисунка. Все совершенные изменения (масштабирование и обрезка) будут отменены, а рисунок предстанет в том виде, в каком вы его добавили на лист книги.
Следующая глава >
Предлагаю всем интересующимся макрос, который масштабирует картинки в Excel.
При открытии книги назначаются сочетания клавиш, которые позволяют каждой картинке в рабочей книге присвоить оригинальное имя, базовый масштаб (в Замещающий текст) и назначить макрос, который при клике на картинку будет выполнять её увеличение.
Отдельные картинки, в режиме когда они увеличены, можно масштабировать динамически с сохранением нового значения масштаба используя клавиши Ctrl+Alt+UP и Ctrl+Alt+DOWN.
Для присвоения базового масштаба картинкам необходимо после открытия книги с данным макросом нажать Ctrl+Alt+Right. По умолчанию картинкам присваивается масштаб равный 90% высоты всех строк, которые видны на экране. Если размеры экрана изменить — изменится и размер увеличенной картинки.
Чтобы заменить значение по умолчанию для всех картинок используются клавиши Ctrl+Alt+Left
Текст макроса с комментариями ниже:
Private Sub auto_open()
Application.OnKey "^%{RIGHT}", "EnumImageV2" 'Запуск перенумерации картинок выполняется по нажатию клавиш Ctrl+Alt+Стрелка вправо
Application.OnKey "^%{LEFT}", "ImgScaleAll" 'Изменение масштаба всех картинок на листе выполняется по нажатию клавиш Ctrl+Alt+Стрелка влево
ThisWorkbook.OnSheetActivate = "DelImg" 'Сброс увеличенных картинок при переключении листов
End Sub
Private Sub ImgScaleAll()
DelImg 'Удаляются все увеличенные ккартинки
dblSend = InputBox("Масштаб задается в виде положительной десятичной дроби" & Chr(13) & "(разделитель запятая)" & Chr(13) _
& "Чем больше цифра, тем больше картинка", "Укажите масштаб для ВСЕХ картинок", 0.9)
On Error Resume Next
dblSend = CDbl(dblSend) 'Если введено правильное число, через запятую, то все пойдёт дальше, иначе сообщение об ошибке
If Err Then
If MsgBox("Вы ввели неверное значение" & Chr(13) & "Хотите повторить?", vbYesNo) = vbYes Then
ImgScaleAll 'Перезапуск текущего макроса, при желании пользователя повторить ввод
Else: Exit Sub 'При отказе пользователя повторить ввод - выход из макроса
End If
End If
Err.Clear
EnumImageV2 CDbl(dblSend) 'вызывается макрос перенумерации картинок, но в нем не выполняется перенумерация, а просто присваивается новый масштаб
End Sub
Private Sub ImgScalePlus()
With ActiveSheet
For Each ZmImg In .Shapes 'выполняется проверка названий всех картинок на листе
If ZmImg.Name Like "Zoom*" Then 'Отбирается картинка, у которой в названии есть Zoom
strImgName = Mid(ZmImg.Name, 5) 'Вырезается имя исходной картинки
varData = CDbl(.Shapes(strImgName).AlternativeText) + 0.1 'Определяется значение масштабированияя исходной картинки и увеличивается на 10%
.Shapes(strImgName).AlternativeText = CStr(varData) 'Новое значение масштабирования присваивается исходной картинке
ZoomImageV3 CStr(strImgName) 'Вызывается макрос ZommImageV3
End If
Next
End With
End Sub
Private Sub ImgScaleMinus()
With ActiveSheet
For Each ZmImg In .Shapes 'выполняется проверка названий всех картинок на листе
If ZmImg.Name Like "Zoom*" Then 'Отбирается картинка, у которой в названии есть Zoom
strImgName = Mid(ZmImg.Name, 5) 'Вырезается имя исходной картинки
varData = CDbl(.Shapes(strImgName).AlternativeText) - 0.1 'Определяется значение масштабированияя исходной картинки и уменьшается на 10%
.Shapes(strImgName).AlternativeText = CStr(varData) 'Новое значение масштабирования присваивается исходной картинке
ZoomImageV3 CStr(strImgName) 'Вызывается макрос ZommImageV3
End If
Next
End With
End Sub
Private Sub EnumImageV2(Optional dblSnd As Double)
' Макрос находит все картинки в активной книге и нумерует их по порядку
' начиная с левого верхнего угла и после присвоения номера сразу назначает картинке макрос ZoomImageV3
' совершенно не важно когда запускать этот макрос: до назначения масштабирования или после
' масштаб, который указан в замещающем тексте представляет собой процент от размеров текущей рабочей области представленной на экране
i = 1
For Each varShtsItm In ActiveWorkbook.Sheets
For Each varImgItm In varShtsItm.Shapes
If varImgItm.Name Like "Image_*" Then 'Отрабатывает при запуске пользователем макроса по изменению масштаба для всех картинок
If dblSnd > 0 Then varImgItm.AlternativeText = dblSnd 'Если масштаб был изменён, то значение записывается в Замещающий текст картинки
Else 'Если картинка ранее не нумеровалась, то меняется её имя и ей присваивается номер
varImgItm.Name = "Image_" & i 'Новые Имя и номер картинки
varImgItm.OnAction = "ZoomImageV3" 'Назначение макроса масштабирующего картинку
varImgItm.AlternativeText = "0,9" 'Запись в замещающий текст масштаба по умолчанию
End If
i = i + 1
Next
Next
End Sub
Private Sub ZoomImageV3(Optional strImgName As String)
Attribute ZoomImageV3.VB_ProcData.VB_Invoke_Func = " n14"
Dim dblWinHeight As Double, dblWinWidth As Double
Dim dblWinCenterTop As Double, dblWinCenterLeft As Double 'переменные для определения параметров окна
Dim objPict0 As Shape, objPict As Shape 'переменные-объекты для работы с картинками
Dim PictZoom As Double 'Переменная определяет размер картинки по которому она будет отмасштабирована
With ActiveWindow.VisibleRange 'Вычисляем параметры видимой на экране области
dblWinHeight = WorksheetFunction.Round(.Height, 2) 'Высота видимой области ячеек
dblWinWidth = WorksheetFunction.Round(.Width, 2) 'Ширина видимой области ячеек
dblWinCenterTop = WorksheetFunction.Round(.Top + dblWinHeight / 2, 2) 'Расстояние сверху до центра видимой области ячеек
dblWinCenterLeft = WorksheetFunction.Round(.Left + dblWinWidth / 2, 2) 'Расстояние слева до центра видимой области ячеек
End With
On Error Resume Next
Set objPict0 = ActiveSheet.Shapes(Application.Caller) 'Обработка нажатия мышкой на картинке
If Err Then
V = strImgName
Set objPict0 = ActiveSheet.Shapes(V)
End If
Err.Clear
On Error Resume Next
DelImg 'Проверка наличия и удаление увеличенных рисунков, отмена назначения кнлавиши ESC (подпрограмма)
If Err Then Exit Sub 'Если удаление картинки было вызвано отмасштабированной картинкой, то происходи выход из макроса
Err.Clear
On Error Resume Next
сZoomWin = CDbl(objPict0.AlternativeText) 'переменная, задающая коэффициент масштабирования картинки относительно границ рабочей области окна, значение берётся из Альтернативного текста картинки
If Err Then
сZoomWin = 0.9 'Если в Альтернативном тексте введено некорректное значение, то присваивается значение по умолчанию
objPict0.AlternativeText = "0,9"
End If
Err.Clear
Set objPict = objPict0.Duplicate 'Создание копии картинку, которая будет увеличиваться
objPict.Name = "Zoom" & objPict.Name 'Добавление к новой картинке префикса "Zoom"
objPict.LockAspectRatio = msoTrue 'Активация свойства рисунка, при котором размеры изменяются пропорционально
If dblWinHeight < dblWinWidth Then 'Проверка параметров окна, что больше высотиа или ширина окна
PictZoom = dblWinHeight * сZoomWin ' Если высота окна меньше ширины, то за основу берётся меньшая величина (высота)
Else
PictZoom = dblWinWidth * сZoomWin ' Если высота окна больше ширины, то за основу берётся меньшая величина (ширина)
End If
With objPict 'Работаем с картинкой и её свойствами
If .Height > .Width Then 'Проверка параметров картинки
.Height = PictZoom 'Если высота картинки больше ширины, то картинка масштабируется по высоте
Else
.Width = PictZoom 'Если высота картинки меньше ширины, то картинка масштабируется по ширине
End If
.Top = WorksheetFunction.Round(dblWinCenterTop - (.Height / 2), 2) 'Определение положения верхней границы картинки
.Left = WorksheetFunction.Round(dblWinCenterLeft - (.Width / 2), 2) 'Определение положения левой границы картинки
End With
Application.OnKey "{ESC}", "DelImg" 'Назначение клавиши ESC для удаления увеличенных картинок
Application.OnKey "^%{UP}", "ImgScalePlus" 'Увеличение масштаба отдельной картинки выполняется по нажатию клавиш Ctrl+Alt+Стрелка вверх
Application.OnKey "^%{DOWN}", "ImgScaleMinus" 'Уменьшение масштаба отдельной картинки выполняется по нажатию клавиш Ctrl+Alt+Стрелка вниз
End Sub
Private Sub DelImg()
With ActiveSheet
For Each ZmImg In .Shapes 'выполняется проверка названий всех картинок на листе
If ZmImg.Name Like "Zoom*" Then ZmImg.Delete 'удаляются картинки с названием, содержащим "Zoom"
Next
End With
Application.OnKey "{ESC}" 'Присвоение клавише ESC стандартной функции
Application.OnKey "^%{UP}" 'Сброс функционала клавиш
Application.OnKey "^%{DOWN}" 'Сброс функционала клавиш
End Sub