Herbers Excel-Forum - das Archiv

Userform in 97 in untere rechte Ecke platzieren

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: Userform in 97 in untere rechte Ecke platzieren
von: Wolfgang
Geschrieben am: 28.09.2003 19:24:44
Hallo Leute,

ich möchte gern die Userform bei Aufruf gleich in die rechte untere Ecke, als Basispunkt, "aufrecht stehend" platzieren. Angeblich geht das Verschieben bei 97 nicht, habe ich da trotzdem eine Chance ?

Danke für Eure Tipps.
Wolfgang

Bild

Betrifft: AW: Userform in 97 in untere rechte Ecke platzieren
von: K.Rola
Geschrieben am: 28.09.2003 19:29:30
Hallo,

was geht nicht, das Verschieben eines userforms in Excel 97?
Da hat dich jemand veralbert, das geht natürlich.
Was meinst du mit "aufrecht stehend"?

Gruß K.Rola
Bild

Betrifft: AW: Userform in 97 in untere rechte Ecke platzieren
von: Wolfgang
Geschrieben am: 28.09.2003 19:38:42
Hallo K.Rola,

schoen , dass ich da was nicht weiss, und es doch- hoffentlich- machbar ist.
Die "Kiste" steht nur eben so in der rechten Haelfte des Schirms, durch Handverschiebung.
Ich haette den Platz aber gerne schon so programmiert. Wie gesagt Excel 97 !

Gruss
Wolfgang
Bild

Betrifft: AW: Userform in 97 in untere rechte Ecke platzieren
von: K.Rola
Geschrieben am: 28.09.2003 19:46:53
Hallo,

Nur sinnvoll, wenn Excel maximiert ist.

Option Explicit
Private Sub UserForm_Initialize()
Me.StartUpPosition = 0
Me.Left = Application.Width - Me.Width
Me.Top = Application.Height - Me.Height
End Sub


Gruß K.Rola
Bild

Betrifft: AW: Userform in 97 in untere rechte Ecke platzieren
von: Wolfgang
Geschrieben am: 28.09.2003 19:59:39
Hallo K.Rola,

vielen Dank. Es sieht so einfach aus, was da nicht gehen sollte ;-)
Kennst Du vielleicht auch die Maximierungsabfrage mit evtueller Maximierung(Option Explicit als Befehl,ist das alles ?), falls dies nicht eingestellt ist ?

Und bitte noch eine Frage, der Beitrag 19:19 Spaltenname und Zelladressierungswunsch,
da erhebt sich für mich auch ein niedliches Problemchen.
Klebt da vielleicht eine kleine Hilfe auf Deinen Tasten ?? ;-)

Gruss und nochmals Dank.
Wolfgang
Bild

Betrifft: AW: Userform in 97 in untere rechte Ecke platzieren
von: Wolfgang
Geschrieben am: 28.09.2003 20:15:41
Hallo K.Rola,

bitte entschuldige meine Zerfahrenheit. Ich hatte erst nur die Optionzeile gesehen und auch nicht an dessen Fkt.(Testung) .Ein blöder Bug in meinem Gehirn.

Aber die Abtestung und das Setzen der Maximierung würde mich trotzdem noch interessieren.
Bitte nicht mehr böse sein !!

Gruss
Wolfgang
Bild

Betrifft: AW: Userform in 97 in untere rechte Ecke platzieren
von: K.Rola
Geschrieben am: 28.09.2003 21:46:06
Hallo,

''Das Prinzip, wenn ichs auch anders mache:
''In das Modul von "DieseArbeitsmappe"
Option Explicit
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.WindowState = lngOldState
End Sub

Private Sub Workbook_Open()
lngOldState = Application.WindowState
Application.WindowState = -4137 'xlMaximized
End Sub


''In ein Standardmodul:
Option Explicit
Public lngOldState As Long

Gruß K.Rola
Bild

Betrifft: AW: Userform in 97 in untere rechte Ecke platzieren
von: Wolfgang
Geschrieben am: 28.09.2003 23:34:54
Hallo K.Rola,

auch wenn ich bereits schon 2x vom Stuhl gekippt bin,so muede.
Vielen Dank für die Hilfe !
Wolfgang
 Bild
Excel-Beispiele zum Thema " Userform in 97 in untere rechte Ecke platzieren"
Diagramm in Userform XL-Dateien in UserForm listen
UserForm an Excel-Fenster anpassen Fundstellen in UserForm listen
Module und UserForms austauschen In einer Schleife auf Elemente einer UserForm zugreifen
Werte in eine ComboBox einer UserForm übernehmen Zellinhalt als Label-Aufschrift in UserForm
Alle CheckBoxes einer UserForm ansprechen Wenn kein Eintrag, UserForm nicht schließen