I am trying to make a text box have no fill, using a macro in PowerPoint 2007.

I went to an XP version of PowerPoint and recorded a macro to do this. The code it created was:

With ActiveWindow.Selection.ShapeRange
.Fill.Visible = msoFalse
.Fill.Solid
.Fill.Transparency = 0#
End With


This code works fine in a macro in the XP version of PowerPoint, but does not work in PowerPoint 2007. It returns a solid white fill with no transparency.

Does anyone know what code will work in VBA (a macro) in PowerPoint 2007 to give a text box no fill at all?