Re: MsgBox Replacement w/ an UserForm

Tech-Archive recommends: Fix windows errors by optimizing your registry

From: Tom Ogilvy (twogilvy_at_msn.com)
Date: 10/09/04 

Date: Sat, 9 Oct 2004 12:48:44 -0400

In a general module:

Dim ans as String
Sub showform
  userform1.show
  if and = "House" then

  else

  end if
End Sub

in the userform1 module

Private Sub commandbutton1_click()
  ans = "House"
  Unload Me
End Sub

Private Sub commandbutton2_click()
  ans = "Cabin"
  Unload Me
end sub 

-- 
 Regards,
Tom Ogilvy
"Chuckles123" <Chuckles123.1dv91a@excelforum-nospam.com> wrote in message
news:Chuckles123.1dv91a@excelforum-nospam.com...
>
> Bob,
> Thanks.
> Formatting is easier in a Form.  Also, the 'Yes-No' buttons are not
> applicable to the options that I am giving the user.
> I would appreciate if you or someone could give me a few lines of
> code.
> Chuckles123
>
>
> -- 
> Chuckles123
> ------------------------------------------------------------------------
> Chuckles123's Profile:
http://www.excelforum.com/member.php?action=getinfo&userid=14948
> View this thread: http://www.excelforum.com/showthread.php?threadid=267872
>
Quantcast