Disable Hyperlink Warning in Excel 2010

thedeceived

New Member
Joined
Aug 29, 2010
Messages
7
Hey all :)

I'm trying to open some .avi files on my computer through an Excel program of mine, but every time I try, it pops up this annoying hyperlink warning:

"Opening

Some files can contain viruses or otherwise be harmful to your computer.

It is important to be certain that this file comes from a trustworthy source.

Would you like to open this file?"


Now after some Googling, I managed to find a number of sites suggesting to add a DWORD Value to the Registry of the Microsoft Office entry, in the following location:

HKEY_CURRENT_USER\Software\Microsoft\Office\12.0\Common\Secuirty

N.B. My path to this key was actually 14.0 instead of 12.0 due to having Office 2010 installed on this machine, so hopefully this doesn't effect the following process.

Name it "DisableHyperlinkWarning" (without quotes) and set the value to 1 and make sure it's a decimal value, not a hexidecimal.

After following this method, it still is popping up this annoying warning message. Does anyone have any other methods that can disable this?
 
Last edited:
Hey The Decieved you code seems to be what I need. curious if that works for word 2013? I am having issues getting it to run right.


Code:
Option Explicit
 
Enum W32_Window_State
    Show_Normal = 1
    Show_Minimized = 2
    Show_Maximized = 3
    Show_Min_No_Active = 7
    Show_Default = 10
End Enum
 
Private Declare Function ShellExecute Lib "shell32.dll" _
Alias "ShellExecuteA" (ByVal hWnd As Long, _
ByVal lpOperation As String, ByVal lpFile As String, _
ByVal lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
 
Function OpenURL(URL As String, WindowState As W32_Window_State) As Boolean
     
    'Opens passed URL with default application, or Error Code (<32) upon error
     
    Dim lngHWnd As Long
    Dim lngReturn As Long
     
    lngReturn = ShellExecute(lngHWnd, "open", URL, vbNullString, _
    vbNullString, WindowState)
     
    OpenURL = (lngReturn > 32)
     
End Function





can you help a sister out?
 
Upvote 0

Excel Facts

Highlight Duplicates
Home, Conditional Formatting, Highlight Cells, Duplicate records, OK to add pink formatting to any duplicates in selected range.

Forum statistics

Threads
1,215,963
Messages
6,127,951
Members
449,412
Latest member
montand

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top