Set default textbox font

I'm using Access 2007 and VBA to create a series of slides in a PPT brief.

Would like to set the default font and font.size of textbox shapes added
using the AddTextbox method to Arial, 16. I'm currently adding lines for
each textbox. If I cannot figure out a way to do this with just a couple of
lines of code, at the beginning of my routine, I'll writing a subroutine with
just two lines and pass a shape to the sub. However, I would prefer to do
this with just two lines of codeat the beginning of my code segment.

----
Dale

If you have one textbox with the correct font you should be able to use
..SetShapesDefaultProperties
--
john ATSIGN PPTAlchemy.co.uk

Free PPT Hints, Tips and Tutorials
http://www.pptalchemy.co.uk/powerpoi...tutorials.html






"Dale Fye" wrote:

I'm using Access 2007 and VBA to create a series of slides in a PPT brief.

Would like to set the default font and font.size of textbox shapes added
using the AddTextbox method to Arial, 16. I'm currently adding lines for
each textbox. If I cannot figure out a way to do this with just a couple of
lines of code, at the beginning of my routine, I'll writing a subroutine with
just two lines and pass a shape to the sub. However, I would prefer to do
this with just two lines of codeat the beginning of my code segment.

----
Dale

Worked like a charm!

Cannot believe how much more complicated the PPT object model is than Access.

Thanks, John

----
Dale



"John Wilson" wrote:

If you have one textbox with the correct font you should be able to use
.SetShapesDefaultProperties
--
john ATSIGN PPTAlchemy.co.uk

Free PPT Hints, Tips and Tutorials
http://www.pptalchemy.co.uk/powerpoi...tutorials.html






"Dale Fye" wrote:

I'm using Access 2007 and VBA to create a series of slides in a PPT brief.

Would like to set the default font and font.size of textbox shapes added
using the AddTextbox method to Arial, 16. I'm currently adding lines for
each textbox. If I cannot figure out a way to do this with just a couple of
lines of code, at the beginning of my routine, I'll writing a subroutine with
just two lines and pass a shape to the sub. However, I would prefer to do
this with just two lines of codeat the beginning of my code segment.

----
Dale