Redimensionner des contrôles

Ce composant sert à redimensionner automatiquement les composants contenus dans une feuille quand la fenêtre est agrandie par l'utilisateur.



Par contre si la fenêtre est diminuée, les composants ne sont plus redimensionnés, et des scrollbars sont affichés, permettant de voir les parties masquées de la fenêtre.



Pour l'utilisation :

• Poser le composant pour couvrir toute votre feuille.


• Mettez vos composants dedans.


• Ajoutez ce code à votre form.

Private Sub Form_Load()
AutoScroll1.AutoScroll True
End Sub


Private Sub Form_Resize()
On Error Resume Next 'si la taille de la fenetre descend sous la taille des scrollsbars

AutoScroll1.Move 0, 0, Me.ScaleWidth, Me.ScaleHeight
End Sub