View Single Post
  #8   Report Post  
Posted to microsoft.public.excel.programming
FrigidDigit[_2_] FrigidDigit[_2_] is offline
external usenet poster
 
Posts: 32
Default Help with creating hyperlink via VBA

Thanks Tom

FD

"Tom Ogilvy" wrote in message
...
It puts in a double quote within a string.

You can see this by examining it from the immediate window:

fname = "Goofy"
? "=Hyperlink(""" & fname & """)"
=Hyperlink("Goofy")


--
Regards,
Tom Ogilvy

"FrigidDigit" wrote in message
...
Worked like a bomb!

Could you explain to me wht """ was used?

Thanks again.

FD


"Dave Peterson" wrote in message
...
I take it that it worked!!

Glad you got it going.

FrigidDigit wrote:

Dave you are a genius!!
Thank you so much!!

"FrigidDigit" wrote in message
...
Dave,

what do the """" do?

FD


"Dave Peterson" wrote in message
...
Shouldn't this:

MyFormula = "=Hyperlink(" & fname & ")"
look more like:

MyFormula = "=Hyperlink(""" & fname & """)"
or
MyFormula = "=Hyperlink(" & chr(34) & fname & Chr(34) & ")"



FrigidDigit wrote:

Hi All,
???
??? I'm trying to create a hyperlink for each entry in a list of
filenames.
??? Below is the code that I have come up with so far (I know very

little
??? about
??? VBA:))
??? fname = objFolder.Path ? "\" ? objFile.Name
??? Addrs = Workbooks("Subcontractor invoices
??? Overview.xls").Worksheets("Invoice
??? Listing").Cells(eRow, 8).Address
??? MyFormula = "=Hyperlink(" ? fname ? ")"
??? Workbooks("Subcontractor invoices

Overview.xls").Worksheets("Invoice
??? Listing").Range(Addrs).Value = MyFormula
???
??? When I try to run this it gives me a runtime error 1004
Application
??? defined
??? or object defined error on the last line above.
???
??? Any help would be much appreciated.
???
??? FD
??
?? --
??
?? Dave Peterson
?
?

--

Dave Peterson