Grant copie régulièrement les informations des pages Web et les colle dans des feuilles de calcul. Il se retrouve non seulement avec des données brutes, mais aussi avec d’autres éléments, tels que des cases à cocher, des images, des logos, etc. Grant veut un moyen facile de se débarrasser de tous ces éléments non liés aux données.

La première chose que la plupart des gens essaient est d’utiliser Go To Special, de cette manière:

  1. Appuyez sur F5. Excel affiche la boîte de dialogue Atteindre.

  2. Cliquez sur le bouton Spécial. Excel affiche la boîte de dialogue Aller à spécial.

(Voir la figure 1.)

  1. Sélectionnez l’option Objets.

  2. Cliquez sur OK.

Lorsque vous effectuez cette opération, Excel sélectionne un certain nombre d’objets dans la feuille de calcul et vous pouvez ensuite appuyer sur la touche Suppr pour vous en débarrasser.

Le problème est que cette méthode ne sélectionne pas tous les éléments non-données dans la feuille de calcul; il n’en sélectionne qu’un sous-ensemble, les éléments considérés comme des «objets» par Excel.

Une meilleure solution consiste à utiliser une macro pour sélectionner toutes les formes dans la feuille de calcul, puis les supprimer. C’est assez simple à faire, en utilisant une macro comme celle-ci:

Sub DeleteAllShapes1()

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

La macro effectue une boucle sur chaque forme de la feuille de calcul active et supprime chacune d’entre elles. Vous pouvez développer un peu la macro en supprimant également tous les liens hypertexte collés dans la feuille de calcul. Il suffit d’ajouter une seule ligne:

Sub DeleteAllShapes2()

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

Si, pour une raison étrange, ces macros ne suppriment pas tous les éléments non-données que vous souhaitez supprimer, il existe une autre approche que vous pouvez utiliser:

faites un arrêt dans NotePad avant Excel. Collez simplement vos données Web dans un document vierge du Bloc-notes, puis sélectionnez ces informations (après avoir été collées) et copiez-les dans le Presse-papiers. Ensuite, collez-le dans Excel.

La seule chose qui reste devrait être des données directes.

_Note: _

Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites ExcelTips), j’ai préparé une page spéciale qui comprend des informations utiles.

lien: / excelribbon-ExcelTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur].

ExcelTips est votre source pour une formation Microsoft Excel rentable.

Cette astuce (2881) s’applique à Microsoft Excel 97, 2000, 2002 et 2003. Vous pouvez trouver une version de cette astuce pour l’interface ruban d’Excel (Excel 2007 et versions ultérieures) ici:

link: / excelribbon-Get_Rid_of_Web_Stuff [Supprimer les trucs Web].