Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Twice run of macro
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 -- Joze ----------------------------------------------------------------------- Jozef's Profile: http://www.excelforum.com/member.php...fo&userid=1602 View this thread: http://www.excelforum.com/showthread.php?threadid=27490 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Twice run of macro
hi,
your macro looks ok. what is the code behind the button? -----Original Message----- My macro run twice if I run it from excel button !?. It runs normally if 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 advice -- Jozef ---------------------------------------------------------- -------------- Jozef's Profile: http://www.excelforum.com/member.php? action=getinfo&userid=16025 View this thread: http://www.excelforum.com/showthread...hreadid=274905 . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Macro recorded... tabs & file names changed, macro hangs | Excel Worksheet Functions | |||
Macro Help Needed - Excel 2007 - Print Macro with Auto Sort | Excel Worksheet Functions | |||
how to count/sum by function/macro to get the number of record to do copy/paste in macro | Excel Programming | |||
macro to delete entire rows when column A is blank ...a quick macro | Excel Programming | |||
Start Macro / Stop Macro / Restart Macro | Excel Programming |