Placing A Label Over A Userform Control

[Ark68]

I have a label (label8) that I am trying to position at a certain point of my userform.

        With .Label8
            .Top = 36
            .Left = 92
        End With

The issue I am having, is this move puts the label behind a locked listbox control. This is the intended location, but I'd like to put the label on top of this control.

Can it be done?

 

[jproffer]

Select the label, Top menu....Format...Order(all the way at the bottom)...Bring to front.

By the way, if you're just trying to "hide" the textbox, you can just make it invisible ...or:

TextBox1.Visible = False 'or True

and then make it visible whenever you're ready...much easier....IF that's what you're trying to accomplish ...not that I'm speculating lol.

 

[Ark68]

Thanks jproffer ...
No ... I'm not wanting to hide the underlying listbox. It still needs to be visible to some extend, although inaccessible.
Can the order suggestion you mention be coded?

 

[Domenic]

Try...

Me.Label1.ZOrder 0 'top of z-order

If it doesn't work, it's likely due to a bug described here...

http://excelmatters.com/tag/vba/

Hope this helps!

 

[jproffer]

What do you mean inaccessible? Labels are not clickable anyway.

Good code Dom...never heard of the ZOrder property...I'll have to keep that in my pocket

 

[My Aswer Is This]

When I try this the Label is not visible. After using this script on Userform Open

Private Sub UserForm_Initialize()
Me.Label1.ZOrder 0

Now if I put a Textbox over top of the label the label is still visible.
But this does not work when a ListBox is put over a label.
This is when using UserForm controls.

 

[Ark68]

Thanks all for your support.

jproffer ... you asked and stated "What do you mean inaccessible? Labels are not clickable anyway."
It's not the label that's "inaccessible". Its the underlying listbox that I'm trying to superimpose the label over which is inaccessible. I know labels aren't clickable. This listboxe is locked, making the control basically nonfunctional.

Domenic ... I'm afraid that the bug may be biting again. I tried, but no luck unless I've coded that wrong.

This asthetic task I'm trying to accomplish would be so much more simple if only labels (and other controls) had a vertical alignment property. I would simply make a label with the same physical qualities (size, etc) as the listbox control, hide the listbox and move the label to where the listbox is (hidden). Looks like the original listbox, but isn't. It's a simple label with simple text centred in it. The hurdle is, I can only get it centred horizontally.

It's very early, so maybe I'm missing something simple and obvious.

This is what I'm trying to accomplish...

 

[Ark68]

I have been experimenting with a concept mentioned above ... about hiding thelistbox and replacing it with a mimicking label. (knowing it's not exactly what I am wanting)

        With .uf1_listbox2
            '.Clear
            .ForeColor = RGB(0, 52, 89)
            .ColumnCount = 2
            .ColumnWidths = "75;25"
            .List = Range("redundancy_list").Value
            .ListStyle = fmListStyleOption
            .ListStyle = fmListStylePlain
            .MultiSelect = fmMultiSelectSingle
            .Visible = False
        End With
        
        With .Label8
            .Top = 12
            .Left = 78
            .ZOrder 0
        End With

This moves the label to the coordinates but with reference to the userform. The values I have were with reference to the frame within that userform that the label should reside.
What must I add to ensure that the left and top properties are with reference to frame103? Or do I need to determine the top and left values of the label only from within the userform scope?

 

[jproffer]

If the listbox properties are in relation to the frame, then the left of the frame + the left of the listbox in the frame = the left of the label in relation to the userform. Same for the top.

That will get you close. You'll have to "play" it and check it out...sometimes they're not exactly the same.

 

[Ark68]

This experiment failed. I made the listbox invisible and moved the label to the same position that the listbox was in the frame. But I'm guessing that the label is behind the frame. ZOrder didn't work any better in this situation than the previous.