Tabstrip tabs entered programmatically disappear after form unload

Hi,
I can enter tabs into a tabstrip programmatically with no problem, but when
I open the form after closing it, the added tabs are not there. I'm using XP
SP2 and Excel 2003. Code as follows:
Sub AddTabs()
Dim TestStrip As TabStrip
Dim TabCounter As Integer
Dim TestTab As Object

TabCounter = 0
Do While Worksheets("Stocks").Cells(21 + TabCounter, 11).Value <> ""
Set TestStrip = Form1.TabStrip1
Set TestTab = TestStrip.Tabs.Add("MyTab" & TabCounter + 1, "MyTab" &
TabCounter + 1, TabCounter)
TabCounter = TabCounter + 1
Loop
End Sub

Thanks in advance!
Steve

Examine this code example and see how John uses the designer property:

http://j-walk.com/ss/excel/tips/tip76.htm

--
Regards,
Tom Ogilvy

"cumchee" <cumchee@discussions.microsoft.com> wrote in message
news:74D5838E-58D8-40C0-8C68-F0E3DC8FB567@microsoft.com...
> Hi,
> I can enter tabs into a tabstrip programmatically with no problem, but
when
> I open the form after closing it, the added tabs are not there. I'm using
XP
> SP2 and Excel 2003. Code as follows:
> Sub AddTabs()
> Dim TestStrip As TabStrip
> Dim TabCounter As Integer
> Dim TestTab As Object
>
> TabCounter = 0
> Do While Worksheets("Stocks").Cells(21 + TabCounter, 11).Value <> ""
> Set TestStrip = Form1.TabStrip1
> Set TestTab = TestStrip.Tabs.Add("MyTab" & TabCounter + 1, "MyTab"
&
> TabCounter + 1, TabCounter)
> TabCounter = TabCounter + 1
> Loop
> End Sub
>
> Thanks in advance!
> Steve