October 13, 2008 06:18pm pdt

My Account

Top 15 Experts

Overall Top Experts

1zorvek 9,858,212
2byundt 7,565,884
3rorya 5,833,917
4matthews... 2,909,884
5jeverist 2,821,307
6patrickab 2,243,385
7roos01 1,922,714
8saurabh726 1,668,138
9mvidas 1,529,753
10webtubbs 1,432,026
11brettdj 1,322,026
12fanpages 1,234,722
13MalicUK 1,060,396
14chris_bot... 1,052,193
15mgh_mgh... 649,110

	[x] Attachment Details

excel manage static hyperlink as dynamic hyperlink and add excel filepath to my outlook hyperlink

[x]

The Solution Rating System

With so many solutions, how can you tell which solutions are most likely to help you and which ones are not? To provide you with a tool to use, we rate our solutions based on various elements that most accurately determine if a solution is a quality solution. To explain what factors affect the solution rating, here are the elements we take into consideration when formulating our solution rating.

The Grade of the Solution
The Zone Rank of the Expert Providing the Solution
The Number of Author and Expert Comments
The Number of Experts Contributing
The Feedback of the Community

Your Input Matters
Because of the way the system is set up, the most important variable in this equation is you. As a member of Experts Exchange, you are able to cast your vote on the quality of the solutions in regard to how complete, accurate, helpful and easy to understand each solution is. When you provide your feedback, each rating is adjusted accordingly. So, if you see a solution that has a poor rating that you think is a good solution, let us know by rating it. As you do, the rating will be adjusted and will become more accurate for other members of our site.

If you have any suggestions that you would like to make for our rating system, please ask a question in the Suggestions Zone of Community Support.

Thank you!

8.3

Zones: Microsoft Excel Spreadsheet Software, Email Clients

Tags: Microsoft, Excel, 2007, outlook, hyperlink, dynamic, static

SITUATION:
i use this set of macro to copy in clipboard many outlook links, or one only and i end up with the same problem as tlt28gvg121 (See code snipet, sry for the french comments)
i past thoses links in excel 2007

PROBLEM:
excel display "file:///c:\gv\sheet\outlook:90AF9D8E .....". in tooltip for my links
excel dont reconize my link as an absolute path, it think its relative path, and complete it with actual excel file path

TRIED:
now in the excel document propreties, you can change the default dynamic path, but how to tell the document that all my links are statics, not dynamics?

how to tell excel 2007 to recognize my links as static?
(it work in some excel 2007 computers, but not on some others)

the code snipet is mostly for reference, because my problem is in excel

         
           
             1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:

           
           
             '====================================================================
' Requires IE v4.0+ write a data to the clipboard (copy to clipboard)
Sub wricli(sText)
   Dim aa As Object
   
   Set aa = CreateObject("InternetExplorer.Application")
   With aa
      .Navigate "about:blank"
      Do Until .ReadyState = 4:  Loop
      With .Document
         .Open
         .Write (sText)
         .Close
         Do Until .ReadyState = "complete": Loop
         .execcommand "SelectAll"
         .execcommand "Copy"
      End With ' document
 
   End With ' IE
   aa.Quit
   Set aa = Nothing
End Sub
 
Sub Copier_hyperlien()
   Dim message As Object
   Dim a As Variant
   Dim b As Variant
   Dim ExplorerMsg As Explorer
   Dim FolderMsg As MAPIFolder 'Dossier d'où provienne les msg à copier
   
   Set FolderMsg = ActiveExplorer.CurrentFolder
   Set ExplorerMsg = FolderMsg.GetExplorer
   
   a = TypeName(Outlook.Application.ActiveWindow)
   If a = "Explorer" Then
      b = ""
      For Each message In ExplorerMsg.Selection
         b = b & coplie(message)
      Next
   '=== si on est dans MESSAGE, seulement le "current"
   ElseIf a = "Inspector" Then
      b = ""
      Set message = Outlook.Application.ActiveInspector.CurrentItem
      b = coplie(message)
   End If
   
   'For Each message In ExplorerMsg.Selection
      
   'Next
   wricli (b)
   
End Sub
Function coplie(message)
   Dim a As String
 
      If TypeOf message Is MailItem Then
         a = a & "<a href=""outlook:" & message.EntryID & """>" & _
         "LIEN OUTLOOK From: " & message.SenderName & _
         " Sujet: " & message.Subject & _
         " Date: " & message.ReceivedTime & _
         " Categorie: " & message.categories & _
         "</a><br>"
      ElseIf TypeOf message Is TaskItem Then
         a = a & "<a href=""outlook:" & message.EntryID & """>" & _
         "LIEN OUTLOOK From: " & message.Owner & _
         " Sujet: " & message.Subject & _
         " Date: " & message.DueDate & _
         " Categorie: " & message.categories & _
         "</a><br>"
      ElseIf TypeOf message Is ReportItem Then
         a = a & "<a href=""outlook:" & message.EntryID & """>" & _
         "LIEN OUTLOOK From: " & message.Owner & _
         " Sujet: " & message.Subject & _
         " Date: " & message.CreationTime & _
         " Categorie: " & message.categories & _
         "</a><br>"
      Else
         a = a & "ERREUR - Un item dans votre sélection n'est pas un message ou tâche - pas de lien<br>"
      End If
   coplie = a
 
End Function

           
         

	#	Title
	1	Macro for copying to clipboard in Excel
	2	Error: Cannot Empty Clipboard
	3	How can I send a file to the Windows …
	4	tooltips
	5	VBA to concatenate parts of a filepath
	6	I can't paste hyperlinks created from …