View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
DougieB DougieB is offline
external usenet poster
 
Posts: 1
Default Convert email hyperlink

Excel2003-
I have a very long column of email hyperlinks pasted in from a website. They
look like envelope pictures. To change them to text, I have to point to the
envelope, so the cursor changes to a hand, rightclick, edit hyperlink, copy
to adjacent column....
The macro I recorded looks like this:
Keyboard Shortcut: Ctrl+b
'
ActiveSheet.Shapes("Picture 1").Select
ActiveCell.Offset(0, 1).Range("A1").Select
ActiveSheet.Paste
ActiveCell.Offset(1, -1).Range("A1").Select
End Sub

Of course, the macro keeps doing its thing on "Picture 1". I'd like it to
convert the whole column. I'm stuck--Any help? And yes, VBA is a foreign
language to me.