Wrox Programmer Forums
Go Back   Wrox Programmer Forums > Microsoft Office > Excel VBA > Excel VBA
|
Excel VBA Discuss using VBA for Excel programming.
Welcome to the p2p.wrox.com Forums.

You are currently viewing the Excel VBA section of the Wrox Programmer to Programmer discussions. This is a community of software programmers and website developers including Wrox book authors and readers. New member registration was closed in 2019. New posts were shut off and the site was archived into this static format as of October 1, 2020. If you require technical support for a Wrox book please contact http://hub.wiley.com
 
Old May 24th, 2005, 08:29 AM
Registered User
 
Join Date: May 2005
Posts: 3
Thanks: 0
Thanked 0 Times in 0 Posts
Default HYPERLINK in activecell

I am trying to insert a value in an activecell to provide the cell automatically with a link to a webpage the code I have tried is as follows

Activecell.FormulaR1C1 = "=HYPERLINK("http://idxpro.cisdata.net/AR185385/index.php/CISNDID=d5434b361870f297b7f0ed9bf7028181&MODE=View Listing&view_mls_id=WA-TCAOR&view_mls_no=120182", "View")"

The link allows me to view a listing page on the site but I keep getting end of statement expected errors. I can type it in manually and click the "View" text to view the page but VBA will not accept the code as written.

REI
 
Old May 24th, 2005, 11:29 AM
Friend of Wrox
 
Join Date: Jan 2005
Posts: 180
Thanks: 0
Thanked 0 Times in 0 Posts
Default

sub mysub()
 ActiveCell.Hyperlinks.Add Anchor:=Selection, Address:="http://idxpro.cisdata.net/AR185385/index.php/CISNDID=d5434b361870f297b7f0ed9bf7028181&MODE=View Listing&view_mls_id=WA-TCAOR&view_mls_no=120182"
 ActiveCell.Value = "View"
end sub
cheers

Matt

 
Old May 24th, 2005, 11:58 AM
Registered User
 
Join Date: May 2005
Posts: 3
Thanks: 0
Thanked 0 Times in 0 Posts
Default


Thanks Matt this helps! Now I have to figure out how to call the inline frame update from my default page at http://1rei.com/idxsearchpage.htm

Thanks




REI
 
Old May 24th, 2005, 12:07 PM
Friend of Wrox
 
Join Date: Jan 2005
Posts: 180
Thanks: 0
Thanked 0 Times in 0 Posts
Default

My pleasure,

 ActiveCell.Hyperlinks.Add Anchor:=Selection, Address:="http://idxpro.cisdata.net/AR185385"
 ActiveCell.Value = "View"

Cheers

Matt

 
Old May 24th, 2005, 12:22 PM
Registered User
 
Join Date: May 2005
Posts: 3
Thanks: 0
Thanked 0 Times in 0 Posts
Default

Thanks again Matt,

The original posting URL gives my client the listing presentation however in order for me to give it a "Proprietary feel" from my site, I had inserted the idx search page in a frame on my site. I am now exploring how to call the inline frame site from within the page at

http://1rei.com/idxsearchpage.htm (frame source call http://idxpro.cisdata.net/AR185385/i..._mls_no=120182)

The frame source would then be the original address you helped with. I think it's a matter of finding the right syntax for the URL in this case.




REI





Similar Threads
Thread Thread Starter Forum Replies Last Post
Analyze if ActiveCell is part of specified Range babers09 Excel VBA 1 June 14th, 2007 09:12 PM
hyperlink kritimehrotra Excel VBA 3 July 24th, 2006 08:32 PM
Activecell Address vemaju Excel VBA 2 January 4th, 2006 01:36 PM
changing ActiveCell sedolphi Excel VBA 1 May 17th, 2004 02:37 PM
Hyperlink viktor26 Classic ASP Basics 0 October 19th, 2003 09:48 AM





Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
Copyright (c) 2020 John Wiley & Sons, Inc.