View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.programming
Julian[_2_] Julian[_2_] is offline
external usenet poster
 
Posts: 3
Default userforms / worksheets

Hi,
You could try this code.

Sub myHelp()
mysheet = ActiveSheet.Name
Select Case mysheet
Case Is = "Sheet1"
UserForm1.MultiPage1.Value = 0
UserForm1.Show
Case Is = "Sheet2"
UserForm1.MultiPage1.Value = 1
UserForm1.Show
End Select
End Sub

Regards,
Julian
http://www.angelfire.com/biz7/julian...ans_macros.htm

i am writing a help system for my vba/excel project
the help is launched from a button on each worksheet in the workbook
each button calls the same help system

the help is built with a userform and a multi-page

how do i detect which worksheet the help was launched from in order to set
the mult-page to the correct page?

ie if the user is on 'sheet 2' and they click the help button, the help will
come up and display 'page 2'

tia

J