VBA changing a user form label based on cell value?

[Cease]

Hi!
Is there any way to change a label in a user form based on the value of a cell?

I'm trying to link a series of labels to a small range of cells that change based on a data-validation drop box.

I've tried finding info, but I can't seem to find the right place.

The code I've tried so far without result is:

Private Sub Label3_Click()
    Me.Label13.Caption = ActiveSheet.Range("BQ15")
End Sub

Any advice, direction, or a "no that's not possible" would be greatly appreciated!

 

[Norie]

When you show the userform code execution passes to it so the next line won't be run until the userform is closed.

Either put the code in the form's initialize event to set the caption or change the code to load the userform, set the caption and then show it.

If you opt for the former you just need Me.Label1.Caption, if it's the latter then you need the form's name LEASFORM.Label1.Caption.

 

[TheRogue!]

Ah-ha! That was my mistake. I had it in the wrong place.
Thank you!

[Now back to reseaching how I "link" a userform to a table, so that I can pull up existing records, edit them or add a new record. - The Form add-in would be perfect, except that I have too many columns in my table, so now I have to learn how to do it w/ a userfrom]

 

[coheed1785]

This wasn't originally my question (I just sort of shang-hai'd it). I liked your answer to Cease & I am trying to do something similar. I understand the part about putting it in the forms Initialization code as opposed to the event click code, but I seem to still be having difficulty w/ that. I'm using code:
Sub Open_Leaseform()
LEASFORM.Show
Me.LEASFORM.Label1.Caption = Sheet10.Range("E4")
End Sub

What am I doing wrong?

I know this is ancient, but are you still having this problem?

Try:
Sub Open_Leaseform()
Leasform.show
Leasform.label1.caption = ActiveSheet.Range("E4")
End Sub