Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Passing an index to a second workbook
Hi There,
I have one workbook with a userform & a "HelpButton" on it. I would like to open a second workbook to show the actual Help-Description. I think something should look as underneath but I don't know how I can pass the Help-index number (in my example "5") to the "Index"-variable of the 2nd wbk...! *1st Workbook Userform: Private Sub HelpButton_Click() Application.Run "help.xls!ShowUserformHelp", 5 'the 5th index in the HELP End Sub *2nd Workbook: "help.xls" : Sub ShowUserformHelp() UserForm1.Show End Sub Private Sub UserForm_Initialize() Label1.Caption = Application.VLookup(Index, HelpDescription, 2, False) End Sub All help welcome, Brgds Sige |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Passing an index to a second workbook
Hi Again,
Underneath is what I wanted ... Just having a problem still to open the file when it is closed! Brgds Sige 1stworkbook Private Sub HelpButton_Click() Const Counter As Long = 25 SaveSetting "HelpWorkbook", "Index", "HelpID", Counter Application.Run "help.xls!ShowUserformHelp" End Sub 2nd Workbook: "help.xls" : Sub ShowUserformHelp() UserForm1.Show End Sub Private Sub UserForm_Initialize() Dim Counter As Long Dim Helpdescription As Range ' Get setting from registry Counter = GetSetting("HelpWorkbook", "Index", "HelpID", 0) Set Helpdescription = ThisWorkbook.Sheets("IndexSheet").Range("Help") Label1.Caption = Application.VLookup(Counter, Helpdescription, 2, False) End Sub |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Passing an index to a second workbook
With Norman Jones' help:
Index not passed via the registry! Private Sub HelpButton_Click() Dim icounter As Long icounter = 7 'Give Index ID Application.Run "'Sige help(25 Oct 05).xls'!ShowUserformHelp", icounter 'Application.Run "'C:\MyFolder\My File \MyMacro'" End Sub I was nearly there ;o) Sige wrote: Hi There, I have one workbook with a userform & a "HelpButton" on it. I would like to open a second workbook to show the actual Help-Description. I think something should look as underneath but I don't know how I can pass the Help-index number (in my example "5") to the "Index"-variable of the 2nd wbk...! *1st Workbook Userform: Private Sub HelpButton_Click() Application.Run "help.xls!ShowUserformHelp", 5 'the 5th index in the HELP End Sub *2nd Workbook: "help.xls" : Sub ShowUserformHelp() UserForm1.Show End Sub Private Sub UserForm_Initialize() Label1.Caption = Application.VLookup(Index, HelpDescription, 2, False) End Sub All help welcome, Brgds Sige |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Passing a range name as an argument to the Index Function | Excel Discussion (Misc queries) | |||
Workbook index | New Users to Excel | |||
Passing selected workbook name and values to a macro | Excel Worksheet Functions | |||
Passing data to an open workbook from Lotus Notes | Excel Programming | |||
Passing a Variable from Worksheet to Workbook | Excel Programming |