Как выбрать все изображения в excel

Как
выделить все картинки в Excel. 

Чтобы
выделить одну картинку или фигуру, достаточно нажать на неё левой кнопкой
мыши.
Но, как выделить сразу все картинки на листе Excel.
Слава создателям Excel
– есть такая функция. У
нас вставлены такие картинки и фигура на листе Excel.
Нам нужно их все выделить сразу и быстро.

Нажимаем
клавишу F5 или сочетание клавиш «Ctrl»
+ «G». Появится окно «Переход».
В нем нажимаем на кнопку «Выделить». Появится другое диалоговое окно. В нем
ставим галочку у слова «Объекты». Нажимаем кнопку «ОК».

Источник

Как выбрать все объекты, например все изображения и все диаграммы? В этой статье представлены сложные способы выбора всех объектов, выделения всех изображений и простого выбора всех диаграмм на активном листе в Excel.

  • Выбрать все объекты на активном листе
  • Выбрать все изображения на активном листе
  • Выбрать все диаграммы на активном листе
  • Удалить все объекты / изображения / диаграммы / формы на активных / выбранных / всех листах

Выбрать все объекты на активном листе

Вы можете применить Перейти к команда, чтобы легко выбрать все объекты. Вы можете сделать это, выполнив следующие действия:

Шаг 1: нажмите F5 , чтобы открыть Перейти к диалоговое окно.

Шаг 2: нажмите Особый в нижней части, чтобы открыть Перейти к Специальное диалоговое окно.

Шаг 3: в Перейти к специальному диалоговое окно, проверьте Объекты опцию.

Шаг 4: нажмите OK. Затем он выбирает все типы объектов на активном листе, включая все изображения, все диаграммы, все формы и т. Д.

Легко вставляйте несколько картинок / изображений в ячейки в Excel

Обычно изображения вставляются над ячейками в Excel. Но Kutools for ExcelАвтора Импорт изображений Утилита может помочь пользователям Excel пакетно вставлять каждое изображение / изображение в одну ячейку, как показано ниже.

объявление вставить картинку 1

Kutools for Excel — Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная пробная версия 30-день, кредитная карта не требуется! Get It Now

Выбрать все изображения на активном листе

Кажется, нелегкий способ выбрать все изображения, кроме ручного выбора каждого из них. Фактически, макрос VB может помочь вам быстро выбрать все изображения на активном листе.

Шаг 1: Удерживайте ALT + F11 ключи, и он открывает Microsoft Visual Basic для приложений окно.

Шаг 2: нажмите Вставить > Модулии вставьте следующий макрос в окно модуля.

VBA: выбрать все изображения на активном листе

Public Sub SelectAllPics()
ActiveSheet.Pictures.Select
End Sub

Шаг 3: нажмите F5 ключ для запуска этого макроса. Затем он сразу выбирает все изображения на активном листе.

Выбрать все диаграммы на активном листе

Макрос VB также может помочь вам выбрать все диаграммы на активном листе.

Шаг 1: Удерживайте ALT + F11 ключи, и он открывает Microsoft Visual Basic для приложений окно.

Шаг 2: нажмите Вставить > Модулии вставьте следующий макрос в окно модуля.

VBA: выбрать все диаграммы на активном листе

Public Sub SelectAllCharts()
ActiveSheet.ChartObjects.Select
End Sub

Шаг 3: нажмите F5 ключ для запуска этого макроса. Этот макрос будет выбирать все виды диаграмм на активном листе в мгновение ока.

Быстро удалить все объекты / изображения / диаграммы / формы на активных / выбранных / всех листах

Иногда вам может потребоваться удалить все изображения, диаграммы или фигуры из текущего рабочего листа, текущей рабочей книги или указанных рабочих листов. Вы можете подать заявку Kutools for ExcelУтилита удаления иллюстраций и объектов для удобного архивирования.

Kutools for Excel — Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная пробная версия 30-день, кредитная карта не требуется! Get It Now

1. Нажмите Кутулс > Удалить > Удалить иллюстрации и объекты.

2. В открывшемся диалоговом окне вам необходимо:

doc выбрать объекты 5

(1) В Удалить В разделе укажите типы объектов, которые вы хотите удалить.

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

(2) В Заглянуть раздел, укажите область удаления.

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

Kutools for Excel — Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная пробная версия 30-день, кредитная карта не требуется! Get It Now

3. Нажмите Ok кнопку.

Затем все диаграммы и изображения удаляются с указанных рабочих листов.

Демо: легко удалять все объекты (изображения и диаграммы) в Excel

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

Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

вкладка kte 201905

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

офисный дно

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


Номинальный 5 из 5


·


рейтинги 1

Источник

Содержание

  1. Excel как выделить все картинки на листе
  2. Как изменить сразу все картинки на листе
  3. Удаление всех объектов на листе в Excel
  4. Удаление картинок и объектов в Excel средствами программы
  5. Удаление картинок и объектов в Excel с помощью макроса VBA
  6. Как в excel выделить все картинки
  7. Отображаем невидимые объекты на листе MS EXCEL
  8. Выделить всё в Word.
  9. Выделение одного или нескольких листов
  10. Стрелочка выделения объектов рисунка в 2010 Экселе
  11. Как в новых Excel’ax выделить объекты (картинки, стрелочки, фигуры)
  12. Как легко выделить все объекты (рисунки и диаграммы) в Excel?
  13. Выбрать все объекты на активном листе
  14. Легко вставляйте несколько изображений/изображений в ячейки в Excel
  15. Выбрать все изображения на активном листе
  16. Выбрать все диаграммы на активном листе
  17. Быстро удалить все объекты/изображения/диаграммы/фигуры на активных/выбранных/всех листах
  18. Демо: легко удаляйте все объекты (изображения и диаграммы) в Excel
  19. Статьи по теме

Excel как выделить все картинки на листе

Как изменить сразу все картинки на листе

Если вы хотите изменить сразу все картинки, ранее вставленные на лист, надо сначала их все выделить.

После того, как вы выделили все картинки, вы можете их

  • удалить, нажав клавишу Delete
  • масштабировать, потянув мышом за угол любой картинки
  • перетащить в любую сторону сразу все картинки
  • изменить в свойствах картинки режим привязки к ячейкам, чтобы можно было сортировать / фильтровать таблицу с картинками
  • поменять любые другие свойства изображений, воспользовавшись инструментами Excel на ленте на вкладке Работа с рисунками

Для выделения всех картинок:

  1. выделяем одну любую картинку
    (если картинке назначена гиперссылка, то удерживайте клавишу Ctrl для выделения)
  2. Нажимаем Ctrl + A для выделения всех картинок на листе

Второй вариант, как выделить все картинки:

  1. Нажимаем Ctrl + G
    Появится диалоговое окно Переход, а в нём снизу — кнопка Выделить
  2. Нажимаем кнопку Выделить, выбираем опцию «Объекты», жмём ОК

Удаление всех объектов на листе в Excel

При копировании на рабочий лист Excel информации со страницы из сети Интренет периодически помимо текста вставляются ненужные картинки и различные элементы управления (кнопки, флажки и т.д.). Если их количество значительное, то удалять «вручную» окажется трудоемким процессом.

Имеется несколько способов решить данную проблему: средствами программы Excel и с помощью макроса VBA.

Удаление картинок и объектов в Excel средствами программы

В результате вставки данных со страницы Интернет-сайта скопировались ненужные картинки и элементы управления:

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

В открывшемся окне необходимо выбрать пункт «Объекты» и кликнуть «OK«:

В результате Excel выделит все требуемые объекты (если необходимо какие то элементы оставить, то необходимо зажать клавишу Ctrl и левой кнопкой мыши кликнуть на необходимые элементы, для снятия выделения):

Теперь осталось только нажать клавишу Delete, чтобы удалить все выделенные объекты.

Удаление картинок и объектов в Excel с помощью макроса VBA

Указанную выше проблему можно решить, написав в редакторе Visual Basic следующий макрос:

Если же необходимо удалить только картинки, тогда макрос необходимо изменить на:

Можно дополнить макрос еще одной полезной функцией — удаление гиперссылок:

Объединив два действия в одну функцию DeleteObjects будут удалены все объекты и ссылки:

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

Источник

Как в excel выделить все картинки

Отображаем невидимые объекты на листе MS EXCEL

