View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
SIGE SIGE is offline
external usenet poster
 
Posts: 206
Default 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