Working in Excel 2003 SP2, I have three command buttons which, when clicked,
will have their displayed captions increase in size -- getting larger on
each run.
1. When I go into VBA properties for the command button, the font setting
is unchanged.
2. Furthermore, getting the VBA font property to reset the display doesn't
seem to work well. It's as though it associates the current displayed font
(call 76, maybe) with the current properties font (say 12). So changing the
property font from 12 to 10, say, still displays as big. And once you have
reset to the smallest font available, you are basically stuck.

I haven't a clue and have not seen this before. Autosize is off, as is
TakeFocusOnClick.

Thanks in advance. Larry.

What code are you using?

' this works for me
Private Sub CommandButton1_Click()
With CommandButton1.Font
.Size = .Size + 2
End With
End Sub



--

Regards,
Nigel
(E-Mail Removed)



"Eddie" <(E-Mail Removed)> wrote in message
news:79E4B9C0-0D03-46EB-AA9E-(E-Mail Removed)...
> Working in Excel 2003 SP2, I have three command buttons which, when
> clicked, will have their displayed captions increase in size -- getting
> larger on each run.
> 1. When I go into VBA properties for the command button, the font setting
> is unchanged.
> 2. Furthermore, getting the VBA font property to reset the display
> doesn't seem to work well. It's as though it associates the current
> displayed font (call 76, maybe) with the current properties font (say 12).
> So changing the property font from 12 to 10, say, still displays as big.
> And once you have reset to the smallest font available, you are basically
> stuck.
>
> I haven't a clue and have not seen this before. Autosize is off, as is
> TakeFocusOnClick.
>
> Thanks in advance. Larry.

I found an article that related this to the zoom setting on the sheet being
less than 100%. It was for Excel 2000, so may not be pertinent.

http://support.microsoft.com/kb/211866/en-us

--
Regards,
Tom Ogilvy


"Eddie" wrote:

> Working in Excel 2003 SP2, I have three command buttons which, when clicked,
> will have their displayed captions increase in size -- getting larger on
> each run.
> 1. When I go into VBA properties for the command button, the font setting
> is unchanged.
> 2. Furthermore, getting the VBA font property to reset the display doesn't
> seem to work well. It's as though it associates the current displayed font
> (call 76, maybe) with the current properties font (say 12). So changing the
> property font from 12 to 10, say, still displays as big. And once you have
> reset to the smallest font available, you are basically stuck.
>
> I haven't a clue and have not seen this before. Autosize is off, as is
> TakeFocusOnClick.
>
> Thanks in advance. Larry.
>

Tom, that describes the problen exactly. But I have always set my zoom at
85% in my apps, and I have never seen this behavior before. Still, very
much appreciate the reference. Now probably just need to play with a bit
and see if I can get around. I think I'll delete my exisitng controls,
save, reopen, and redefine. And see what happens. Thanks.

"Tom Ogilvy" <(E-Mail Removed)> wrote in message
news:3C029B2E-002B-4298-98E4-(E-Mail Removed)...
>I found an article that related this to the zoom setting on the sheet being
> less than 100%. It was for Excel 2000, so may not be pertinent.
>
> http://support.microsoft.com/kb/211866/en-us
>
> --
> Regards,
> Tom Ogilvy
>
>
> "Eddie" wrote:
>
>> Working in Excel 2003 SP2, I have three command buttons which, when
>> clicked,
>> will have their displayed captions increase in size -- getting larger on
>> each run.
>> 1. When I go into VBA properties for the command button, the font
>> setting
>> is unchanged.
>> 2. Furthermore, getting the VBA font property to reset the display
>> doesn't
>> seem to work well. It's as though it associates the current displayed
>> font
>> (call 76, maybe) with the current properties font (say 12). So changing
>> the
>> property font from 12 to 10, say, still displays as big. And once you
>> have
>> reset to the smallest font available, you are basically stuck.
>>
>> I haven't a clue and have not seen this before. Autosize is off, as is
>> TakeFocusOnClick.
>>
>> Thanks in advance. Larry.
>>

Deleting the controls, saving and exiting the template, reopening, setting
my zoom to 85%, and THEN redefining the controls seems to have worked. I do
like easy answers. Thanks.

"Eddie" <(E-Mail Removed)> wrote in message
news:FD0D7481-96EF-4E6A-8116-(E-Mail Removed)...
> Tom, that describes the problen exactly. But I have always set my zoom at
> 85% in my apps, and I have never seen this behavior before. Still, very
> much appreciate the reference. Now probably just need to play with a bit
> and see if I can get around. I think I'll delete my exisitng controls,
> save, reopen, and redefine. And see what happens. Thanks.
>
> "Tom Ogilvy" <(E-Mail Removed)> wrote in message
> news:3C029B2E-002B-4298-98E4-(E-Mail Removed)...
>>I found an article that related this to the zoom setting on the sheet
>>being
>> less than 100%. It was for Excel 2000, so may not be pertinent.
>>
>> http://support.microsoft.com/kb/211866/en-us
>>
>> --
>> Regards,
>> Tom Ogilvy
>>
>>
>> "Eddie" wrote:
>>
>>> Working in Excel 2003 SP2, I have three command buttons which, when
>>> clicked,
>>> will have their displayed captions increase in size -- getting larger on
>>> each run.
>>> 1. When I go into VBA properties for the command button, the font
>>> setting
>>> is unchanged.
>>> 2. Furthermore, getting the VBA font property to reset the display
>>> doesn't
>>> seem to work well. It's as though it associates the current displayed
>>> font
>>> (call 76, maybe) with the current properties font (say 12). So changing
>>> the
>>> property font from 12 to 10, say, still displays as big. And once you
>>> have
>>> reset to the smallest font available, you are basically stuck.
>>>
>>> I haven't a clue and have not seen this before. Autosize is off, as is
>>> TakeFocusOnClick.
>>>
>>> Thanks in advance. Larry.
>>>
>