​Смотрите также​ объектов несколько десятков​Excel-ok​: Раньше (в 2003​Разгруппировать листы​ листа, который требуется​ кнопок внизу страницы.​В Word 2013 появилась​ рисунки в Word.​А выделить абзац,​,​

​.​ окна выбираем функцию​Выделить в Word все​Word​

​ оставшиеся элементы (верхнюю​ в режим Конструктора​При импорте содержимого web-страниц​ или больше («А​: раньше я как-бы​

​ версии экселя) для​.​ выделить.​ Для удобства также​​ возможность редактировать документ​​Если без макросов,​ чтобы изменить формат,​

​строку​​Сначала выделим слово​ «Выделить все».​ – весь документ​.​ группу).​ (Разработчик/ Элементы управления).​ на лист EXCEL​ при нажатом Ctrl​ обводил стрелкой область​ выделения рисунков (различных​Примечания​Несколько несмежных листов​ приводим ссылку на​

​ в формате pdf,​ то выделяем первую​ шрифт, т.д. можно​,​ нужного формата, например​Как​

​ сразу​Первый способ.​Аналогичный подход может быть​ Чтобы открыть вкладку​ может попасть множество​ кликнуть по объектам​ внутри которй находились​ объектов, созданных в​Данные, введите или измените​Щелкните ярлычок первого листа,​ оригинал (на английском​ вставить видео, т.д.​ таблицу, нажимаем клавишу​​ так. Ставим курсор​​область ячеек​ с жирным шрифтом.​выделить вставленные фигуры в​.​Чтобы выделить текст,​ использован и для​ Разработчик зайдите в​

​ ненужных объектов: картинок,​ не пробовали. » -​ объекты и объекты​

​ программе: круги, прямоугольники​
​ в активный лист​ а затем удерживая​ языке) .​ Но, документы, созданные​ «Ctrl», удерживая ее​ у начала абзаца,​,​ Нажимаем кнопку функции​Word.​Есть сочетание клавиш,​ слово, букву, абзац,​ объектов, созданных самостоятельно.​ меню Кнопка офис/​ элементов управления, таблиц,​ можно попробовать сравнить​ становились выделенными, после​ и т.д.) пользовался​

Выделить всё в Word.

Выделение одного или нескольких листов

​ отменить выделение, нажав​​ каком языке вы​Второй способ.​ Затем остается этот​ группы ячеек выделяет​Нажимая на название объекта​ нарисованные/вставленные объекты. А​Z​ кончике не устраивает. ​ на одном листе).​ заголовка в верхней​Перейдите на вкладку лист,​ материалами на вашем​ Word.​ выделенный фрагмент. Затем,​ текст». Можно выделить,​ менять формат, цвет,​ левой мышкой в​ печатаете, нажимаете клавишу,​Ставим курсор в​ текст скопировать в​ сначала объекты из​

​ (Picture 1) можно​ в новых эксэлах​: А при нажатом​Казанский​ Важно убедитесь, что​ части листа. Чтобы​ который вы хотите​ языке. Эта страница​Выделяем один или​ нажимаем клавишу «Ctrl»,​ обвести, написать, закрасить,​ шрифт, т.д. Например,​ любом месте листа​

​ начало текста, абзаца,​

​ нижней группы (наподобие​ выделить объект, затем​ не могу ни​

​ Ctrl кликнуть по​: В 2007 Главная​ выбрана только один​ отменить выделение нескольких​ изменить.​

​ переведена автоматически, поэтому​

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

​ который будем выделять.​

​Рассмотрим, как​ выделения нижнего слоя).​ клавишей​ где найти эту​ объектам не пробовали. ​ — Редактирование -​

​ листов в книге,​Если вы не видите​ ее текст может​ Нажимаем кнопку «Office»​ и выделяем другие​​ т.д. мышкой. Или,​​Как найти в документе​

​ окне, снова нажать​​ клавиш в Word​​ Нажимаем клавишу «Shift».​​выделить в Word всё​ После их выделения,​DEL​ иконку.​Excel-ok​ Найти и выделить​ как копирование или​ щелкните лист или​ вкладку, которую вы​ содержать неточности и​ в левом верхнем​ фрагменты левой нажатой​ стилусом или пальцем,​ Word слова, формат​​ на функцию «Выбор​​ смотрите в статье​

​ Удерживаем ее нажатой​

​–​ а затем удаления​– удалить его​Abram pupkin​: пробовал, но удобнее​ — Выбор объектов.​ перемещение данных на​ не выбрано. Если​ хотите, нажмите кнопки​

​ грамматические ошибки. Для​ углу окна Word.​ мышкой.​ если сенсорный экран​ текста, символы, т.д.,​ объектов». Как вставить​ «Горячие клавиши Word»​ и передвигаем курсор​весь документ​ с помощью клавиши​ если нужно.​: вставить:​ обводить. ​Юрий М​ другой лист.​ ни одна таблица​

​ прокрутки, чтобы найти​ нас важно, чтобы​ В появившемся окне​Внимание!​ у ноутбука, планшета.​

Стрелочка выделения объектов рисунка в 2010 Экселе

​ смотрите в статье​​ фигуры, смотрите в​ тут.​ в конец текста,​Word, фрагменты текста, таблицу,​DEL​Совет​Вставка — фигуры​Маугли​: Z, разговор о​

​Если сохранить и закрыть​ не выбрано невидим,​ на вкладке.​
​ эта статья была​ выбираем функцию «Печать».​Когда нажата клавиша​Как выделить абзац в​ «Поиск в документе​ статье «Закладка Word​

​Ещё вариант -​​ который выделяем. Отпускаем​ столбец, абзац, результат​, можно приниматься за​

​: чтобы удалить элемент​​ (или картинка)​: В настройке ПБД​ другой стрелочке -​ книгу со сгруппированными​

​ щелкните правой кнопкой​​Несколько смежных листов​ вам полезна. Просим​ В диалоговом окне​ «Ctrl» перемещение по​ документе Word.​ Word» тут.​

​ «Вставка»» здесь.​​ на закладке «Главная»​ клавишу «Shift». Так​ поиска, рисунок​ вторую группу объектов.​ управления (см. Control​Выделить и изменить​ 2007 эта стрелочка​ стрелка для выделения​

​ листами, при последующем​ мыши ярлычок выделенного​Щелкните ярлычок первого листа,​ вас уделить пару​ «Печать» в разделе​ документу осуществлять полосой​Выделить абзац в​

​Как выделить ячейку в​​Чтобы​ в разделе «Редактирование»​ можно быстро выделить​, т.д.​

​ Заново вызовите Инструмент​​ 13 на рисунке​ уже вставленную -​ есть:выбор объектов​

​ объектов 🙂 Появляется,​​ открытии файла выделенные​ листа и выберите​

​ а затем удерживая​​ секунд и сообщить,​ «Страницы» ставим галочку​ прокрутки, не колесиком​

​ тексте можно отступом.​​ таблице Word​выделить текст одного формата​ нажимаем на кнопку​ всю страницу, большой​Как выделить текст, абзац​ Выделение группы ячеек,​ выше) необходимо перейти​ правая кнопка -​Excel-ok​ когда отображаем панель​ листы останутся сгруппированными.​

Как в новых Excel’ax выделить объекты (картинки, стрелочки, фигуры)

​ в контекстном меню​ нажатой клавишу SHIFT,​ помогла ли она​ у слов «Выделенный​ мышки.​ Смотрите статью «Табуляция​,​ в​ «Выделить». Из появившегося​ фрагмент текста.​ в документе​ который выделит теперь​ на вкладке Разработчик​ формат рисунка​: особенно актуально когда​ рисования (2003)​

​Excel-ok​​ команду​
​ щелкните ярлычок последнего​ вам, с помощью​
​ фрагмент».​Как выделить все таблицы,​ в Word».​столбец​

Источник

Как легко выделить все объекты (рисунки и диаграммы) в Excel?

Как выбрать все объекты, например все изображения, и все диаграммы? В этой статье будут представлены сложные способы выбора всех объектов, выделения всех изображений и простого выбора всех диаграмм на активном листе в Excel.

  • Выбрать все объекты на активном листе
  • Выбрать все изображения на активном листе
  • Выбрать все диаграммы на активном листе
  • Удалить все объекты/изображения/диаграммы/фигуры на активном/выбранном/всех листах
  • Повторное использование чего угодно: добавляйте наиболее часто используемые или сложные формулы, диаграммы и все остальное в избранное и быстро используйте повторно их в будущем.
  • Более 20 функций текста: Извлечь Число из текстовой строки; Извлечь или удалить часть текстов; Преобразование чисел и валют в английские слова.
  • Инструменты слияния: несколько книг и листов в одну; Объединить несколько ячеек/строк/столбцов без потери данных; Объедините повторяющиеся строки и суммируйте.
  • Инструменты разделения: разделение данных на несколько листов в зависимости от значения; Из одной книги в несколько файлов Excel, PDF или CSV; Один столбец в несколько столбцов.
  • Вставить пропуск скрытых/отфильтрованных строк; Подсчет и сумма по цвету фона; Массовая отправка персонализированных писем нескольким получателям.
  • Суперфильтр: создавайте расширенные схемы фильтров и применяйте их к любым листам; Сортировать по неделе, дню, частоте и т. Д. Фильтр жирным шрифтом, формулами, комментарием …
  • Более 300 мощных функций; Работает с Office 2007-2019 и 365; Поддерживает все языки; Простое развертывание на вашем предприятии или в организации.

Выбрать все объекты на активном листе

Сэкономьте 50% своего времени и уменьшите тысячи щелчков мышью каждый день!

