En rapport à cette discussion Redimensionnement automatique
Comment limiter la taille de la form?:D:D
Version imprimable
En rapport à cette discussion Redimensionnement automatique
Comment limiter la taille de la form?:D:D
Salut
Code:
1
2
3
4
5
6
7
8
9
10 Option Explicit Private Const MinimumHauteur = 3600 Private Const MinimumLargeur = 4800 Private Sub Form_Resize() If Me.WindowState <> vbMinimized Then If Me.Height < MinimumHauteur Then Me.Height = MinimumHauteur If Me.Width < MinimumLargeur Then Me.Width = MinimumLargeur End If End Sub