Microsoft Excel: Zorder doing strange things

Can anybody explain what's going on here ?

Put two listboxes and two commandbuttons on a form and
partially overlap the two listboxes. The code below should
alternately bring to the front and then to the rear Listbox2.

Private Sub CommandButton1_Click()
ListBox2.ZOrder (0)
End Sub

Private Sub CommandButton2_Click()
ListBox2.ZOrder (1)
End Sub

Here is what I'm seeing:

1. Run the form and it works fine. (or it may not work)
2. close the form
3. add a blank(if necessary) to the code and do a SAVE
4. run the form again and now it DOES NOT Work.
5. you can keep doing this and it alternates from WORKING to
NOT WORKING every time you do a SAVE.

I'm using Excel 2003. WORD does the same thing.

Keywords & Tags: zorder, doing, strange, things, microsoft, excel

URL: http://www.developertags.com/microsoft-excel/495228/

«« Prev - Next »» 5 helpful answers below.

Maybe just redrawing the userform would help:

Option Explicit
Private Sub CommandButton1_Click()
me.ListBox2.ZOrder 0
Me.Repaint
End Sub
Private Sub CommandButton2_Click()
me.ListBox2.ZOrder 1
Me.Repaint
End Sub

Ken Soenen wrote:
> Can anybody explain what's going on here ?
> Put two listboxes and two commandbuttons on a form and
> partially overlap the two listboxes. The code below should
> alternately bring to the front and then to the rear Listbox2.
> Private Sub CommandButton1_Click()
> ListBox2.ZOrder (0)
> End Sub
> Private Sub CommandButton2_Click()
> ListBox2.ZOrder (1)
> End Sub
> Here is what I'm seeing:
> 1. Run the form and it works fine. (or it may not work)
> 2. close the form
> 3. add a blank(if necessary) to the code and do a SAVE
> 4. run the form again and now it DOES NOT Work.
> 5. you can keep doing this and it alternates from WORKING to
> NOT WORKING every time you do a SAVE.
> I'm using Excel 2003. WORD does the same thing.
--

Dave Peterson

dave | Thu, 22 May 2008 04:51:00 GMT |

Dave,
Tried your idea and it still does the same thing.
Thanks anyway

"Dave Peterson" <petersod...verizonXSPAM.net> wrote in message
news:438F83A5.FD7E6F87...verizonXSPAM.net...
> Maybe just redrawing the userform would help:
>
> Option Explicit
> Private Sub CommandButton1_Click()
> me.ListBox2.ZOrder 0
> Me.Repaint
> End Sub
> Private Sub CommandButton2_Click()
> me.ListBox2.ZOrder 1
> Me.Repaint
> End Sub
> Ken Soenen wrote:
>> Can anybody explain what's going on here ?
>> Put two listboxes and two commandbuttons on a form and
>> partially overlap the two listboxes. The code below should
>> alternately bring to the front and then to the rear Listbox2.
>> Private Sub CommandButton1_Click()
>> ListBox2.ZOrder (0)
>> End Sub
>> Private Sub CommandButton2_Click()
>> ListBox2.ZOrder (1)
>> End Sub
>> Here is what I'm seeing:
>> 1. Run the form and it works fine. (or it may not work)
>> 2. close the form
>> 3. add a blank(if necessary) to the code and do a SAVE
>> 4. run the form again and now it DOES NOT Work.
>> 5. you can keep doing this and it alternates from WORKING to
>> NOT WORKING every time you do a SAVE.
>> I'm using Excel 2003. WORD does the same thing.
> --
> Dave Peterson

ken | Thu, 22 May 2008 04:52:00 GMT |

It was enough to make it work ok for me.

Maybe adding doEvents would help?

Ken Soenen wrote:
> Dave,
> Tried your idea and it still does the same thing.
> Thanks anyway
> "Dave Peterson" <petersod...verizonXSPAM.net> wrote in message
> news:438F83A5.FD7E6F87...verizonXSPAM.net...
> > Maybe just redrawing the userform would help:
> >
> >
> > Option Explicit
> > Private Sub CommandButton1_Click()
> > me.ListBox2.ZOrder 0
> > Me.Repaint
> > End Sub
> > Private Sub CommandButton2_Click()
> > me.ListBox2.ZOrder 1
> > Me.Repaint
> > End Sub
> >
> > Ken Soenen wrote:
> >>
> >> Can anybody explain what's going on here ?
> >>
> >> Put two listboxes and two commandbuttons on a form and
> >> partially overlap the two listboxes. The code below should
> >> alternately bring to the front and then to the rear Listbox2.
> >>
> >> Private Sub CommandButton1_Click()
> >> ListBox2.ZOrder (0)
> >> End Sub
> >>
> >> Private Sub CommandButton2_Click()
> >> ListBox2.ZOrder (1)
> >> End Sub
> >>
> >> Here is what I'm seeing:
> >>
> >> 1. Run the form and it works fine. (or it may not work)
> >> 2. close the form
> >> 3. add a blank(if necessary) to the code and do a SAVE
> >> 4. run the form again and now it DOES NOT Work.
> >> 5. you can keep doing this and it alternates from WORKING to
> >> NOT WORKING every time you do a SAVE.
> >>
> >> I'm using Excel 2003. WORD does the same thing.
> >
> > --
> >
> > Dave Peterson
--

