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

Когда вы впервые вставляете данные из Интернета в лист Excel, вы можете рассмотреть возможность использования специальной вставки, чтобы сделать что-то вроде «Вставить как текст» или «Вставить значения». Это должно помочь предотвратить попадание нежелательных объектов на ваш рабочий лист.

Если «Специальная вставка» не дает желаемых результатов или если вы работаете с листом, в который уже были вставлены информация и объекты, вы можете попробовать несколько вещей. Первое, что пытается сделать большинство людей, — это использовать Go To Special следующим образом:

  1. Нажмите F5. Excel отображает диалоговое окно «Перейти».

  2. Щелкните кнопку Special. Excel отображает диалоговое окно «Перейти к специальному».

(См. Рис. 1.)

  1. Выберите опцию Объекты.

  2. Щелкните ОК.

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

Проблема в том, что этот метод не выбирает все элементы, не относящиеся к данным, на листе; он выбирает только подмножество из них — те элементы, которые Excel считает «объектами».

Лучшее решение — использовать макрос, чтобы выбрать все фигуры на листе, а затем удалить их. Это довольно просто сделать, используя макрос вроде этого:

Sub DeleteAllShapes1()

Dim shp As Shape     For Each shp In ActiveSheet.Shapes         shp.Delete     Next End Sub

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

Sub DeleteAllShapes2()

Dim shp As Shape     For Each shp In ActiveSheet.Shapes         shp.Delete     Next     ActiveSheet.Hyperlinks.Delete End Sub

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

сделайте остановку в Блокноте перед Excel. Просто вставьте свои веб-данные в пустой документ Блокнота, затем выберите эту информацию (после вставки) и скопируйте ее обратно в буфер обмена. Затем вставьте его в Excel.

Единственное, что осталось, это прямые данные.

_Примечание: _

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

link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

ExcelTips — ваш источник экономичного обучения Microsoft Excel.

Этот совет (6951) применим к Microsoft Excel 2007, 2010, 2013, 2016, 2019 и Excel в Office 365. Вы можете найти версию этого совета для старого интерфейса меню Excel здесь:

link: / excel-Get_Rid_of_Web_Stuff [Избавиться от веб-материалов].