Вы можете применить команду Перейти к , чтобы выбрать все объекты легко. Это можно сделать, выполнив следующие действия:

Шаг 1. Нажмите клавишу F5 , чтобы открыть диалоговое окно Перейти .

Шаг 2. Нажмите кнопку Special внизу, чтобы открыть диалоговое окно Go To Special.

Шаг 3. В диалоговом окне Перейти к специальному установите флажок Объекты .

Шаг 4. Нажмите OK . Затем он выбирает все типы объектов на активном листе, включая все изображения, все диаграммы, все формы и т. д. на.

Легко вставляйте несколько изображений/изображений в ячейки в Excel

Обычно изображения вставляются над ячейками в Excel. Но Kutools для Excel с помощью утилиты Импорт изображений может помочь пользователям Excel пакетно вставлять каждое изображение/изображение в одну ячейку, как показано на скриншоте ниже. Бесплатная пробная версия на 30 дней!

Kutools for Excel – включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная 30-дневная пробная версия, кредитная карта не требуется! Получить сейчас

Выбрать все изображения на активном листе

Кажется, нелегкий способ выбрать все изображения, кроме выбора вручную каждый. На самом деле, макрос VB может помочь вам выбрать все изображения в активном листе быстро.

Шаг 1. Удерживая нажатыми клавиши ALT + F11 , откроется Microsoft Visual Basic для приложений window.

Шаг 2: Нажмите Вставить > Module и вставьте следующий макрос в окно модуля.

VBA: выбрать все изображения на активном листе

Шаг 3. Нажмите клавишу F5 для запуска этого макроса. Затем он немедленно выбирает все изображения на активном листе.

Выбрать все диаграммы на активном листе

Макрос VB также может помочь вам выбрать все диаграммы на активном листе.

Шаг 1. Удерживайте ALT + F11 , и откроется окно Microsoft Visual Basic для приложений .

Шаг 2. Нажмите Вставить > Module и вставьте следующий макрос в окно модуля.

VBA: выберите все диаграммы на активном листе

Шаг 3: Нажмите клавишу F5 , чтобы запустить этот макрос. Этот макрос выберет все виды диаграмм на активном листе в мгновение ока.

Быстро удалить все объекты/изображения/диаграммы/фигуры на активных/выбранных/всех листах

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

Kutools for Excel – включает более 300 удобных инструментов для Excel. Полнофункциональная 30-дневная бесплатная пробная версия, кредитная карта не требуется! Получить сейчас

1. Нажмите Kutools > Удалить > Удалить иллюстрации и объекты .

2. В открывшемся диалоговом окне вам необходимо:

(1) В разделе Удалить укажите типы объектов, которые вы хотите удалить. .

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

(2) В Посмотрите в разделе , укажите область удаления.

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

Kutools for Excel – включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная 30-дневная пробная версия, кредитная карта не требуется! Получить сейчас

3. Нажмите кнопку Ok .

Затем все диаграммы и изображения будут удалены с указанных листов.

Демо: легко удаляйте все объекты (изображения и диаграммы) в Excel

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

Легко удалить все изображения

Удалить все диаграммы Рабочие книги

Быстро удалить все автофигуры

Быстро удалить все текстовые поля

Источник

Источник

Как изменить сразу все картинки на листе

Если вы хотите изменить сразу все картинки, ранее вставленные на лист, надо сначала их все выделить.

После того, как вы выделили все картинки, вы можете их

  • удалить, нажав клавишу Delete
  • масштабировать, потянув мышом за угол любой картинки
  • перетащить в любую сторону сразу все картинки
  • изменить в свойствах картинки режим привязки к ячейкам, чтобы можно было сортировать / фильтровать таблицу с картинками
  • поменять любые другие свойства изображений, воспользовавшись инструментами Excel на ленте на вкладке Работа с рисунками

Для выделения всех картинок:

  1. выделяем одну любую картинку
    (если картинке назначена гиперссылка, то удерживайте клавишу Ctrl для выделения)
  2. Нажимаем Ctrl + A для выделения всех картинок на листе

Второй вариант, как выделить все картинки:

  1. Нажимаем Ctrl + G
    Появится диалоговое окно Переход, а в нём снизу — кнопка Выделить
  2. Нажимаем кнопку Выделить, выбираем опцию «Объекты», жмём ОК

При копировании на рабочий лист Excel информации со страницы из сети Интренет периодически помимо текста вставляются ненужные картинки и различные элементы управления (кнопки, флажки и т.д.). Если их количество значительное, то удалять «вручную» окажется трудоемким процессом.

Имеется несколько способов решить данную проблему: средствами программы Excel и с помощью макроса VBA.

Удаление картинок и объектов в Excel средствами программы

В результате вставки данных со страницы Интернет-сайта скопировались ненужные картинки и элементы управления:

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

В открывшемся окне необходимо выбрать пункт «Объекты» и кликнуть «OK«:

В результате Excel выделит все требуемые объекты (если необходимо какие то элементы оставить, то необходимо зажать клавишу Ctrl и левой кнопкой мыши кликнуть на необходимые элементы, для снятия выделения):

Теперь осталось только нажать клавишу Delete, чтобы удалить все выделенные объекты.

Удаление картинок и объектов в Excel с помощью макроса VBA

Указанную выше проблему можно решить, написав в редакторе Visual Basic следующий макрос:

Если же необходимо удалить только картинки, тогда макрос необходимо изменить на:

Можно дополнить макрос еще одной полезной функцией — удаление гиперссылок:

Объединив два действия в одну функцию DeleteObjects будут удалены все объекты и ссылки:

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

Источник

Отображаем невидимые объекты на листе MS EXCEL

