Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Extract Email from a Picture
Hello All,
I am using Office 2003 and I have the following problem. I have a long list of Contractors which I copy/pasted from the Internet. In column C there is a Picture of an "Envelope" which is having a "mailto: " in the link. I wish to extract the ' part in Column H for each row. I tried the following macro but after Line 2 in the following Macro, I right clicked and copy the link from the email address and pasted it in H (which is apparently not recorded in the Macro) Line 1 - Sub ExtractEmail() Line 2 - ActiveSheet.Shapes("Picture 794").Select Line 3 - Range("H377").Select Line 4 - ActiveSheet.Paste Line 5 - End Sub Can this process be automated so that each 'mailto: ' from all the rows get extracted in the appropriate rows? I would really appreciated any help or suggestions in this regard TIA Rashid Khan |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Extract Email from a Picture
Hello All,
Further to my previous post I have found this on the newsgroup. If the following macro can be 'modified' to my needs then I would be really grateful. The following macro should be modified to read each Pictures in Column C and Input the Hyperlink in the corresponding row in Column H... TIA Sub testme02() Dim myPict As Picture Dim myHyperLink As Hyperlink Set myPict = ActiveSheet.Pictures(5) Set myHyperLink = Nothing On Error Resume Next Set myHyperLink = myPict.ShapeRange.Item(1).Hyperlink On Error GoTo 0 If myHyperLink Is Nothing Then MsgBox "no links" Else MsgBox myHyperLink.Address End If End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Extract a picture from Background of a Graph | Charts and Charting in Excel | |||
Can I extract a picture from an excel file and save it elsewhere? | Excel Discussion (Misc queries) | |||
Extract Picture from a Header | Excel Discussion (Misc queries) | |||
How do I extract a picture from Excel and save it? | Excel Discussion (Misc queries) | |||
How to extract a picture from an Excel worksheet into a picture fi | Excel Discussion (Misc queries) |