Barre de défillement dans un userformRésolu

Question

Bonjour à tous,

Je cherche à insérer dans un userform une barre de défillement vertical car dans le userform, il y a beaucoup de textbox et à cause de cela, le userform et trop grand pour être visible au complet à l'écran.

J'ai remarqué qu'il y à l'option fmScrollBarsVertical. La barre est présente mais comment la faire fonctionner?

mortalino · Accepted Answer

Salut Avyrex, voici un exemple de code : Private Sub UserForm_Initialize() Me.ScrollHeight = Me.Width * 2 ' ça c'est pour le cas ou tu n'affiche que la moitié de la form ' sinon, tu peux faire ça : Me.ScrollHeight = NomDeTonControleLePlusBas.Top + NomDeTonControleLePlusBas.Height + 20 End Sub ~ Mortalino ~ Colorisation automatique @++

--Mortalino-- Le mystérieux chevalier, "Provençal, le Gaulois" /DIV>

avyrex1926 · Answer

Merci encore mortalino

Ça fonctionne pour:
Private Sub UserForm_Initialize()
    Me.ScrollHeight = Me.Width * 2

End Sub

Merci

mortalino · Answer

De rien,

sache que si tu connais la hauteur à afficher, tu peux lui indiquer aussi :

Me.ScrollHeight = 1000

@++ 

<hr width="100%" size="2" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
/DIV>

Barre de défillement dans un userform

3 réponses

Votre réponse

Discussions similaires