sorry, but i don't see what you mean. i use the code i posted earlier, it
creates a hyperlink and then i copy that hyperlink to a new workbook and it
copies fine.



--


Gary


"maperalia" wrote in message
...
Gary;
Thanks for your quick response.
I have a program that copy information from one row of one file to another
file to create a database. This row has the hyperlink which is vanished after
the data is been copied to the database.

How can I keep the hyperlink with its path after is been copied?

Thanks in advance.
Maperalia


"Gary Keramidas" wrote:

not sure what you mean. what are you copying and how?

--


Gary


"maperalia" wrote in message
...
Gary;
The hyperlink is vanished after is been copied to another file. Could you
please tell me how can I make it keep the hyperlink with it path after is
been copied.
Thnaks in advance .
Maperalia
"Gary Keramidas" wrote:

see if this will work for you, you may have to change the cell addresses
if i
have them wrong. i couldn't tell from the post, the alignment was off.

Option Explicit
Dim hl As String
Sub test()
With Worksheets("Sheet1")
hl = "c:\test\" & .Range("B1").Value & "\" & Range("B2").Value _
& "@" & Range("B3").Value & ".xls"
.Hyperlinks.Add .Range("E2"), hl
End With
End Sub

--


Gary


"maperalia" wrote in message
...
Gary;
I wonder if you can help me to accomplish this part. Basically, the
value
that I have created in the previous request is the filename; however, I
want
to create a hyperlink with this new filename.
For example, this is the table I have in excel:

A B C D E
1 Work Order #: 4444 Filename
2 Location: B1 B1 @ 100.xls
3 Point: 100

Where cell E2 will take the filename from the description written in the
table of the left side. However, I want this filename to have a
hyperlink
automatically with the following path:

C:\Test\4444\ B1 @ 100.xls

Obviously, the work order number will be changed all the time along the
location and the point.
It that possible if you can help me with the VBA stattement to get this
step
done?

Thanks in advance.

Maperalia


"Gary Keramidas" wrote:

sorry, missed the xls at the end

Range("b1").Value = Range("A1").Value & " @ " & Range("a2").Value &
".xls"


--


Gary


"maperalia" wrote in message
...
Basically, I want to take the value from the cell A1 and cell A2 and
type
it
in the cell B1.
For example, if the cell A1=Core and cell A2=50; I want to get in the
cell
B1 the following:
Core @ 50.xls

If this possible to do this?

Thanks in advance.
Maperalia