​Смотрите также​ объектов несколько десятков​Excel-ok​: Раньше (в 2003​Разгруппировать листы​ листа, который требуется​ кнопок внизу страницы.​В Word 2013 появилась​ рисунки в Word.​А выделить абзац,​,​

​.​ окна выбираем функцию​Выделить в Word все​Word​

​ оставшиеся элементы (верхнюю​ в режим Конструктора​При импорте содержимого web-страниц​ или больше («А​: раньше я как-бы​

​ версии экселя) для​.​ выделить.​ Для удобства также​​ возможность редактировать документ​​Если без макросов,​ чтобы изменить формат,​

​строку​​Сначала выделим слово​ «Выделить все».​ – весь документ​.​ группу).​ (Разработчик/ Элементы управления).​ на лист EXCEL​ при нажатом Ctrl​ обводил стрелкой область​ выделения рисунков (различных​Примечания​Несколько несмежных листов​ приводим ссылку на​

​ в формате pdf,​ то выделяем первую​ шрифт, т.д. можно​,​ нужного формата, например​Как​

​ сразу​Первый способ.​Аналогичный подход может быть​ Чтобы открыть вкладку​ может попасть множество​ кликнуть по объектам​ внутри которй находились​ объектов, созданных в​Данные, введите или измените​Щелкните ярлычок первого листа,​ оригинал (на английском​ вставить видео, т.д.​ таблицу, нажимаем клавишу​​ так. Ставим курсор​​область ячеек​ с жирным шрифтом.​выделить вставленные фигуры в​.​Чтобы выделить текст,​ использован и для​ Разработчик зайдите в​

​ ненужных объектов: картинок,​ не пробовали?..» -​ объекты и объекты​

​ программе: круги, прямоугольники​
​ в активный лист​ а затем удерживая​ языке) .​ Но, документы, созданные​ «Ctrl», удерживая ее​ у начала абзаца,​,​ Нажимаем кнопку функции​Word.​Есть сочетание клавиш,​ слово, букву, абзац,​ объектов, созданных самостоятельно.​ меню Кнопка офис/​ элементов управления, таблиц,​ можно попробовать сравнить​ становились выделенными, после​ и т.д.) пользовался​

excel2.ru

Выделить всё в Word.

​ появятся на всех​​ нажатой клавишу CTRL,​​Нажав кнопку вкладок листов​​ в ранних версиях​ ​ нажатой, выделяем следующие​ нажимаем левую мышку,​не смежные ячейки​​ «Выделить». Выбираем из​
​Выбираем из диалогового​ чтобы выделить всё​ ​ т.д. в документе​​СОВЕТ:​
​ Параметры Excel/ Основные/​
​ форм. Часть из​ время на прокликивание​ этого их можно​ довольно удобной стрелочкой,​ выбранных листов. Эти​ щелкните вкладки других​ в нижней части​ Word, открываются в​ таблицы. Можно сделать​ удерживая ее нажатой,​,​ диалогового окна функцию​ окна функции «Выделить»​ в Word -​ Word, ставим курсор​
​Другим способом удаления​ Показывать вкладку Разработчик​
​ этих объектов может​
​ большого количества объектов​ было копировать и/или​ которая была доступна​ изменения может заменять​ листов, которые вы​ окна Excel, можно​ режиме ограниченной функциональности,​ на время выделения​ перемещаем курсор в​области​ «Выделить текст, имеющий​ функцию «Выбор объектов».​
​ «Ctrl» + «А».​ слева от начала​ картинок, объектов (элементов​​ на ленте.​
​ быть скрыта. Научимся​ и их обводку​ перемещать​ на панели рисования.​ данные на активный​ хотите выбрать.​ быстро выделить один​ т.е. новые функции​ таблиц, масштаб меньше​ конец абзаца. Отпускаем​, т.д., смотрите в​ такой же формат».​ Нажимаем и удерживаем​ Нажимаем на клавишу​ слова. Нажимаем левую​ формы), гиперссылок является​Выделить ВСЕ объекты можно​ отображать эти объекты,​ стрелочкой…)​сейчас как сделать​Сейчас (в 2010​ лист и, вероятно,​Все листы книги​ или несколько листов.​
​ Word 2013 не​ – 10% или​ мышку.​ статье «Как выделить​ Все cлова, написанные​ нажатой левую кнопку​ «Ctrl», удерживая ее​
Выделить все в Word. ​ кнопку мыши. Удерживаем​ ​ вставка содержимого web-страницы​ ​ с помощью инструмента​
​ а затем удалять​В старых эксэлах для​ то же самое?​ версии) не смог​ случайно — от​Щелкните правой кнопкой мыши​ Для ввода или​ работают. Как отменить​
​ 20%. При нажатой​Как выделить фрагмент текста​ в таблице Word​
​ жирным форматом, выделятся.​ мыши и протягиваем​
​ нажатой, нажимаем на​ ее нажатой и​ не прямо в​ Выделение группы ячеек​ их.​ этого надо было​ как (с помощью​ ее найти.​ других выбранные листы.​ ярлычок листа и​ редактирования данных на​ этот режим и​
​ клавиши «Ctrl» покрутить​​ в Word​ ячейку, столбец, т.д.».​ ​Какие бывают форматы шрифта,​​ по тексту. Будет​
​ клавишу английской буквы​ ведем курсор вдоль​ EXCEL, а в​ (Главная/ Найти и​Для примера можно скопировать​ зайти в «Рисование»,​ какой стрелки) выделить​Подскажите, пожалуйста, где​Невозможно вставить данные, копировать​ выберите в контекстном​​ нескольких листах одновременно,​ сделать доступными новые​ колесико мышки на​
​или несколько фрагментов​Как выделить слово в​​ смотрите в статье​
​ пунктирная рамка видна.​ «А» на любой​ слова, текста. Выделив​ стандартное приложение Windows​ выделить). Переключатель установить​ содержимое любой web-страницы​ открывалась новая панелька​
Выделить результат поиска в Word.​ несколько объектов обведя​ она может быть​ или Вырезать в​ меню (контекстное меню)​ можно сгруппировать листов,​ возможности Word, смотрите​
​ себя.​ в разных местах​​ Word 2013 для​​ «Закладка Word «Главная»».​​Все фигуры в тексте​​ раскладке клавиатуры. Если​​ нужный текст, отпускаем​​ Блокнот (Notepad.exe). После​​ на Объекты.​​ на лист, например,​​ и там была​​ некоторую область в​​ или как настроить,​ сгруппированных листы на​ команду​ выбрав несколько листов.​
​ в статье «Как​Как удалить лист в​ текста.​ перевода на другой​​Выделить результат поиска в​ в этой рамке​ стоит русский язык,​
​ кнопку мыши. Выделенный​ вставки содержимого web-страницы​На первом рисунке (окно​ .​ иконка с стрелочкой​ которой эти объекты?..​ чтобы она отображалась​ другой лист, поскольку​Выделить все листы​
​ Вы можете форматировать​ убрать режим ограниченной​
​ Word​Выделяем первый фрагмент,​ язык​ Word​
​ выделятся.​ то нажимаем букву​ текст будет виден​ из Буфера обмена​ Область выделения…) видно,​Для отображения скрытых объектов​ мышки (показала на​Excel-ok​ на панели быстрого​ размер области копирования​
​.​ или распечатать несколько​​ функциональности Word 2013″.​, используя выделение, смотрите​ удерживая левую мышку​
​, смотрите в статье​.​Выделятся все разные вставленные​ «Ф» — на​ на темном фоне.​ в новый документ​ все объекты разделены​ необходимо вызвать в​ картинке), выбираешь эту​: помогло! в 2010​ доступа?..​ включает в себя​
​Совет:​
​ листов одновременно.​Примечание:​ в статье «Как​ нажатой (как абзац).​ «Изменения в Word​Как выделить фрагмент текста в Word. ​Теперь, можно функциями​ символы.​
​ этой клавише стоит​ Например, так.​ Блокнота в нем​ на 2 группы​ меню Главная/ Редактирование/​ стрелочку и после​ там же! вопрос​Z​ все слои выбранные​    После выбора нескольких листах​Чтобы выделить​Мы стараемся как​ удалить страницу в​
​ Отпускаем мышку, но​ 2013» здесь.​​ на закладке «Главная»​Чтобы снова перейти в​ английская буква «А».​Здесь мы выделили слово​
​ будет содержаться только​ (группы отделены горизонтальной​
​ Найти и выделить​ этого можно выделить​ закрыт! немного неочевидно​: А чем стрелка​ листы (которые отличается​[Группа]​Выполните следующие действия​ можно оперативнее обеспечивать​ Word».​ не щелкаем курсором,​Здесь же описана​ в разделе «Шрифт»​​ режим печати, нужно​ Не важно, на​ «выделить».​ текст с web-страницы.​ линией). Инструмент Выделение​ команду Область выделения.​ на экране все​ сделано….​ с перекрестием на​ от области вставки​отображается в строке​Один лист​ вас актуальными справочными​Печать выделенного фрагмента в​ чтобы не исчез​ новая функция «Рукописный​ у выделенных слов​

excel-office.ru

Выделение одного или нескольких листов

​ отменить выделение, нажав​​ каком языке вы​Второй способ.​ Затем остается этот​ группы ячеек выделяет​Нажимая на название объекта​ нарисованные/вставленные объекты. А​Z​ кончике не устраивает?..​ на одном листе).​ заголовка в верхней​Перейдите на вкладку лист,​ материалами на вашем​ Word.​ выделенный фрагмент. Затем,​ текст». Можно выделить,​ менять формат, цвет,​ левой мышкой в​ печатаете, нажимаете клавишу,​Ставим курсор в​ текст скопировать в​ сначала объекты из​

​ (Picture 1) можно​ в новых эксэлах​: А при нажатом​Казанский​ Важно убедитесь, что​ части листа. Чтобы​ который вы хотите​ языке. Эта страница​Выделяем один или​ нажимаем клавишу «Ctrl»,​ обвести, написать, закрасить,​ шрифт, т.д. Например,​ любом месте листа​

​ где английская «А».​

​ начало текста, абзаца,​

​ EXCEL.​

​ нижней группы (наподобие​ выделить объект, затем​ не могу ни​

Ярлычок активного листа

​ Ctrl кликнуть по​: В 2007 Главная​ выбрана только один​ отменить выделение нескольких​ изменить.​

​ переведена автоматически, поэтому​

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

​ который будем выделять.​

​Рассмотрим, как​ выделения нижнего слоя).​ клавишей​ где найти эту​ объектам не пробовали?..​ — Редактирование -​

​ лист, перед тем​

​ листов в книге,​Если вы не видите​ ее текст может​ Нажимаем кнопку «Office»​ и выделяем другие​​ т.д. мышкой. Или,​​Как найти в документе​

​ окне, снова нажать​​ клавиш в Word​​ Нажимаем клавишу «Shift».​​выделить в Word всё​ После их выделения,​DEL​ иконку.​Excel-ok​ Найти и выделить​ как копирование или​ щелкните лист или​ вкладку, которую вы​ содержать неточности и​ в левом верхнем​ фрагменты левой нажатой​ стилусом или пальцем,​ Word слова, формат​​ на функцию «Выбор​​ смотрите в статье​

​ Удерживаем ее нажатой​

  • ​–​ а затем удаления​– удалить его​Abram pupkin​: пробовал, но удобнее​ — Выбор объектов.​ перемещение данных на​ не выбрано. Если​ хотите, нажмите кнопки​

  • ​ грамматические ошибки. Для​ углу окна Word.​ мышкой.​ если сенсорный экран​ текста, символы, т.д.,​ объектов». Как вставить​ «Горячие клавиши Word»​ и передвигаем курсор​весь документ​ с помощью клавиши​ если нужно.​: вставить:​ обводить….​Юрий М​ другой лист.​ ни одна таблица​

  • ​ прокрутки, чтобы найти​ нас важно, чтобы​ В появившемся окне​Внимание!​ у ноутбука, планшета.​

support.office.com

Стрелочка выделения объектов рисунка в 2010 Экселе

​ смотрите в статье​​ фигуры, смотрите в​ тут.​ в конец текста,​Word, фрагменты текста, таблицу,​DEL​Совет​Вставка — фигуры​Маугли​: Z, разговор о​