Dave Peterson

dave | Thu, 22 May 2008 04:53:00 GMT |

Dave,
Were you actually able to alternately make it work and fail by using
the SAVE from the menu bar? This seems really crazy.!!!
ken
"Dave Peterson" <petersod...verizonXSPAM.net> wrote in message
news:439069B0.859DCD6F...verizonXSPAM.net...
> It was enough to make it work ok for me.
> Maybe adding doEvents would help?
> Ken Soenen wrote:
>> Dave,
>> Tried your idea and it still does the same thing.
>> Thanks anyway
>> "Dave Peterson" <petersod...verizonXSPAM.net> wrote in message
>> news:438F83A5.FD7E6F87...verizonXSPAM.net...
>> > Maybe just redrawing the userform would help:
>> >
>> >
>> > Option Explicit
>> > Private Sub CommandButton1_Click()
>> > me.ListBox2.ZOrder 0
>> > Me.Repaint
>> > End Sub
>> > Private Sub CommandButton2_Click()
>> > me.ListBox2.ZOrder 1
>> > Me.Repaint
>> > End Sub
>> >
>> > Ken Soenen wrote:
>> >>
>> >> Can anybody explain what's going on here ?
>> >>
>> >> Put two listboxes and two commandbuttons on a form and
>> >> partially overlap the two listboxes. The code below should
>> >> alternately bring to the front and then to the rear Listbox2.
>> >>
>> >> Private Sub CommandButton1_Click()
>> >> ListBox2.ZOrder (0)
>> >> End Sub
>> >>
>> >> Private Sub CommandButton2_Click()
>> >> ListBox2.ZOrder (1)
>> >> End Sub
>> >>
>> >> Here is what I'm seeing:
>> >>
>> >> 1. Run the form and it works fine. (or it may not work)
>> >> 2. close the form
>> >> 3. add a blank(if necessary) to the code and do a SAVE
>> >> 4. run the form again and now it DOES NOT Work.
>> >> 5. you can keep doing this and it alternates from WORKING to
>> >> NOT WORKING every time you do a SAVE.
>> >>
>> >> I'm using Excel 2003. WORD does the same thing.
>> >
>> > --
>> >
>> > Dave Peterson
> --
> Dave Peterson

ken | Thu, 22 May 2008 04:54:00 GMT |

I didn't use the save at all. I added me.repaint and it worked fine.

Ken Soenen wrote:
> Dave,
> Were you actually able to alternately make it work and fail by using
> the SAVE from the menu bar? This seems really crazy.!!!
> ken
> "Dave Peterson" <petersod...verizonXSPAM.net> wrote in message
> news:439069B0.859DCD6F...verizonXSPAM.net...
> > It was enough to make it work ok for me.
> >
> > Maybe adding doEvents would help?
> >
> > Ken Soenen wrote:
> >>
> >> Dave,
> >> Tried your idea and it still does the same thing.
> >> Thanks anyway
> >>
> >> "Dave Peterson" <petersod...verizonXSPAM.net> wrote in message
> >> news:438F83A5.FD7E6F87...verizonXSPAM.net...
> >> > Maybe just redrawing the userform would help:
> >> >
> >> >
> >> > Option Explicit
> >> > Private Sub CommandButton1_Click()
> >> > me.ListBox2.ZOrder 0
> >> > Me.Repaint
> >> > End Sub
> >> > Private Sub CommandButton2_Click()
> >> > me.ListBox2.ZOrder 1
> >> > Me.Repaint
> >> > End Sub
> >> >
> >> > Ken Soenen wrote:
> >> >>
> >> >> Can anybody explain what's going on here ?
> >> >>
> >> >> Put two listboxes and two commandbuttons on a form and
> >> >> partially overlap the two listboxes. The code below should
> >> >> alternately bring to the front and then to the rear Listbox2.
> >> >>
> >> >> Private Sub CommandButton1_Click()
> >> >> ListBox2.ZOrder (0)
> >> >> End Sub
> >> >>
> >> >> Private Sub CommandButton2_Click()
> >> >> ListBox2.ZOrder (1)
> >> >> End Sub
> >> >>
> >> >> Here is what I'm seeing:
> >> >>
> >> >> 1. Run the form and it works fine. (or it may not work)
> >> >> 2. close the form
> >> >> 3. add a blank(if necessary) to the code and do a SAVE
> >> >> 4. run the form again and now it DOES NOT Work.
> >> >> 5. you can keep doing this and it alternates from WORKING to
> >> >> NOT WORKING every time you do a SAVE.
> >> >>
> >> >> I'm using Excel 2003. WORD does the same thing.
> >> >
> >> > --
> >> >
> >> > Dave Peterson
> >
> > --
> >
> > Dave Peterson
--

