how to set a userform's button caption equal to a variable in the main procedure?

A

akh2103

Hello--does anyone know how to set the caption on a command button of a
userform equal to a variable generated in a main procedure (in which
the userform procedure is loaded and displayed). Thanks, Abe
 
N

Norman Jones

Hi Akh,

In a standard module, before any code, paste the fillowing code:

'=============>>
Option Explicit
Public strCaption As String

'--------------->>

Public Sub Tester()
strCaption = "Your Caption"
UserForm1.Show
End Sub
'<<=============

In the useform module, try:
'=============>>
Private Sub UserForm_Initialize()
Me.CommandButton1.Caption = strCaption
End Sub
'<<=============
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Make Userform Caption equal textbox contents 2
Using a variable to select a CommandButton and setting the caption 4
How to elegantly end a main procedure from a userform command button? 1
How to enumerate buttons on user form 2
Command button caption from cell value 4
How to bottom-align a control on a UserForm? 2
End a procedure form a UserForm 3
End a procedure from a UserForm 1

Top