resize label on userform based on filled text

[Ali M]

Hi
is there any procedure to put in userform module to resize lable automatically based and how size of text into label instead of set size manually every time like fit ?
the lable should expand and shrink based on size of the text inside it
thanks

 

[Jimmypop]

Good day

Try the below. I tried it on a Userform Initialize event.

Private Sub UserForm_Initialize()
    Label1.AutoSize = True
    Label1.WordWrap = False
End Sub

 

[Ali M]

thanks . unfortunately doesn't work just move down new line.

 

[Jimmypop]

thanks . unfortunately doesn't work just move down new line.

Could you provide an example of what you are trying to achieve and why it does not work?

 

[Ali M]

orginal

should be

 

[Ali M]

no answer so far I posted in another forum
resize label on userform based on filled text

 

[Jimmypop]

no answer so far I posted in another forum
resize label on userform based on filled text

Hi Ali M

Where are you putting the code I gave? Please let us know how the text in the label is generated?

    Label1.AutoSize = True
    Label1.WordWrap = False

Before Code:

Code Used:

After Code:

 

[Ali M]

thanks seem I mistook the place.
now it works . thanks very much

 

[Jimmypop]

Your welcome and thanks for the feedback... Where did you put the code originally?

 

[RoryA]

Why not just set the properties at design time?