changing the caption of a command button

I have a command button that when clicked runs a VB script that carries out a
complex calculation. Right now, the caption for the button reads,
"Calculate".

I'd like it to switch to read, "Working" while it is doing the calculating
and then back to "Calculate" when it's done.

If I enter Me.CommandButton1.Caption = "Working" at the beginning of the
script, it doesn't change. Probably not refreshing.

Is there a way to get it to change while it's calculating?

Thanks in advance.

Jerry

Based on your code I assume that the button comes from the Control Toolbox.
Is screen updating on or off? I assume that the button is embedded in the
sheet.

Instead of using me. have you tired referencing the sheet directly like

Sheet1.CommandButton1.Caption = "Working"

As a complete aside I tend to use the status bar to preform this function
instead of changing button captions. It is a little less of a problem to
reset if things go wrong...

Application.statusbar = "Calculating. Please Wait..."
'Your code
application.statusbar = false

--
HTH...

Jim Thomlinson


"JWCrosby" wrote:

> I have a command button that when clicked runs a VB script that carries out a
> complex calculation. Right now, the caption for the button reads,
> "Calculate".
>
> I'd like it to switch to read, "Working" while it is doing the calculating
> and then back to "Calculate" when it's done.
>
> If I enter Me.CommandButton1.Caption = "Working" at the beginning of the
> script, it doesn't change. Probably not refreshing.
>
> Is there a way to get it to change while it's calculating?
>
> Thanks in advance.
>
> Jerry

Thanks, Jim. That's a simpler, yet just as effective, method.

Jerry

"Jim Thomlinson" wrote:

> Based on your code I assume that the button comes from the Control Toolbox.
> Is screen updating on or off? I assume that the button is embedded in the
> sheet.
>
> Instead of using me. have you tired referencing the sheet directly like
>
> Sheet1.CommandButton1.Caption = "Working"
>
> As a complete aside I tend to use the status bar to preform this function
> instead of changing button captions. It is a little less of a problem to
> reset if things go wrong...
>
> Application.statusbar = "Calculating. Please Wait..."
> 'Your code
> application.statusbar = false
>
> --
> HTH...
>
> Jim Thomlinson
>
>
> "JWCrosby" wrote:
>
> > I have a command button that when clicked runs a VB script that carries out a
> > complex calculation. Right now, the caption for the button reads,
> > "Calculate".
> >
> > I'd like it to switch to read, "Working" while it is doing the calculating
> > and then back to "Calculate" when it's done.
> >
> > If I enter Me.CommandButton1.Caption = "Working" at the beginning of the
> > script, it doesn't change. Probably not refreshing.
> >
> > Is there a way to get it to change while it's calculating?
> >
> > Thanks in advance.
> >
> > Jerry