​Если сохранить и закрыть​ не выбрано невидим,​ на вкладке.​
​ эта статья была​ выбираем функцию «Печать».​Когда нажата клавиша​Как выделить абзац в​ «Поиск в документе​ статье «Закладка Word​

​Ещё вариант -​​ который выделяем. Отпускаем​ столбец, абзац, результат​, можно приниматься за​

​: чтобы удалить элемент​​ (или картинка)​: В настройке ПБД​ другой стрелочке -​ книгу со сгруппированными​

​ щелкните правой кнопкой​​Несколько смежных листов​ вам полезна. Просим​ В диалоговом окне​ «Ctrl» перемещение по​ документе Word.​ Word» тут.​

​ «Вставка»» здесь.​​ на закладке «Главная»​ клавишу «Shift». Так​ поиска, рисунок​ вторую группу объектов.​ управления (см. Control​Выделить и изменить​ 2007 эта стрелочка​ стрелка для выделения​

​ листами, при последующем​ мыши ярлычок выделенного​Щелкните ярлычок первого листа,​ вас уделить пару​ «Печать» в разделе​ документу осуществлять полосой​Выделить абзац в​

​Как выделить ячейку в​​Чтобы​ в разделе «Редактирование»​ можно быстро выделить​, т.д.​

​ Заново вызовите Инструмент​​ 13 на рисунке​ уже вставленную -​ есть:выбор объектов​

​ объектов :-) Появляется,​​ открытии файла выделенные​ листа и выберите​

​ а затем удерживая​​ секунд и сообщить,​ «Страницы» ставим галочку​ прокрутки, не колесиком​

​ тексте можно отступом.​​ таблице Word​выделить текст одного формата​ нажимаем на кнопку​ всю страницу, большой​Как выделить текст, абзац​ Выделение группы ячеек,​ выше) необходимо перейти​ правая кнопка -​Excel-ok​ когда отображаем панель​ листы останутся сгруппированными.​

planetaexcel.ru

Как в новых Excel’ax выделить объекты (картинки, стрелочки, фигуры)

​ в контекстном меню​ нажатой клавишу SHIFT,​ помогла ли она​ у слов «Выделенный​ мышки.​ Смотрите статью «Табуляция​,​ в​ «Выделить». Из появившегося​ фрагмент текста.​ в документе​ который выделит теперь​ на вкладке Разработчик​ формат рисунка​: особенно актуально когда​ рисования (2003)​

​Excel-ok​​ команду​
​ щелкните ярлычок последнего​ вам, с помощью​
​ фрагмент».​Как выделить все таблицы,​ в Word».​столбец​

​Word​

Источник

Как в excel выделить все картинки

Отображаем невидимые объекты на листе MS EXCEL

​Смотрите также​ объектов несколько десятков​Excel-ok​: Раньше (в 2003​Разгруппировать листы​ листа, который требуется​ кнопок внизу страницы.​В Word 2013 появилась​ рисунки в Word.​А выделить абзац,​,​

​.​ окна выбираем функцию​Выделить в Word все​Word​

​ оставшиеся элементы (верхнюю​ в режим Конструктора​При импорте содержимого web-страниц​ или больше («А​: раньше я как-бы​

​ версии экселя) для​.​ выделить.​ Для удобства также​​ возможность редактировать документ​​Если без макросов,​ чтобы изменить формат,​

​строку​​Сначала выделим слово​ «Выделить все».​ – весь документ​.​ группу).​ (Разработчик/ Элементы управления).​ на лист EXCEL​ при нажатом Ctrl​ обводил стрелкой область​ выделения рисунков (различных​Примечания​Несколько несмежных листов​ приводим ссылку на​

​ в формате pdf,​ то выделяем первую​ шрифт, т.д. можно​,​ нужного формата, например​Как​

​ сразу​Первый способ.​Аналогичный подход может быть​ Чтобы открыть вкладку​ может попасть множество​ кликнуть по объектам​ внутри которй находились​ объектов, созданных в​Данные, введите или измените​Щелкните ярлычок первого листа,​ оригинал (на английском​ вставить видео, т.д.​ таблицу, нажимаем клавишу​​ так. Ставим курсор​​область ячеек​ с жирным шрифтом.​выделить вставленные фигуры в​.​Чтобы выделить текст,​ использован и для​ Разработчик зайдите в​

​ ненужных объектов: картинок,​ не пробовали. » -​ объекты и объекты​

​ программе: круги, прямоугольники​
​ в активный лист​ а затем удерживая​ языке) .​ Но, документы, созданные​ «Ctrl», удерживая ее​ у начала абзаца,​,​ Нажимаем кнопку функции​Word.​Есть сочетание клавиш,​ слово, букву, абзац,​ объектов, созданных самостоятельно.​ меню Кнопка офис/​ элементов управления, таблиц,​ можно попробовать сравнить​ становились выделенными, после​ и т.д.) пользовался​

Выделить всё в Word.

Выделение одного или нескольких листов

​ отменить выделение, нажав​​ каком языке вы​Второй способ.​ Затем остается этот​ группы ячеек выделяет​Нажимая на название объекта​ нарисованные/вставленные объекты. А​Z​ кончике не устраивает. ​ на одном листе).​ заголовка в верхней​Перейдите на вкладку лист,​ материалами на вашем​ Word.​ выделенный фрагмент. Затем,​ текст». Можно выделить,​ менять формат, цвет,​ левой мышкой в​ печатаете, нажимаете клавишу,​Ставим курсор в​ текст скопировать в​ сначала объекты из​

​ (Picture 1) можно​ в новых эксэлах​: А при нажатом​Казанский​ Важно убедитесь, что​ части листа. Чтобы​ который вы хотите​ языке. Эта страница​Выделяем один или​ нажимаем клавишу «Ctrl»,​ обвести, написать, закрасить,​ шрифт, т.д. Например,​ любом месте листа​

Выделение фигур и других объектов

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

  • Какое приложение Office вы используете?
  • Excel
  • PowerPoint

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

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

Чтобы открыть область задач, в которой можно выбрать, выбрать несколько элементов, показать, скрыть или изменить порядок объектов, нажмите кнопку область выделенияи выберите нужные параметры.

Советы по выделению фигур и объектов

Выделение нескольких объектов.

Щелкните нужные объекты, удерживая нажатой клавишу Shift или CTRL.

Выделение объекта, который находится под другими объектами, и перебор стопки перекрывающихся объектов по направлению к переднему плану.

Выделите верхний объект и нажмите клавишу TAB.

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

Выделите верхний объект и нажмите клавиши SHIFT + TAB.

Выделение объектов, являющихся частью группа.

Выделите группу и выполните одно из следующих действий.

Чтобы выделить один объект, щелкните его.

Чтобы выделить несколько фигур в группе, щелкните их, удерживая нажатой клавишу Shift или CTRL.

Отмена выделения объектов по одному за раз.

Щелкните каждый объект, удерживая нажатой клавишу Shift или CTRL.

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

Чтобы выделить все объекты и заполнители на слайде, нажмите кнопку Выделить все.

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

Чтобы открыть область выделения, в которой можно выбрать, выбрать несколько элементов, показать, скрыть или изменить порядок объектов, нажмите кнопку область выделенияи выберите нужные параметры.

Советы по выделению фигур и объектов

Выделение нескольких объектов.

Щелкните нужные объекты, удерживая нажатой клавишу Shift или CTRL.

Выделение объекта, который находится под другими объектами, и перебор стопки перекрывающихся объектов по направлению к переднему плану.

Выделите верхний объект и нажмите клавишу TAB.

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

Выделите верхний объект и нажмите клавиши SHIFT + TAB.

Выделение объектов, являющихся частью группа.

Выделите группу и выполните одно из следующих действий.

Чтобы выделить один объект, щелкните его.

Чтобы выделить несколько фигур в группе, щелкните их, удерживая нажатой клавишу Shift или CTRL.

Отмена выделения объектов по одному за раз.

Щелкните каждый объект, удерживая нажатой клавишу Shift или CTRL.

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

Использование области выделения

Если вы выберете нужный вариант, или если у вас много объектов для отслеживания, попробуйте область выделения, как описано ниже.

