Twice run of macro

[Jozef]

My macro run twice if I run it from excel button !?. It runs normally i
I run it from VBA editor. Why ?
Macro is stored in add in.

My macro:
Sub My_Hyperlink1(Directory As String)
Dim My_Adress As String
With Application.FileDialog(msoFileDialogOpen)
.InitialFileName = Directory
.Show
My_Adress = .SelectedItems(1)
End With
ActiveSheet.Hyperlinks.Add Anchor:=ActiveCell, Address:=My_Adress
End Sub

Sub test_My_Hyperlink1()
My_Hyperlink1 "C:\"
End Sub

Thanks in advic

 

[Guest]

hi,
your macro looks ok. what is the code behind the button?