Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 18:41:19
vba Zeilen duplizieren ab aktiver Zeile bis letzte Zeile
25.04.2024 18:22:55
Zeilen mit bestimmtem Datum in andere Mappe übertragen
25.04.2024 18:14:45
VBA - Excell - Kopie und "Diebstahl" Schützen
25.04.2024 17:49:39
Bedingte Formatierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
692to696
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
692to696
692to696
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Userform an Bildrand verschieben

Userform an Bildrand verschieben
15.11.2005 00:29:57
Stefan
Hallo,
ich möchte eine Userform genau an den linken
bzw. rechten Bildschirmrand platzieren.
Gibt es dafür eine (einfache) Lösung?
Danke schonmal.
Gruss
Stefan

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Userform an Bildrand verschieben
15.11.2005 00:41:56
Leo
Hi,
in den Eigenschaften: StartupPosition Windows Standard einstellen.
mfg Leo
AW: Userform an Bildrand verschieben
15.11.2005 00:58:00
Luc:-?
Hallo Stefan,
Habe dir noch eine Erläuterung im alten Thread nachgereicht. Zu diesem hier habe ich noch einen kleinen Hinweis:
Mit einigem Aufwand ist es mittels VBA möglich, eine Userform auf wechselnde Zellbereiche oder Zeichenobjekte zu fixieren (auch plattformunabhängig).
Kannst das ja mal versuchen.
Gruß Luc :-?
AW: Userform an Bildrand verschieben
15.11.2005 14:38:26
Stefan
Danke für die schnellen Antworten.
Ich möchte die Userform allerdings zur Laufzeit
ganz nach links oder rechts verschieben und zwar
durch einen Klick auf eine Schaltfläche.
Ganz links ist klar: Userform1.Left = 0
Aber ganz rechts? Der rechte Rand der Userform
soll am rechten Bildschirmrand "kleben"...
Gruss
Stefan
Anzeige
AW: Userform an Bildrand verschieben
15.11.2005 18:10:06
Nepumuk
Hallo Stefan,
ganz einfach:
' **********************************************************************
' Modul: UserForm2 Typ: Userform
' **********************************************************************

Option Explicit

Private Declare Function GetSystemMetrics Lib "user32" ( _
    ByVal nIndex As Long) As Long

Private Const SM_CXSCREEN = 0

Private Sub CommandButton1_Click()
    Me.Left = GetSystemMetrics(SM_CXSCREEN) * 0.75 - Me.Width
End Sub

Gruß
Nepumuk
Anzeige
AW: Userform an Bildrand verschieben
15.11.2005 18:59:05
Stefan
Danke!!! Funktioniert.
Hatte exakt dasselbe, bloss ohne die 0.75.
Ist das eine Umrechnungskonstante?
Stefan
AW: Userform an Bildrand verschieben
15.11.2005 23:25:14
Nepumuk
Hallo Stefan,
Pixel * 0,75 = Point
Pixel / 72 = Inch
Pixel * 3,5277777777777... = mm
Gruß
Nepumuk

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