(Эта функция доступна в более поздних версиях Office для Mac. В Office для Mac 2011 эта возможность недоступна. В Office для Mac 2011 вы также можете попытаться выполнить динамическое изменение порядка.

Выделите один из нужных объектов.

Выберите . Вкладка «формат», которая появляется на ленте при выделении объекта, а затем выберите область выделения (или Расположите > области выделения).

Откроется область выделения со всеми объектами в списке, и вы можете выполнить одно из указанных ниже действий.

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

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

После перемещения соединительной линии в верхнюю часть списка она появляется перед двумя фигурами овала.

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

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

Группирование и разгруппирование объектов, перечисленных в области выделения. Если вы выберете несколько объектов с помощью команды Command + Click, вы можете сгруппировать их или разгруппировать, выбирая объекты группы на ленте на вкладке Формат .

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

Удаление всех объектов на листе в Excel

При копировании на рабочий лист Excel информации со страницы из сети Интренет периодически помимо текста вставляются ненужные картинки и различные элементы управления (кнопки, флажки и т.д.). Если их количество значительное, то удалять «вручную» окажется трудоемким процессом.

Имеется несколько способов решить данную проблему: средствами программы Excel и с помощью макроса VBA.

Удаление картинок и объектов в Excel средствами программы

В результате вставки данных со страницы Интернет-сайта скопировались ненужные картинки и элементы управления:

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

В открывшемся окне необходимо выбрать пункт «Объекты» и кликнуть «OK«:

В результате Excel выделит все требуемые объекты (если необходимо какие то элементы оставить, то необходимо зажать клавишу Ctrl и левой кнопкой мыши кликнуть на необходимые элементы, для снятия выделения):

Теперь осталось только нажать клавишу Delete, чтобы удалить все выделенные объекты.

Удаление картинок и объектов в Excel с помощью макроса VBA

Указанную выше проблему можно решить, написав в редакторе Visual Basic следующий макрос:

Если же необходимо удалить только картинки, тогда макрос необходимо изменить на:

Можно дополнить макрос еще одной полезной функцией — удаление гиперссылок:

Объединив два действия в одну функцию DeleteObjects будут удалены все объекты и ссылки:

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

Отображаем невидимые объекты на листе MS EXCEL

При импорте содержимого web-страниц на лист EXCEL может попасть множество ненужных объектов: картинок, элементов управления, таблиц, форм. Часть из этих объектов может быть скрыта. Научимся отображать эти объекты, а затем удалять их.

Для примера можно скопировать содержимое любой web-страницы на лист, например, www.mail.ru .

Для отображения скрытых объектов необходимо вызвать в меню Главная/ Редактирование/ Найти и выделить команду Область выделения.

Нажимая на название объекта (Picture 1) можно выделить объект, затем клавишей DEL – удалить его если нужно.

Совет: чтобы удалить элемент управления (см. Control 13 на рисунке выше) необходимо перейти на вкладке Разработчик в режим Конструктора ( Разработчик/ Элементы управления ). Чтобы открыть вкладку Разработчик зайдите в меню Кнопка офис/ Параметры Excel/ Основные/ Показывать вкладку Разработчик на ленте .

Выделить ВСЕ объекты можно с помощью инструмента Выделение группы ячеек ( Главная/ Найти и выделить ). Переключатель установить на Объекты.

На первом рисунке (окно Область выделения. ) видно, все объекты разделены на 2 группы (группы отделены горизонтальной линией). Инструмент Выделение группы ячеек выделяет сначала объекты из нижней группы (наподобие выделения нижнего слоя). После их выделения, а затем удаления с помощью клавиши DEL, можно приниматься за вторую группу объектов. Заново вызовите Инструмент Выделение группы ячеек, который выделит теперь оставшиеся элементы (верхнюю группу).

Аналогичный подход может быть использован и для объектов, созданных самостоятельно.

Как удалить все картинки в excel

Как-то в прошлый раз мы занимались удалением повторяющихся значений в Excel. А вот сейчас хочу провести некоторый ликбез по удалению картинок из excel, поскольку такая задача иногда встает при экспорте web-страниц из интернета. Картинки эти, надо сказать — весьма зловредные, и простым «скопировать»-«вставить значения» тут не обойтись. Выделять каждую и удалять по одной — тоже не вариант. Да, можно, конечно, применить тяжелую артиллерию в виде макросов и VBA, но имеет смысл их использовать, если требуется сделать что-то очень сложное: удалить картинки из определенного столбца, а в остальных столбцах оставить, или удалить только картинки, а другие объекты — оставить. Ну, или же если требуется делать это по пять раз на дню. Во всех остальных случаях, когда просто требуется получить из веб-странички чистый текст, удалив как картинки, так и все остальные объекты — задача удаления картинок с листов эксель решается гораздо меньшими усилиями и буквально двумя щелчками мыши. Ну ладно, тремя. Еще кнопку ОК нажать Под катом — разберем, как.

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

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

Первое, что мы делаем — нажимаем кнопочку F5 на функциональной клавиатуре, чтобы вызвать диалог «перехода». Любители делать это через меню также могут нажать на Правка->Перейти, или нажать комбинацию Ctrl+G.

Но по мне — это только два лишних клика мыши, или необходимость еще и тянуться мизинцем до Ctrl. Нам, ленивым, клавишу F5 нажать, конечно, проще. После этого диалог «переход» выскакивает сразу же:

В меню — щелкаем на кнопке «Выделить». Открывается диалог — «а чего же это мы хотим выделить», он же «Выделение группы ячеек»:

В оном диалоге выбираем самый последний пункт — «объекты», после чего жмем ОК. Результат — все картинки выделены:

Чего же осталось? Дело за малым. Волшебная кнопочка Delete.

В результате у нас получился лист, в котором только значения в ячейках (ну, или формулы, если они там были). Можно я не буду приводить его скриншот, да? ? Все это работает для Excel 2003, но в 2013 тоже должно (если еще более простого способа не предложили), мне как-то недосуг проверять было на рабочей машине, а на домашней мне этот 2013-ый монстр нафиг не сдался.

Вот так мы в три щелчка мыши и два щелчка клавишами очистили наш эксельный лист от картинок. А то макросы, макросы… Так не долго дойти до того, что все гиперссылки и пустые ячейки макросами удалять будем вместо того, чтобы пару раз просто щелкнуть мышью… Но об этом — в следующий раз.

Источник

Выделить ВСЕ объекты можно с помощью инструмента Выделение группы ячеек (Главная/ Найти и выделить). Переключатель установить на Объекты. На первом рисунке (окно Область выделения…) видно, все объекты разделены на 2 группы (группы отделены горизонтальной линией).

Содержание

  • 1 Как выделить все рисунки в Excel?
  • 2 Как выделить все графические объекты в Excel?
  • 3 Как выделить объекты Excel?
  • 4 Как выделить несколько графических объектов в ворде?
  • 5 Как выделить картинки в Эксель?
  • 6 Как в ворде выделить сразу все рисунки?
  • 7 Как выделить всю схему в ворде?
  • 8 Как сгруппировать или разгруппировать графические объекты?
  • 9 Как удалить все объекты в Excel?
  • 10 Как выделить несколько элементов?
  • 11 Как скопировать фигуру в Excel?
  • 12 Как выделить объект информатика?
  • 13 Как выделить несколько объектов в блендере?
  • 14 Как выделить одновременно несколько нарисованных объектов?
  • 15 Как выделять область в ворде?

Выделить ВСЕ объекты можно с помощью инструмента Выделение группы ячеек ( Главная/ Найти и выделить ). Переключатель установить на Объекты. На первом рисунке (окно Область выделения. )

Как выделить все графические объекты в Excel?

Выделить ВСЕ объекты можно с помощью инструмента Выделение группы ячеек ( Главная/ Найти и выделить ). Переключатель установить на Объекты . На первом рисунке (окно Область выделения …) видно, все объекты разделены на 2 группы (группы отделены горизонтальной линией).

<-div id=»cnt_rb_259475″ class=»cnt32_rl_bg_str» data-id=»259475″>

Как выделить объекты Excel?

Excel предоставляет различные способы выбора нескольких объектов.

  1. Ctrl+щелчок Удерживание нажатой клавиши Ctrl при щелчках на объектах — один из способов выбрать несколько объектов.
  2. Панель Выделение и видимость …
  3. Диалоговое окно Выделение группы ячеек …
  4. Инструмент выбора объектов

15 апр. 2013 г.

Как выделить несколько графических объектов в ворде?

Выделение нескольких объектов. Щелкните нужные объекты, удерживая нажатой клавишу Shift или CTRL. Выделение объекта, который находится под другими объектами, и перебор стопки перекрывающихся объектов по направлению к переднему плану. Выделите верхний объект и нажмите клавишу TAB.

Как выделить картинки в Эксель?

Нам нужно их все выделить сразу и быстро. Нажимаем клавишу F5 или сочетание клавиш «Ctrl» + «G». Появится окно «Переход». В нем нажимаем на кнопку «Выделить».

Как в ворде выделить сразу все рисунки?

Alt+F11, Ctrl+G, Ctrl+V, Enter. Все рисунки будут выделены.

Как выделить всю схему в ворде?

Чтобы выделить несколько фигур, нажмите и удерживайте нажатой клавишу SHIFT или CTRL, щелкая при этом фигуры. Кроме того, с помощью этих клавиш в текущую выделенную область можно добавить другую фигуру.

Как сгруппировать или разгруппировать графические объекты?

Удерживая нажатой кнопку CTRL, щелкните фигуры, изображения или другие объекты для группировки. Чтобы включить кнопку «Группа», необходимо выбрать несколько фигур, рисунков или объектов. Вы можете выбрать все объекты на слайде, нажав CTRL+A. Выберите кнопку «Упорядоставить» и выберите «Группировать».

Как удалить все объекты в Excel?

1, Нажмите F5 , чтобы открыть Перейти к диалоговое окно в Excel. 2, Нажмите Особый кнопку и войдите в Перейти к специальному диалоговое окно ， затем проверьте объект вариант. Смотрите скриншот: 3, Затем нажмите OK кнопку, все изображения выбраны на активном листе, нажмите Удалить ключ, чтобы удалить их все.

Как выделить несколько элементов?

Чтобы выделить несколько несмежных файлов или папок, нажмите и удерживайте клавишу Ctrl и щелкните каждый из элементов, которые нужно выделить. Чтобы выбрать все файлы и папки в окне, нажмите на панели инструментов кнопку Упорядочить и выберите команду Выделить все.

Как скопировать фигуру в Excel?

Быстрое копирование диаграмм при помощи клавиши Ctrl

  1. Выделите диаграмму, кликнув левой кнопкой мыши по её границе.
  2. Начните перемещать диаграмму мышью.
  3. Нажмите клавишу Ctrl. Появится контур новой фигуры.
  4. Отпустите левую кнопку мыши, чтобы завершить создание копии.

Как выделить объект информатика?

Если объекты расположены в разных местах окна, то выделять их следует щелчком мыши при нажатой клавише [Ctrl]. Для выделения всех объектов в окне служит команда Правка/Выделить все (клавиатурная комбинация [Ctrl]-[А]).

Как выделить несколько объектов в блендере?

Выделение, как объектов, так и подобъектов в Blender осуществляется при помощи щелчка правой кнопки мыши. Если необходимо выделить несколько элементов, то это осуществляется при зажатой клавише «Shift».

Как выделить одновременно несколько нарисованных объектов?

Выделение нескольких рисованных объектов: 1. Выполните одинарный щелчок левой кнопкой мыши по каждому объекту, при этом удерживая нажатой клавишу Shift , 2.

Как выделять область в ворде?

Чтобы открыть область выделения, нажмите кнопку Упорядочить на вкладке Главная на ленте и выберите область выделения. Объекты выводятся в области в визуальном порядке, в котором они располагаются сверху вниз. Последний вставленный объект находится в верхней части списка.

Источник
 

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

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

  На всём листе-то это сделать не трудно:  
Sub All_Draws_Select()   ‘ выделить все рисунки на листе  
  ActiveSheet.DrawingObjects.Select  
End Sub  

  А вот как выбрать в Selection?  
При этом, конечно, хотелось бы обойтись без цикла перебора всех элементов DrawingObjects в Selection :), но если нельзя, то и ладно, пусть с циклом …  

  К сожалению, Справка про коллекцию .DrawingObjects молчит как рыба об лёд и узнать что-то про свойства её элементов, относящиеся к привязке картинок к ячейкам, по аналогии с элементами коллекции .Shapes при моём слабом знании инглиша трудно.  

  Мне нужно выделять только РИСУНКИ, поэтому я и пытаюсь использовать именно коллекцию .DrawingObjects, а не .Shapes, т.к. (насколько я смог нарыть по разным источникам) в .DrawingObjects в отличие от .Shapes не входят примечания, выпадающие списки проверки данных, автофильтра, списков и сводных таблиц

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

 