My "fix" did not hold. I.e., "Deleting the controls, saving and exiting the
template, reopening, setting
my zoom to 85%, and THEN redefining the controls seems to have worked."

I have not had this issue with any other templates. Only difference I can
tell is that I have moved from Excel 2002 SP2 to Excel 2003 SP2.

Any other thoughts? I can hardly pass this off as professional level
quality as it now stands. Thanks.

"Eddie" <(E-Mail Removed)> wrote in message
news:79E4B9C0-0D03-46EB-AA9E-(E-Mail Removed)...
> Working in Excel 2003 SP2, I have three command buttons which, when
> clicked, will have their displayed captions increase in size -- getting
> larger on each run.
> 1. When I go into VBA properties for the command button, the font setting
> is unchanged.
> 2. Furthermore, getting the VBA font property to reset the display
> doesn't seem to work well. It's as though it associates the current
> displayed font (call 76, maybe) with the current properties font (say 12).
> So changing the property font from 12 to 10, say, still displays as big.
> And once you have reset to the smallest font available, you are basically
> stuck.
>
> I haven't a clue and have not seen this before. Autosize is off, as is
> TakeFocusOnClick.
>
> Thanks in advance. Larry.

This is pretty frustrating. I get the same issues, except that I also get
diminishing button size and font, depending on the zoom.
Quick & dirty workaround -used text boxes with color fills, and convertedmy
code to macros and assigning those to the text boxes. Protected and locked
the text boxes. Looks "professional" enough.
Be interested to see real fix.



"Eddie" wrote:

> My "fix" did not hold. I.e., "Deleting the controls, saving and exiting the
> template, reopening, setting
> my zoom to 85%, and THEN redefining the controls seems to have worked."
>
> I have not had this issue with any other templates. Only difference I can
> tell is that I have moved from Excel 2002 SP2 to Excel 2003 SP2.
>
> Any other thoughts? I can hardly pass this off as professional level
> quality as it now stands. Thanks.
>
> "Eddie" <(E-Mail Removed)> wrote in message
> news:79E4B9C0-0D03-46EB-AA9E-(E-Mail Removed)...
> > Working in Excel 2003 SP2, I have three command buttons which, when
> > clicked, will have their displayed captions increase in size -- getting
> > larger on each run.
> > 1. When I go into VBA properties for the command button, the font setting
> > is unchanged.
> > 2. Furthermore, getting the VBA font property to reset the display
> > doesn't seem to work well. It's as though it associates the current
> > displayed font (call 76, maybe) with the current properties font (say 12).
> > So changing the property font from 12 to 10, say, still displays as big.
> > And once you have reset to the smallest font available, you are basically
> > stuck.
> >
> > I haven't a clue and have not seen this before. Autosize is off, as is
> > TakeFocusOnClick.
> >
> > Thanks in advance. Larry.
>

Hi Eddie,
I also had this trouble a while back and found this solution.
http://support.microsoft.com/kb/838006/en-us

Exit Excel
Scroll down to the section "More Information" and follow the 11 steps
listed. Relaunch Excel and click away to see if it took.

If this doesn't work, you might need a service pack update. Ignore the fact
that the article indicates a root cause of screen resolution change.

"Eddie" wrote:

> My "fix" did not hold. I.e., "Deleting the controls, saving and exiting the
> template, reopening, setting
> my zoom to 85%, and THEN redefining the controls seems to have worked."
>
> I have not had this issue with any other templates. Only difference I can
> tell is that I have moved from Excel 2002 SP2 to Excel 2003 SP2.
>
> Any other thoughts? I can hardly pass this off as professional level
> quality as it now stands. Thanks.
>
> "Eddie" <(E-Mail Removed)> wrote in message
> news:79E4B9C0-0D03-46EB-AA9E-(E-Mail Removed)...
> > Working in Excel 2003 SP2, I have three command buttons which, when
> > clicked, will have their displayed captions increase in size -- getting
> > larger on each run.
> > 1. When I go into VBA properties for the command button, the font setting
> > is unchanged.
> > 2. Furthermore, getting the VBA font property to reset the display
> > doesn't seem to work well. It's as though it associates the current
> > displayed font (call 76, maybe) with the current properties font (say 12).
> > So changing the property font from 12 to 10, say, still displays as big.
> > And once you have reset to the smallest font available, you are basically
> > stuck.
> >
> > I haven't a clue and have not seen this before. Autosize is off, as is
> > TakeFocusOnClick.
> >
> > Thanks in advance. Larry.
>