Microsoft Excel

Herbers Excel/VBA-Archiv

Bewerten Sie hier bitte das Excel-Portal

Der kurze Weg zum Ziel: Auftragsprogrammierung

xlFenster zentrieren | Herbers Excel-Forum


Betrifft: xlFenster zentrieren von: Jörg-HH
Geschrieben am: 31.07.2012 20:58:11

Hallo zusammen

wie ist die vba-Vokabel, wenn ein Fenster zentriert erscheinen soll? (also sowohl Top als auch Left in der Mittte)

Gruß Jörg

  

Betrifft: AW: xlFenster zentrieren von: Nepumuk
Geschrieben am: 31.07.2012 21:32:09

Hallo,

welches Fenster?

Gruß
Nepumuk


  

Betrifft: ...das aktive... oT von: Jörg-HH
Geschrieben am: 31.07.2012 21:37:40




  

Betrifft: PS von: Jörg-HH
Geschrieben am: 31.07.2012 21:39:06

...sorry, Nepumuk - unklare Ausdrucksweise: ich meine das Dateifenster - nicht das Anwendungsfenster...


  

Betrifft: AW: PS von: Nepumuk
Geschrieben am: 31.07.2012 23:11:27

Hallo,

immer noch nicht klar. Beschreib am besten mal wie du an diese Fenster kommst.

Gruß
Nepumuk


  

Betrifft: so: von: Jörg-HH
Geschrieben am: 31.07.2012 23:14:08

Sub a0_EingabebereichRufen(ByRef target As Range, ByRef wsConfig As Worksheet, ByRef ws As Worksheet, _
ByRef strSpalte As String, ByRef rngEingabe As Range, ByRef strProdTeil As String)

...

ActiveWindow.WindowState = xlMinimized

ActiveWindow.NewWindow
Application.Goto Worksheets("Formular").Range(wsConfig.Range("BL138").Value), Scroll:=True

ActiveWindow.WindowState = xlNormal
With ActiveWindow
.Top = 10
.Left = 10
...


  

Betrifft: AW: so? von: Nepumuk
Geschrieben am: 31.07.2012 23:58:00

Hallo,

so?

Option Explicit

Private Declare Function IsThemeActive Lib "UxTheme.dll" () As Long

Public Sub Test()
    Dim sngWidth As Single, sngHeight As Single
    With ActiveWindow
        .WindowState = xlMaximized
        sngWidth = .Width
        sngHeight = .Height
        .WindowState = xlNormal
        .Top = sngHeight / 2 - .Height / 2 - IIf(Cbool(IsThemeActive), 11.25, 9)
        .Left = sngWidth / 2 - .Width / 2
    End With
End Sub

Gruß
Nepumuk


  

Betrifft: uff... von: Jörg-HH
Geschrieben am: 01.08.2012 00:25:28

...drüber muß ich erstmal nachdenken. Hätte nicht gedacht, daß das so kompliziert ist, sondern eher einen Kürzel wie xlCenter oder so erwartet.

Danke erstmal, Nepumuk. Melde mich, wenn ich damit nicht klarkomme...

Jörg


 

Beiträge aus den Excel-Beispielen zum Thema "xlFenster zentrieren"

Grafik importieren und in Zelle zentrieren