слэн

Пользователь

Сообщений: 5192
Регистрация: 16.01.2013

activesheet.drawingobjects.shaperange(n).topleftcell
 

Kuzmich

Пользователь

Сообщений: 7998
Регистрация: 21.12.2012

Может можно использовать свойства объекта  
.TopLeftCell.Address  
.BottomRightCell.Address  
и сравнивать в адресами Selection ?
 

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

{quote}{login=слэн}{date=05.04.2012 11:39}{thema=}{post}ActiveSheet.DrawingObjects.ShapeRange(n).TopLeftCell{/post}{/quote}  
слэн,  
спасибо, но что-то я с ShapeRange никак по Справке не разберусь… Инглиш хромает.  
Как его набрать-то из объектов, входящих в Selection?  

  Kuzmich,  
спасибо. Про TopLeftCell (именно по нему, кажется, привязывается картинка к ячейке, а BottomRightCell тут не нужно) я уже думал.  
Но делать цикл по всем DrawingObject и проверять, входят ли их адреса в Selection мне показалось как-то сложновато.

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

 

ZVI

Пользователь

Сообщений: 4328
Регистрация: 23.12.2012

{quote}{login=Alex_ST}{date=05.04.2012 12:03}{thema=Re: }{post}Про TopLeftCell (именно по нему, кажется, привязывается картинка к ячейке, а BottomRightCell тут не нужно) я уже думал.{/post}{/quote}  
Добрый день, Алексей!  
Почему же не нужно? Представьте, что автофигура с размеров во весь лист, у неё TopLeftCell — это ячейка A1. Если не учитывать BottomRightCell, то в выделенном диапазонк B2:G20 её как бы и нет, но на самом деле она перекрывает все ячейки. Впрочем, «выбрать все рисунки в выделенном диапазоне ячеек» может иметь и иной смысл — Вам виднее.  

  Вот пример того, как загнать все объекты DrawingObjects заданного диапазона в коллекцию:  

  Sub Test()  
 Dim x, Rng As Range, Col As New Collection  
 Set Rng = Range(«B2:G20»)  
 For Each x In ActiveSheet.DrawingObjects  
   If Not Intersect(Range(x.TopLeftCell, x.BottomRightCell), Rng) Is Nothing Then  
     Debug.Print x.Name  
     Col.Add x  
   End If  
 Next  
End Sub
 

слэн

Пользователь

Сообщений: 5192
Регистрация: 16.01.2013

да ничего сложного:  

  Sub t()  
Dim x, dic  
Set dic = CreateObject(«scripting.dictionary»)  
For Each x In ActiveSheet.DrawingObjects.ShapeRange  
   If Not Intersect(Selection, x.TopLeftCell) Is Nothing Then  
       dic.Add x.Name, x  
   End If  
Next  
ActiveSheet.Shapes.Range(dic.keys).Select  
Set dic = Nothing  
End Sub
 

слэн

Пользователь

Сообщений: 5192
Регистрация: 16.01.2013

о, вот и zvi о том же :)..  

  но у меня вроде немножко полнее  

  и можно dic.Add x.Name, 0
 

ZVI

Пользователь

Сообщений: 4328
Регистрация: 23.12.2012

{quote}{login=слэн}{date=05.04.2012 01:18}{thema=}{post}но у меня вроде немножко полнее{/post}{/quote}  
Привет, Слэн! Для объектов Pисунок ShapeRange избыточен.  
А если кроме рисунков нужны ещё и автофигуры, то у прямоугольников, например, имена могут повторяться (вариант — при копировании), поэтому dic.Add x.Name, … не есть гуд ;-)  
В варианте же с коллекцией без ключа собираются все объекты, а не только с уникальными именами
 

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

Слэн, ZVI,  
спасибо за помощь.  
Извините, что вчера замолчал: грузанули на работе один мерзкий застарелый вопрос разгребать на совещании… И совещались «от забора до обеда» :)    
Сегодня малость разгрёб дела. Попробовал.  
Как только не извращался со всякими объектами, которые не Range на листе, так дублирования имён добиться и не смог.  
Поэтому остановился на варианте со словарём, т.к. из него проще вытащить массив имён накопленных элементов.  
(Но защиту от ошибок я всё-таки на всякий случай, послушав ZVI, поставил)  
Вот, что получилось в конце-концов:  
Sub Draws_In_Selection_Select()   ‘ выделить все рисунки в выбранном диапазоне  
  If TypeName(Selection) <> «Range» Then Exit Sub  
  Dim oDraw  
  On Error Resume Next  
  With CreateObject(«Scripting.Dictionary»)  
     For Each oDraw In ActiveSheet.DrawingObjects   ‘.ShapeRange  
        If Not Intersect(Selection, Range(oDraw.TopLeftCell, oDraw.BottomRightCell)) Is Nothing Then .Add oDraw.Name, oDraw  
     Next  
     If .Count > 0 Then ActiveSheet.Shapes.Range(.keys).Select  
  End With  
End Sub  

  Ещё раз спасибо за советы.

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

 

Лёша, рад тебя видеть!  
Попробуй переименовать гр. объект (это важно), а затем создай несколько копий — имя сдублируется!
 

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

Володя, спасибо за подсказку.  
И действительно, после копирования переименованных группированных объектов они получают одинаковые имена!  
Чушь какая!!! Но что-то у них разное должно ведь быть. Иначе Excel не смог бы их корректно обрабатывать.  
Ща попытаюсь разобраться…

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

 

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