Dave Peterson

dave | Thu, 22 May 2008 04:55:00 GMT |

Microsoft Excel Related Links

Microsoft Excel Hot Answers

Z-Score
Is there a function in Excel to calculate Z-score? Is this the same as Z-Test?...
ZOrder of two forms
Here's the scenario: I have two forms to display on the screen: Form1 and Form2. The Form2 is displayed after the user clicks a button on Form1 (which is already displayed). Form2 is automatically displayed in front of Form1. Both forms are loaded modeless (you can't load a second form...
ZOrder of two forms
Here's the scenario:I have two forms to display on the screen: Form1 and Form2. The Form2 isdisplayed after the user clicks a button on Form1 (which is alreadydisplayed). Form2 is automatically displayed in front of Form1. Both formsare loaded modeless (you can't load a second form if th...
Zorder doing strange things
Can anybody explain what's going on here ? Put two listboxes and two commandbuttons on a form and partially overlap the two listboxes. The code below should alternately bring to the front and then to the rear Listbox2. Private Sub CommandButton1_Click() ListBox2.ZOrder (0) End Sub Private S...
Zorder doing strange things
Can anybody explain what's going on here ?Put two listboxes and two commandbuttons on a form andpartially overlap the two listboxes. The code below shouldalternately bring to the front and then to the rear Listbox2.Private Sub CommandButton1_Click()ListBox2.ZOrder (0)End SubPrivate Sub Comma...

Microsoft Excel New questions

Zoom to 400%
Whenever a user opens an Excel Spreadsheet the sheet automatically zooms to 400%. This happens when the user is connected to a projector or second monitor. I have updated the display driver and downloaded all MS Office Updates. Nothing else seems to be having issues except Excel and Word. The on...
Zoloft 2006
<a href="http://www.uta.edu/HyperNews/get/delgua/67/83.html">Cheap Tramadol</a> Cheap Tramadol 'Cheap Tramadol' (http://www.uta.edu/HyperNews/get/delgua/67/83.html) <a href="http://www.uta.edu/HyperNews/get/delgua/67/84.html">Buy Tramadol</a> Buy Tramadol 'Buy Tr...
Zero Before Number
Hi,Does anyone know how to get Excel to allow you to have a zero before a number in a cell (i.e. 0198945)?I am trying to enter specific order numbers, but it automatically removes the zero and I couldn't find a way to turn that off.Thanks for any help,Alex...
YSL? Problem tab names changing
Hello All, This is my first post, so here goes. I have simple links between tabs in my spreadsheet but the reporting software I use is called YSL, and it changes the name of tabs when it is run. So if any simple links I make (ex. ='t-prop'!e1) changes to ='prop'!e1 and I get...
You're Crazy
This is a multi-part message in MIME format. --=_NextPart_000_0034_01C6B092.D5C10B70 Content-Type: text/plain; charset="Windows-1252" Content-Transfer-Encoding: quoted-printable What time? -- --=_NextPart_000_0034_01C6B092.D5C10B70 Content-Type: text/html; charset="Windows-1252" Content-Transfe...
You search woman for friend?
If you search girl for pen pal and more, it for you! I'm single girl and i search single man, I'm 33yold. my e-mail: nataliunna@gmail,com If you search woman for pen pal and more write to me and i can send to you my new pics and tell more about myself. I post this message from this for...
You guys are all lovely. Thanks!
Thanks for your enrichment to the Internet. I learned a lot about MS Excel from you guys. Thanks....
yet another date format problem
hello, I'm using Excel 2004 in Mac OS X Tiger. I use dates in dd/mm/yy format, and that's how it is set in my international preferences panel (in Tiger) and how i formated the Excel column. but then i type, say, 4/11/07 (to enter the date 4th nov 07) and excel converts it to 11/04/07....
YAPTQ: Mixed data types in custom groups (Excel 2003)
Hello, I'm trying to get the following accomplished in Excel 2003: I have a column in a table that keeps track of how late a form was turned in. It can have an integer (for the number of days it was late) or one of several text strings ("On time," "Cannot determine," "Outside report dates."...
YAPTQ: Mixed data types in custom groups (Excel 2003)
Hello, I'm trying to get the following accomplished in Excel 2003: I have a column in a table that keeps track of how late a form was turned in. It can have an integer (for the number of days it was late) or one of several text strings ("On time," "Cannot determine," "Outside report dates."...

Microsoft Excel Related Categories

Microsoft Excel