i tried:

Sub openuserform()

Load UserForm1
UserForm1.Show

End Sub
xxxxxxxxxxxxxxxxxx
Sub openuserform_change()

With Range("b5")
.Interior.ColorIndex = 6
.RowHeight = 25
.ColumnWidth = 10
End With

End Sub
xxxxxxxxxxxxxxxx
and it didn't work.
but when i added

Sub openuserform()

Load UserForm1
***Call openuserform_change***
UserForm1.Show

End Sub
xxxxxxxxxxxxxxxxxx
(take out astericks) then it worked. but you have to put it between
Load & show...... otherwise it doesn't do it until after you UNload the
userform.
there may be a better way to do it, i'm no guru!
susan


Jacob wrote:
is it possible to trigger an event when a userform is brought into
focus?