Думал разобраться при помощи макрорекордера…  
Сделал на листе две автофигуры-смайлики, сгруппировал их и назвал группированый объект Smile1  
Потом два раза скопировал его.  
Получил на листе ещё два сгруппированных объекта Smile1 (обалдеть!!! ???)  
Включил макрорекордер и записал последовательность действий:  
1. Выбор мышкой одной группы  
2. Выбор мышкой второй группы  
3. Выбор мышкой третьей группы  
4. Выбор мышкой второй группы  
5. Удаление выбранной группы  
Остановил запись. Посмотрел, что записалось и ещё раз обалдел:  
Sub Макрос1()  
   ActiveSheet.Shapes(«Smile1»).Select  
   ActiveSheet.Shapes(«Smile1»).Select  
   ActiveSheet.Shapes(«Smile1»).Select  
   ActiveSheet.Shapes(«Smile1»).Select  
   Selection.Delete  
End Sub  

  И как тут можно обращаться к объектам?  
Не понимаю…

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

 

Лёш, меня пора отстреливать за косноязычие!  
Я имел в виду графический объект, а не группированный объект  
Всё, что поименовано после переименования будет плодить себе подобное (увы или ура?)  
Дальше — больше: при копировании всех объектов в новую книгу часть имён изменится (те, что ты переименовал — нет)  
А ещё интереснее то, что отдельные имена, присвоенные самим приложением по умолчанию, будут изменены даже при (cut >> paste) в новую книгу!
 

ZVI

Пользователь

Сообщений: 4328
Регистрация: 23.12.2012

{quote}{login=Alex_ST}{date=09.04.2012 10:19}{thema=}{post}И как тут можно обращаться к объектам?  
Не понимаю…{/post}{/quote}  
Ну, так а я ж за что? См. вариант с коллекцией :-)

 

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

ZVI,  
я уже и сам понял на предыдущем опыте, что использовать имена объектов в качестве ключей словаря не удастся.  
Но ведь никто не мешает каждый рисованный объект запоминать как oDict.Item под ключом Key := oDoct.Count+1  
Зато потом можно будет без перебора одним махом считать массив oDict.Items и выделить их все.  
Только вот вопрос, а что за объекты будут запоминаться в каждом из oDict.Item и можно ли всё-таки по ним однозначно идентифицировать разные объекты, имеющие одинаковые имена?  
Ща попробую. Отпишусь.

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

 

Лёш, те же проблемы в нашем с тобой фитнесе  
Там надо восстановить имена графич. объектов после копирования в новую книгу  
Вот где как воздух нужна полная ясность, поэтому позволю себе обрисовать картину настолько полно, насколько смогу  
Для DrawingObjects (DO):  
 — оригинальные имена легко изменяются на пользовательские;  
 — пользовательские имена сохраняются при копировании, в том числе в другую книгу (исключение — OLE);  
 — оригинальные имена групп (включая вложенные) и OLE могут быть изменены при копировании и даже вырезании в новую книгу.  

  Очень стабильно ведёт себя свойство AlternativeText, поэтому его можно использовать для записи идентификационного номера коллекции, что позволит восстановить нарушенные имена  
Для внутренних элементов групп начиная с XL2002 (или 2003?) возможно переименование без разгруппировки. Если интересно, соотв. процедуру напишу вечером
 

ZVI

Пользователь

Сообщений: 4328
Регистрация: 23.12.2012

Алексей, тогда зачем нужен словарь?  
Сохраняйте объекты сразу в массив, индекс элемента массива сделает то же самое, что и в Вашем варианте делает Key:= oDoct.Count+1, только быстрее и с меньшими затратами памяти.
 

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

Что-то я никак не соображу, что делать с этим массивом объектов (не важно, как он получен — прямым набором объектов в массив или накоплением в словаре)?  
Ну получил я массив объектов, а как их теперь все выделить?

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

 

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

Ну никак не получается загнать массив рисованных объектов в ShapeRange чтобы их потом выделить … :(

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

 

Всё будет хорошо!  

  1) Работаем только с DrawingObjects  
2) Обходим в цикле, проверяем на пересечение с диапазоном  
3) Для выделения с накоплением применяем метод .Select с аргументом False:  

  .DrawingObjects(i).Select (False)
 

слэн

Пользователь

Сообщений: 5192
Регистрация: 16.01.2013

тогда так:  

  Sub t()  
Dim x, dic  
On Error Resume Next  
Set dic = CreateObject(«scripting.dictionary»)  
For Each x In ActiveSheet.DrawingObjects.ShapeRange  
If Not Intersect(Selection, x.TopLeftCell) Is Nothing Then  
dic.Add x.DrawingObject.Index, 0  
End If  
Next  
ActiveSheet.Shapes.Range(dic.keys).Select  
Set dic = Nothing  
End Sub
 

Почти то же самое, но без словаря и с учётом области пересечения по 2-м углам:  
Sub tt()  
   Dim x, r As Range  

         Set r = ActiveWindow.RangeSelection  
   On Error Resume Next  
   For Each x In ActiveSheet.DrawingObjects.ShapeRange  
       If Not Intersect(Range(x.TopLeftCell, x.BottomRightCell), r) Is Nothing Then x.Select (False)  
   Next x  
End Sub
 

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

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

  А вот вариант СЛЭНа выделяет что-то не понятное (см. в аттаче разные варианты)

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

 

А ведь у СЛЭНа вариант красивее  
Я-то схимичил, а у него всё задумано капитально  
Это всё Микрософт виноват!  

  По поводу DrawingObjects: их нет в ObjectBrowser, значит этот объект поддерживается, но заменён новым (по-видимому, Shapes)  
Но если в ObjectBrowser щелкнуть правой клавишей и выбрать Show Hidden Members, то DrawingObjects появятся, только будет выглядеть бледно (обижают нашего брата)  
Появиться и что-то из справки
 

ZVI

Пользователь

Сообщений: 4328
Регистрация: 23.12.2012

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

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

  ShpsRng можно было бы объявить и вне процедуры на уровне модуля или глобально.  

  Sub SelectPictures()  
‘ Выделение рисунков видимой области экрана  
 Dim a(), i&, n&  
 Dim Shp As Shape, Shps As Shapes, ShpsRng As ShapeRange, Rng As Range  
 Set Shps = ActiveSheet.Shapes  
 If Shps.Count = 0 Then Exit Sub  
 ReDim a(1 To Shps.Count)  
 Set Rng = Windows(1).VisibleRange  
 For i = 1 To Shps.Count  
   With Shps.Item(i)  
     If .Type = msoPicture Then  
       If Not Intersect(Range(.TopLeftCell, .BottomRightCell), Rng) Is Nothing Then  
         n = n + 1  
         a(n) = i  
       End If  
     End If  
   End With  
 Next  
 If n Then  
   ReDim Preserve a(1 To n)  
   Set ShpsRng = Shps.Range(a)  ‘ ShpsRng может быть и глобальной  
   ShpsRng.Select ‘ <— для примера  
 End If  
End Sub
 

Лёш, а что будем делать с Ole?
 

ZVI

Пользователь

Сообщений: 4328
Регистрация: 23.12.2012

{quote}{login=v__step}{date=09.04.2012 04:47}{thema=}{post}… что будем делать с Ole?{/post}{/quote}  
Не знаю,что в конечном итоге изобретаетсся, но всегда можно проверить тип.  

  Владимир, для Вашего варианта это:  

  If x.Type = msoPicture Then  
 If Not Intersect(Range(x.TopLeftCell, x.BottomRightCell), r) Is Nothing Then x.Select False  
End If  

  Понятно, что вместо  = msoPicture могут быть и другие проверки, в том числе и:  
If x.Type <> msoEmbeddedOLEObject  Then
 

Alex_ST

Пользователь

Сообщений: 2746
Регистрация: 22.12.2012

На лицо ужасный, добрый внутри

ZVI,  
это предварительная проработка очередного подхода к «поднятию тяжести» — фитнесу ожиревших файлов (Володя [v_step] сразу догадался).
Нужно будет в новый файл копировать только те картинки, которые захватываются UsedRange.  
Про другие объекты пока не пробовал. Но объекты, которые вуделить можно только в режиме конструктора (там в моём примере есть чек-бокс и комманд баттон), тоже выделяются.  

  Володя[v_step]? а просвети про разницу между Selection, которое привык юзать я, и ActiveWindow.RangeSelection, которое использовал в своём примере ты? (одинаково работает в макросе и так и так)

С уважением, Алексей (ИМХО: Excel-2003 — THE BEST!!!)
<#0>

 

Легко  
RangeSelection имеет тип Range, а ведь могут быть выделены и другие объекты  

  По поводу фитнеса — вчера вечером наконец выложил очередную версию, где не столько что-то добавил, сколько исправил ряд ошибок и упростил что смог  
А в журнале с удовольствием сослался на помощь Казанского и ZVI
 

v__step

Гость

#30

09.04.2012 17:54:55

To ZVI: Я имел в виду проблему с выделением OLE вне режима конструктора  
Сейчас всё действительно сработало просто так, что меня удивило и обрадовало
Источник

Понравилась статья? Поделить с друзьями:
  • Как выбрать все значения а не только первое excel
  • Как выбрать диапазон данных для диаграммы excel
  • Как выбрать все заполненные ячейки в excel
  • Как выбрать диапазон данных для графика в excel
  • Как выбрать все в excel ctrl