Re: How do I copy the underlying e-mail hyperlink information from

Tech-Archive recommends: Fix windows errors by optimizing your registry



"John87111" <John87111@xxxxxxxxxxxxxxxxxxxxxxxxx>ha scritto nel messaggio
227DADF3-DB8A-4C09-AE07-6028D81F13EC@xxxxxxxxxxxxx

> "Franz" wrote:
>
>> "John87111" <John87111@xxxxxxxxxxxxxxxxxxxxxxxxx>ha scritto nel
>> messaggio 067E5786-8DC2-44A9-8CC0-9FD4C7B65D76@xxxxxxxxxxxxx
>>
>>> I have copied a web page into EXCEL that contains numerous
>>> hyperlinks labeled "e-mail". When I click on the hyperlink Outlook
>>> opens and the e-mail address is populated on the "to:" line. I
>>> want copy the underlying e-mail address in the adjacent cell, but
>>> can not find a way to do it (all I get is another cell labeled
>>> "e-mail"). I can do it by right clicking on the cell and selecting
>>> "edit hyperlink" and do a copy/paste w/ the e-mail address.
>>> However, I have a ton to do and was hoping to find a quick way to
>>> copy the email address, Thanks for your help.
>>
>> You can use this UDF I found on www.ozgrid.com:
>>
>> Function GetAddress(HyperlinkCell As Range)
>> GetAddress = Replace _
>> (HyperlinkCell.Hyperlinks(1).Address, "mailto:";, "")
>> End Function
>>
>> Just copy it in a module in your Personal.xls and then you can find
>> the
>> function in your funnctin insert, under UDF.
>>
>> Hello Franz, thanks for the answer. I'm not quite sure how to do
>> this. Can you please provide more information about how to make
>> this work?


1) If you hade no macro in your Personal.xls workbook, display th macro
toolbar, record an empty macro and choose as position the personal workbook;
2) Enter in the VBA Editor (with ALT + F11) and, eventually, delete the
blank macro you recorded;
3) Copy the macro I posted;
4) Close VBA Editor and go back to Excel;
5) Suppose your data with hyperlinks are in column A, go to column B and
digit, in the cell near the first with hyperlink, suppose B1, an "=" sign;
6) When Insert function windows opens, chose category user defined and
select GetAddress function;
7) select the cell with hyperlinks, i.e. A1 andpress ENTER;
8) copy the function till the and of your list (select the cell containing
the function, place the mouse pointer in the right down corner of the cell,
till the pointer become a little black cross and double click on it).

Hoping to behelpful...

Regards


--
Franz

----------------------------------------------------------------------------------------
per rispondermi traduci InVento in inglese (no maiuscole)
----------------------------------------------------------------------------------------


.



Relevant Pages

  • Re: VBA: For Count, when count changes from cell to cell
    ... with Excel 2000. ... reporting Macro being unavailable. ... Sub CalculateI3() ... means that you can refer to it in a cell just like a built-in Excel function. ...
    (microsoft.public.excel.misc)
  • Re: Question
    ... How about adding an appointment to your Outlook calendar, ... Then Excel doesn't have to ... Then run the macro. ... create an appointment at 8:00 on the date of each cell in B1:B10. ...
    (microsoft.public.excel.programming)
  • Update a Web Query and be able to change the WebAddress manually from a specific Cell
    ... I use an Excel Macro which updates stock prices from the internet by ... Have a cell in Excel where I manually enter GM or GOOG etc. ...
    (microsoft.public.excel.programming)
  • Re: COUNTIF question
    ... If you are using excel 2000 or newer you may have to change the macro ... They will read only the default colors of the cell and its ... 11 Dark Blue ...
    (microsoft.public.excel.worksheet.functions)
  • Re: Appending record with VBA when surname is True(sic)
    ... the type of thing which is called a macro in Excel ... either with a macro or with a vba procedure, would be relatively simple, ... based on processing the data cell by cell, so I suppose data types are ...
    (microsoft.public.access.macros)