View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.links,microsoft.public.excel.misc,microsoft.public.excel.worksheet.functions
zz zz is offline
external usenet poster
 
Posts: 32
Default How to get rid of web page objects ?

try this code

but be advised, it deletes any Ole object inserted in the sheet, it doesn't
matter wath type is it


here's the code

Private Sub deleteobjects()
Dim s As Sheet1
Set s = ActiveSheet
Dim olObj As OLEObject
With s
For Each olObj In .OLEObjects
..OLEObjects(.OLEObjects.Count).Delete
Next
End With
set s= nothing
set OlObj=nothing
End Sub



--
hope this works!
---
zz [MX]
cuasi-musico,semi-poeta y loco


"come_mon_come_mon!" wrote in message
ups.com...

Gary''s Student ¼g¹D¡G

Using VBA:

Cells.Hyperlinks.Delete
ActiveSheet.Pictures.Delete
--
Gary's Student



YEAH !!! IT WORKS WITH URL LINKS !!!!! NOW ONLY THE CHECK BOXES WERE
LEFT REMAINED UNCLEARED :)