Office: UserForm in Vollbild anzeigen u. ausrichten

Hallo zusammen,

ich bräuchte mal eure Hilfe um meine UserForm in Vollbild anzuzeigen. Möchte auch meine Elemente darin immer in Bildschirm Mitte angezeigt haben. Habe mal ein Bild mit angefügt, wie es aktuell aussieht.

Habe es mit dem unten stehenden Code ausgerichtet, aber wie man auf dem Bild sieht, ist es unter anderem links nicht Bündig. Wäre auch gut wenn sich das Fenster immer an den Monitor anpassen würde und es dann ausrichtet. Die Taskleiste sollte man so sehen können wie es aktuell auch der Fall ist.

Code:

With Suchmaske

        .Height = Application.Height
        .Width = Application.Width

    End With
    
    Suchmaske.Show

Vielen Dank für eure Hilfe :)

 

http://hajo-excel.de/gepackt/fremd/userformgrosze_anpassen2.zip

Du bist im falschen Forum. Bildbearbeitung ist ein anderes.
Bilder lade ich mir nicht runter, da Excel damit nichts anfangen kann.

Hochgeladene Bilder können zwar als solche in Excel importiert werden, sind jedoch bei der Lösung von Problemen nicht sehr hilfreich, da man die eigentlichen Daten nicht ohne große und zeitraubende Umwege direkt in die Tabelle übertragen kann.

Ich baue keine Datei nach, die Zeit hat schon jemand investiert.

Bilder statt Datei | Excel ist sexy!
Eine hochgeladene Arbeitsmappe erhöht die Wahrscheinlichkeit, dass Du eine Lösung für Dein Problem erhältst.

Erstelle folglich bitte eine Demomappe, aus der deine Aufgabenstellung klar erkennbar ist und lade diese Mappe mit einem
MS-Office-Forum - Einzelnen Beitrag anzeigen - Bitte vor Benutzung des Forums lesen... Danke
Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten ändern. Schaue Datei
http://hajo-excel.de/gepackt/fremd/Datei_verschluesseln.zip
Falls Du den Download des Forums nicht benutzen möchtest beachte bitte: von unsicheren Servern file-upload lade ich keine Datei herunter (lt. Einschätzung meines Virenprogramms).

Der Name einer hochgeladenen Mappe wird im Beitrag automatisch angezeigt, sodass es bei Verwendung von aussagekräftigen Namen leichter fällt, sie später im Ablageordner wiederzufinden und sie gedanklich einem bestimmten Thema zuzuordnen. Namen wie Muster*, Test*, Mappe*, Beispiel*, Fehler*, Kalender*, UserForm*, Forum* usw. sind so allgemein, dass eine Zuordnung zu einem Thema unmöglich gemacht wird.
Es sollte ein aussagekräftiger Name sein.

Das ist nur meine Meinung zu dem Thema.

Bitte berücksichtige das Themen die Erledigt sind als Erledigt markiert werden können. Also mache es unten links mit Klick auf den Schalter "als erledigt setzen", falls Problem gelöst.
Der Zustand des Beitrages wird dann in der Übersicht angezeigt und man braucht sich diese Beiträge nicht mehr ansehen.

<img src="http://Hajo-Excel.de/images/grusz1.gif" align="middle" height="40" alt="Grußformel"><a href="Homeseite - Hajo's Excelseiten"><img border="0" src="http://Hajo-Excel.de/images/logo_hajo3.gif" align="middle" height="40" alt="Homepage"></a>

Meine Homepage Homeseite - Hajo's Excelseiten

 

@Hajo_Zi habe mal meine Datei hochgeladen. Verstehe nicht wirklich wieso du auf Bildbearbeitung kommst aber gut.

Ich möchte einfach meine Userform egal bei welcher Bildschirmeinstellung der Monitor oder im PC hinterlegt sind, das diese im Vollbild angezeigt wid. Der Zugriff auf die Taskleiste soll dabei möglich sein. Mich würde dann noch interessieren wie ich meine Textbox sowie die Überschrift und den Button immer in Bildschirm Mitte ausgerichtet bekomme? Aktuell ist es ja so das die Elemente links sind und rechts alles nur grau gefüllt.

 

Gut sehe ich es richtig, mein Beispiel hat Dir nicht gefallen.
Ich schreibe nicht für den Papierkorb und bin darum raus.
Viel Erfolg noch.

Gruß Hajo

 

Habe das ganze mit folgendem Code jetzt ausgerichtet bekommen. Frage ist damit erstmal für mich beantwortet.

Code:

Sub UserForm_Activate()
    'Ausrichtung Fenster
    Me.Height = Application.Height
    Me.Width = Application.Width
    Me.Left = Application.Left
    Me.Top = Application.Top
    
    'Ausrichtung von Frame Bildschirmmittig
    Me.Frame1.Left = (Me.Width / 2) - (Me.Frame1.Width / 2)
    Me.Frame1.Top = (Me.Height / 2) - (Me.Frame1.Height / 2)

End Sub