Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
740to744
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
740to744
740to744
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Position von UF

Position von UF
04.03.2006 22:20:15
UF
Guten Abend,
ich habe mehrere kleine UF, möchte ein links postionieren und eine Rechts Wie ?
gruß Walter

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Position von UF
04.03.2006 22:28:43
UF
Halle Walter.
versuchs hiermit.
Du musst nur noch die daten anpassen wie du sie benötigst.

Private Sub UserForm_Initialize()
'Me.Width = 10   ' Formularbreite festlegen.
'Me.Height = 10   ' Formularhöhe festlegen.
Me.Left = 100   ' Formular horizontal zentrieren.
'Me.Top = 10   ' Formular vertikal zentrieren
End Sub

Danke o.t.
04.03.2006 22:33:28
Walter
Hallo Chris,
Danke,
mfg Walter
AW: Position von UF
04.03.2006 22:32:10
UF
Hallo
Damit wird die geöffnete Userform mit den gleichen Abmessungen eingestellt, wie das aktive Userform
Deine Frage:
Lösung wie in CommandButton3
Option Explicit

Private Sub CommandButton1_Click()
    UserForm1.Show
End Sub

Private Sub CommandButton2_Click()
    UserForm1.Top = Me.Top
End Sub

Private Sub CommandButton3_Click()
    UserForm1.Left = Me.Left + Me.Width
End Sub

Private Sub CommandButton4_Click()
    UserForm1.Width = Me.Width
End Sub

Private Sub CommandButton5_Click()
    UserForm1.Height = Me.Height
End Sub
Gruss Rainer
Anzeige
Danke o.t. und
05.03.2006 11:43:50
Walter
Guten Morgen Rainer,
Danke für die ausführliche Information,
mfg walter

Links zu Excel-Dialogen

CommandButton UserForm

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige