Excel 97 Dimensions de l'écran

[Guy]

Salut à toutes et à tous

Dans le but d'affiché une feuille à la dimension (hauteur) de l'écran de l'utilisateur, je aimerais savoir comment connaître via excel 97 la résolution de l'écran.
Je sais positionner cette feuille avec les fonctions suivantes :

Application.top = 10
Application.left = 10

et la dimensionner avec

Application.heigth = 200
Application.with = 250

Merci de votre aide

Guy

 

[Jean-Marie]

Bonsoir Guy

ScreenSize, Renvoie ou définit la taille d'écran minimale optimale (largeur par hauteur, exprimée en pixels) à utiliser lors de l'affichage du document enregistré dans un navigateur Web. Il peut s'agir de n'importe quelle constante MsoScreenSize disponible. Pour obtenir une liste des constantes MsoScreenSize disponibles, consultez l'Explorateur d'objets de Visual Basic Editor. La constante par défaut est msoScreenSize800x600. Type de données Long en lecture-écriture.

Fait une recherche dans l'explorateur d'objets sur msoScreenSize pour connaître les tailles retournées par VBA.

@+Jean-Marie

 

[Guy]

Salut Jean-Marie.

Merci pour ta réponse, mais je ne comprend pas bien les thermes employés.
De plus je devrais me donner la peine d'utiliser le moteur de recherche avant de poser une question.
En effet, j'ai trouver une solution avec les API.

Declare Function GetSystemMetrics Lib "user32.dll" (ByVal nIndex As Long) As Long
Sub Res()
Dim iResX As Integer
Dim iResY As Integer

iResX = GetSystemMetrics(0)
iResY = GetSystemMetrics(1)

MsgBox "La résolution est : " & iResX & " x " & iResY

End Sub

Je l'ai testéé et c'est ok.

Merci tout de même.

A+