hi
i am trying to remove hyperlinks that are linked to objects in th
excel workbook using vb.
the code that i am using is as follows:

If wSheet.Hyperlinks(i).Type < 0 Then
wSheet.Hyperlinks(i).Delete
ObjExcel.Save
hashyperlinks = True
End If

this code does not remove hyperlinks from the organizational charts
flow charts, cycle diagrams, etc. it just removes hyperlinks from th
images
can some1 pls help.

thanks in advanc

--
asmit
-----------------------------------------------------------------------
asmita's Profile: http://www.excelforum.com/member.php...fo&userid=2517
View this thread: http://www.excelforum.com/showthread.php?threadid=38674

The code below removes all hyperlinks in a worksheet.
To remove special types re-enable the commented out lines and amend a
necessary.

Code
-------------------

Sub untested()
' Hyperlink types:
'oHyperlinkInlineShape, msoHyperlinkRange, msoHyperlinkShape.
'---------------------------------------------------------------------------------
For Each h In ActiveSheet.Hyperlink
'If h.Type = "??" Then
h.Delete
'End If
Next
End Sub

-------------------

--
Brian

-----------------------------------------------------------------------
BrianB's Profile: http://www.excelforum.com/member.php...tinfo&userid=5
View this thread: http://www.excelforum.com/showthread.php?threadid=38674