Excel Centeer het Applicatoin window

Status
Niet open voor verdere reacties.
hausi

hausi

Gebruiker
Lid geworden
17 jan 2010
Berichten
84
Hallo allemaal,

Ik heb me helemaal suf gezocht maar kan niet vinden wat ik zoek.

Ik heb een Excel werkboek dat, als het wordt geopend, vaste afmetingen krijgt, maar ik wil ook dat het gecentreerd wordt op het scherm.
Iemand enig idee hoe je dat voor elkaar krijgt?

Alvast bedankt
 
Nee, dat maakt het venster full screen, en dat is niet de bedoeling. Toch bedankt voor het meedenken.
 
Code: 
Sub M_snb()
   with Application
      .WindowState =-4137
      sn=Array(.Height,.Width)

      .WindowState = -4143
      .Top = sn(0) / 10
      .Height = sn(0) * 4 / 5
      .Width = sn(1) * 4/5
      .Left = sn(1) / 10
   end with
End Sub
 
@snb
Dat werkt op mijn 1920x1080 scherm, heel fijn :)
Wat als het scherm een hogere resolutie heeft?

voor zover erg bedankt voor je oplossing
 
Test het en je zult ontdekken dat het daar evengoed werkt.
In de onderstaande code kun je aangeven welk percentage van het scherm je wil gebruiken.

Code: 
Sub M_snb()
   n = 80           ' percentage van volledig scherm
   
   With Application
      .WindowState = -4137
      sn = Array(.Height, .Width)

      .WindowState = -4143
      .Height = sn(0) * n / 100
      .Width = sn(1) * n / 100
      n = ((100 - n) / 2)
      .Top = sn(0) * n / 100
      .Left = sn(1) * n / 100
   End With
End Sub
 
Laatst bewerkt:
@snb
Top, werkt geweldig, heel erg bedankt voor je hulp
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan