Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 09:04:14
Erfahrung Umstieg in Sharpoint
24.04.2024 08:01:34
Textbox Inhalt prüfen und Code abbrechen
24.04.2024 06:38:45
Kumulierte Daten für Intervalllaufeinheiten
24.04.2024 04:37:43
Mit Word erstellte PDF als Anhang an E-Mail anhängen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1432to1436
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
1432to1436
1432to1436
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Userform-Nutzung zur Navigation?

Userform-Nutzung zur Navigation?
03.07.2015 20:15:23
Ines
Hallo,
ich habe eine umfangreiche Tabelle für verschiedene Nutzer. Gibt es eine Möglichkeit, eine Userform zur Auswahl nutzen?
Ich kann mit autoopen die userform starten und per Klickauswahl wird das gewählte Arbeitsblatt angezeigt, ist aber nicht aktiv und zu bearbeiten, weil man in der userform steckt bis man sie schließt.
Ist ein Wechsel in das Tabellenblatt und per Klick auf einen Button zurück in die Userform möglich?
Zur Erklärung: Die Userform "Auswahl" soll an der rechten Bildschirmseite (gesamte Höhe) dauerhaft geöffnet sein: Button 1 - Tabellenblatt 1, Button 2 - Tabellenblatt 2 usw.
Bei Klick Wechsel in das AB + Bearbeitung und durch Klick auf einen Auswahlbotton Rückkehr zur Userform.
Das hört sich eigentlich machbar an, aber ich habe keine Idee, wie. Kann mir bitte jemand helfen?
Vielen Dank im Voraus Ines

13
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Userform-Nutzung zur Navigation?
03.07.2015 20:27:11
Matthias
Hallo
Setz in den Eigenschaften des UForm
Showmodal auf False
Gruß Matthias

AW: Userform-Nutzung zur Navigation?
03.07.2015 20:57:46
Matthias
Hallo
Ist ein Wechsel in das Tabellenblatt und per Klick auf einen Button zurück in die Userform möglich?
Ja
https://www.herber.de/bbs/user/98628.xlsm
Gruß Matthias

vergiss es hab Dich falsch verstanden, sorry owT
03.07.2015 20:34:58
Matthias

AW: Userform-Nutzung zur Navigation?
03.07.2015 20:39:45
Ines
Passiert ;)

AW: Userform-Nutzung zur Navigation?
03.07.2015 20:43:46
Taro
Hallo,
da wo du die userform startest steht ja bestimmt so etwas wie Userform1.show oder?
Dann ergänzt du das:
UserForm1.Show vbModeless
Dann sollte die userform immer vorn sein und du kannst in der Tabelle arbeiten.

Anzeige
AW: Userform-Nutzung zur Navigation?
03.07.2015 21:41:45
Ines
Hallo Taro,
funktioniert super. Es ist so einfach, wenn man weiß, wie ;)
Was muss ich ändern, damit die Form nicht links oben sondern rechts oben verankert wird?
Danke für Deine Zeit.

AW: Userform-Nutzung zur Navigation?
03.07.2015 22:03:28
Raphael
Hallo Ines,
ich glaube direkt geht das nicht. Du musst meines Wissens (das auch lückenhaft ist) einen umweg gehen.
Folgende Funktion in einem eigenen MOdul speichern 

Private Const SM_CXSCREEN = 0
Private Declare Function GetSystemMetrics Lib "user32" _
(ByVal nIndex As Long) As Long
Public Function ScreenBreite()
ScreenBreite = GetSystemMetrics(SM_CXSCREEN)
Debug.Print ScreenBreite
End Function
die Userform wie folgt initialisieren 

Private Sub UserForm_Initialize()
With UserForm1
' 0: Manuell; 1: Fenstermitte 2: Bildschirmmitte 3: Windows-Standard
.StartUpPosition = 0 'links oben
'Kleine Umrechnung, 1 Pixel = 0.75 points (Angaben in Excel in points)
.Top = 0
.Left = ScreenBreite * 0.75 - Me.Width
End With
End Sub
Gruess
Raphael

Anzeige
AW: Userform-Nutzung zur Navigation?
03.07.2015 22:03:28
Taro
In der UserForm entweder die Prozedur anlegen oder wenn du sie schon hast den Inhalt rein kopieren.
Sub UserForm_Initialize()
me.Top=ActiveWindow.Top+25
me.Left=ActiveWindow.Left + ActiveWindow.Width - me.Width - 10
End Sub
Setzt aber voraus das deine Exceldatei maximiert angezeigt wird.
Um sicherzustellen das das getan wird einfach vorn dem "me.Top ...."
ActiveWindow.WindowState = xlMaximized
einfügen.
Das ist erstmal die einfachste Variante. Es gibt noch einen Weg dazu müsste man aber die Bildschirmauflösung abfragen und das Formular dementsprechend positionieren, das ist relativ aufwendig. Wäre aber unabhängig von der Excel-Datei.

Anzeige
Cool, absolut gleichzeitig geantwortet owT
03.07.2015 22:04:36
Raphael

AW: Cool, absolut gleichzeitig geantwortet owT
04.07.2015 00:01:41
Ines
Dankeschön. In der Userform selbst ist Prozedur anlegen nicht verfügbar. Wenn ich den Code zum autoopen kopiere, kommt die Fehlermeldung unzulässige Verwendung von me. Die einfachere Variante würde mir besser gefallen ;)

AW: Cool, absolut gleichzeitig geantwortet owT
04.07.2015 00:23:17
Ines
Hallo Raphael,
es funktioniert mit form1 (meine userform) statt me - vielen Dank für Deine Hilfe.

AW: Cool, absolut gleichzeitig geantwortet owT
04.07.2015 01:23:26
Matthias
Hallo
Also war meine 1.Antwort:
Setz in den Eigenschaften des UForm
Showmodal auf False
doch richtig
Gruß Matthias

Bitte ot
04.07.2015 23:05:07
Raphael

Links zu Excel-Dialogen

UserForm

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige