Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.10.2025 19:34:56
Eine Zelle in 3 Spalten teilen
20.10.2025 19:24:08
Excel Form befüllen
20.10.2025 19:03:51
wenn istleer funktioniert nicht wegen formel
20.10.2025 13:56:55
Wenn Funktion mit Xverweis oder ähnlich
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1176to1180
1176to1180
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Userform Fokus

Forumthread: Userform Fokus

Userform Fokus
Lutz
Hallo,
habe in beiliegefügter Datei eine Userform, mit der ich den Dialog Öffnen anspreche.
Beim Schließen soll die Userform wieder den Fokus erhalten.
Dies funktioniert aber immer erst, wenn ich über die Schaltfläche in der Userform den Dialog das zweite mal gestartet und wieder geschlossen habe.
Wäre schön, wenn mir jemand eine Tipp geben könnte.
https://www.herber.de/bbs/user/71653.xls
M.f.G.
Lutz
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
Der Übeltäter:ActiveSheet.Range("D5").Select
25.09.2010 17:40:16
Matthias
Hallo Lutz
Lass diese Zeile weg
ActiveSheet.Range("D5").Select
'Pfad suchen 
Private Sub CommandButton3_Click()
Workbooks(wkbname).Activate
'On Error Resume Next
ChDrive "C"
ChDir "C:\Temp"
pfad = Application.GetOpenFilename("Alle Microsoft Excel Dateien (*.xl*), *.xl*")
If pfad  False Then
Me.Repaint
Me.TextBox1.Value = pfad
Me.CommandButton1.SetFocus
Else
Me.CommandButton1.SetFocus
End If
'ActiveSheet.Range("D5").Select
End Sub

Anzeige
AW: Der Übeltäter:ActiveSheet.Range("D5").Select
25.09.2010 17:56:47
Lutz
Hallo Matthias,
klappt super, danke.
M.f.G.
Lutz
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige