Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 08:41:49
VBA: Probleme mit pdftk zum Zusammenfügen
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
984to988
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
984to988
984to988
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ungebundene Userform immer im vordergrund

Ungebundene Userform immer im vordergrund
18.06.2008 00:16:17
stefan
Hallo
ich starte eine Userform bei der ich im Eigenschaftsfenster ShowModal auf False gestellt habe.
Excel minimier ich mit mit "Application.WindowState = xlMinimized" oder blende es mit "Application.Visible=False"
ganz aus.
Das funktioniert soweit, aber das Problem ist nun ,das die Userform von anderen Programmen(zb.IE oder SAP) verdeckt werden kann.Was muß ich eingeben damit die/das UserForm immer im Vordergrund bleibt?
Vielen dank schon mal im vorraus.
mfg stefan

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

Betreff
Datum
Anwender
Anzeige
AW: Ungebundene Userform immer im vordergrund
18.06.2008 00:33:27
Johannes
Hallo Stefan,
Quelle: Nepumuk @office-loesung.de ... und fuer gut befunden. :-) 

Option Explicit
Private Declare Function FindWindow Lib "User32" Alias "FindWindowA" ( _
ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long
Private Declare Function SetWindowPos Lib "User32" ( _
ByVal hwnd As Long, _
ByVal hWndInsertAfter As Long, _
ByVal X As Long, _
ByVal Y As Long, _
ByVal cx As Long, _
ByVal cy As Long, _
ByVal wFlags As Long) As Long
Private Enum SWP_Flags
SWP_NOSIZE = &H1
SWP_NOMOVE = &H2
SWP_NOACTIVATE = &H10
SWP_SHOWWINDOW = &H40
End Enum
Private Const HWND_TOPMOST = -1
Private Const HWND_NOTOPMOST = -2
Private Sub UserForm_Activate()
Call prcSetForeground
End Sub
Private Sub prcSetForeground()
SetWindowPos GetHandle, HWND_TOPMOST, 0&, 0&, 0&, 0&, _
SWP_NOSIZE Or SWP_NOMOVE Or SWP_NOACTIVATE Or SWP_SHOWWINDOW
End Sub
Private Sub prcSetBackground()
SetWindowPos GetHandle, HWND_NOTOPMOST, 0&, 0&, 0&, 0&, _
SWP_NOSIZE Or SWP_NOMOVE Or SWP_NOACTIVATE Or SWP_SHOWWINDOW
End Sub
Private Function GetHandle() As Long
Select Case Val(Application.Version)
Case 8 'Office 97
GetHandle = FindWindow("ThunderXFrame", Me.Caption)
Case Else 'ab Office 2000
GetHandle = FindWindow("ThunderDFrame", Me.Caption)
End Select
End Function


Anzeige
AW: Ungebundene Userform immer im vordergrund
18.06.2008 00:54:10
stefan
Hallo Johannes
danke für deine Mühe,aber es klappt nicht...wo muß ich den code reinschreiben /kopieren arbeitsblatt?tabellenblatt?modul? Ich hab leider kaum ahnung von VBA.
Danke im vorraus
mfg stefan

AW: Genial Johannes
18.06.2008 01:35:11
stefan
hab es hinbekommen,doppelklick auf die userform und dort eingfügt....DANKE!!!...
nur verstehe ich nicht warum mir der projekt-explorer diese ebene nicht anzeigt,klick ich auf tabellenblatt oder modul etc. bekomm ich die codes angezeigt... klick ich auf userform, seh ich erstmal nur diese, und erst nach einem doppelklick darauf seh ich den code.muß man da irgentwas einstellen das einem der code im projekt-explorer gleich angezeigt wird?
mfg stefan

Anzeige
AW: Genial Johannes
18.06.2008 01:47:08
Johannes
Hi Stefan,
na ja - das ist das normale Verhalten des VBA Editors. Dir wird zuerst der Form Designer (also die GUI Ansicht der UserForm) serviert. Gibt doch genug Moeglichkeiten um in die Codeansicht zu wechseln. F7, Doppelklick auf die UserForm, Rechtsklick UserForm - Code Anzeigen, Ansicht - Code Anzeigen ... etc.
Aber schoen, dass es funktioniert. ;-)
Gruesse,
Johannes

AW:VBA kann macht ja richtig Spaß machen
18.06.2008 02:23:00
stefan
wenn man solche Profis wie dich, Johannes ,fragen kann.
werde mir morgen den code nochmal genauer anschauen und versuchen zu verstehen/lernen warum/wieso er funktioniert.
wünsch dir noch eine gute nacht.
mfg stefan
Anzeige

269 Forumthreads zu ähnlichen Themen

Form immer im Vordergrund, aber nicht blockieren
Stefan

Hallo zusammen
Ich habe folgendes Problem:
Ich möchte in meiner Excel Arbeitsmappe ein Form permanent im Vordergrund anzeigen, es soll aber möglich sein, während derselben Zeit direkt in die Zellen des Arbeitsblattes zu schreiben ohne das Formular zu schliessen oder dieses auszublenden....
22.12.2008 21:34:00
Thread-ID: 1034877
4 Beiträge
Anzeige
Userform in den Vordergrund holen nach Ablauf Time | Herbers Excel-Forum
chris b.
Hallo VBA Experten,hier noch einmal ein beitrag vom letzten mal.Leider konnt mir da nicht geholfen werden.Würde mich sehr üeber Hilfe freuen.
P.s der Code oder ein kleiner Teil in meiner Exceldatei ist Copyright bei Hajo_ZI glaube ich.
Deshalb lob an den verfasser.Würde mich sehr über Hilfe...
21.01.2010 22:45:14
Thread-ID: 1131946
2 Beiträge
Immer im Vordergrund
Christian

Hallo an alle!Wie kann ich ein Excel-Diagramm immer im Vordergrund stellen? So soll z.B. das Diagramm auch dann in einer Ecke zu sehen sein, wenn ich in Word oder auch NON-Microsoft-Anwendungen arbeite. Ist das möglich?Vielen Dank im voraus für Eure Lösungsvorschläge!Christian
26.07.2002 09:37:45
Thread-ID: 140950
2 Beiträge
Anzeige
Userform immer im Vordergrund halten.
Daniel
Hallo
ich arbeite mit Excel 2013 und habe folgendes Problem mit einer Userform:
die Userform (nicht Modal) soll eigentlich zur Bearbeitung von anderen geöffneten Excelmappen dienen.
Die Mappe der Userform wird nicht benötigt und sollte unsichtbar bleiben.
Das Problem ist, wenn ich d...
13.09.2016 11:37:10
Thread-ID: 1514076
11 Beiträge
Bitte Warten Fenster: Form im Vordergrund.
Jimmy

Hi.
Ich hoffe hier kann mir jemand helfen!
Ich habe ein sehr aufwendiges Programm in Visual Basic auf Excel basiert geschrieben. Der Ablauf dieses Programmes, dauert ca. 3-4 Minuten. In dieser Zeit, möchte ich dass ein Fenster angezeigt wird, auf dem ein Text steht. Beispielsweise "Bitte...
20.09.2002 14:45:55
Thread-ID: 162213
2 Beiträge
UserForm immer im Vordergrund halten?
Tim

Hallo Zusammen,
Ich würde gerne eine Webformular öffnen in dem der Nutzer Daten eingeben muss.
Als Spickzettel möchte ich gerne ein UserForm mit 5x5 cm in den Vordergrund bringen.
Also im absoluten Vordergrund über den Browser.
Private Sub UserForm_Activate() Set wshshell = Crea...
28.06.2018 20:37:54
Thread-ID: 1631146
3 Beiträge
Msg-Box immer im Vordergrund
Marcus

Hallo,bei einem Ereignis in meinem Excelsheet lasse ich eine normale MsgBox ausgeben.
sub fehler()
z = MsgBox("Fehler!")
end subEs kommt aber häufig vor,dass ich in anderen Programmen arbeite und dann die msgbox nicht sehe. Ich sehe nur, dass Excel blinkt und sobald ich dann unten in d...
03.10.2002 14:14:32
Thread-ID: 165909
3 Beiträge
immer im vordergrund
Helmut

hallo forum,
ist es vielleicht möglich, eine EXCEL- Tabelle immer in den Vordergrund zu stellen?
wenn ja, wie denn nur?gruß
Helmut
25.11.2002 09:23:43
Thread-ID: 185139
2 Beiträge
Anzeige

Links zu Excel-Dialogen

Frame UserForm

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
2
1
1
3
10
1
2
2
1
1
8
5
1
2
2
7
1
2
2
9
1
3
3
3