Todd,

I think you may be unloading the form, rather than hiding it

Unload Costing or Unload Me

should be

Hide.Costing or Hide.Me

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"ToddG" wrote in message
...
I'm using the following code to format a group of
textboxes on a userform (thanks for your help Bob):

Private Sub TextBox46_AfterUpdate()
TextBox46.Text = Format(TextBox46.Text, "#,##0.00")
End Sub

Private Sub TextBox47_AfterUpdate()
TextBox47.Text = Format(TextBox47.Text, "#,##0.00")
End Sub

Private Sub UserForm_Activate()
TextBox46.Text = Format(TextBox46.Text, "#,##0.00")
TextBox47.Text = Format(TextBox47.Text, "#,##0.00")
End Sub

I'm using a macro button with the following code to show
this userform:

Sub Costing()
Costing1.Show
End Sub

I think this is where the problem is. If i show the
userform using this code the formatting will not work. I
have another userform being shown with a command button on
this userform that works fine which leads me to believe
that it's with the macro button code. Any ideas?

TIA,

Todd