Dim ResoX, ResoY As Integer ResoX = Screen.Width / Screen.TwipsPerPixelX ResoY = Screen.Height / Screen.TwipsPerPixelY MsgBox ("Résolution : " & ResoX & "/" & ResoY)
Je pense qu'il y a une petite erreur dans la définition des variables :Dim ResoX As Integer, ResoY As IntegerMerci pour ce code
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte