Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

gelöst Beim starten Access verkleinert zeigen und Formular in den Vordergrund VBA

Mitglied: thomas1972

thomas1972 (Level 1) - Jetzt verbinden

26.11.2013, aktualisiert 09:41 Uhr, 6945 Aufrufe, 4 Kommentare

Hallo,
ich lasse über ein Startformular Access minimiert starten, so dass nur das Formulari m Vordergrund steht.

01.
Option Compare Database
02.

03.
Private Declare Function ShowWindow Lib "user32" _
04.
(ByVal hWnd As Long, ByVal nCmdShow As Long) As Long
05.
 
06.
Private Const SW_MINIMIZE = 6
07.
Private Const SW_MAXIMIZE = 3
08.
Private Const SW_RESTORE = 9
09.
 
10.
Public Function MinimizeAccess()
11.
  ShowWindow Application.hWndAccessApp, SW_MINIMIZE
12.
End Function
13.
 
14.
Public Function MaximizeAccess()
15.
  ShowWindow Application.hWndAccessApp, SW_MAXIMIZE
16.
End Function
17.
 
18.
Public Function RestoreAccess()
19.
  ShowWindow Application.hWndAccessApp, SW_RESTORE
20.
End Function
Aufruf beim starten des Formular

01.
Private Sub Form_Load()
02.
minimizeaccess
03.
end fuction
Problem hierbei, dass das Formular nicht vorne bleibt, sondern Access wie angegeben minimiert gestartet wird,
wie bekomem ich es hin, das dann doch das Startfomular im Vordergrund bleibt, Access aber minimiert startet ( oder verkleinert startet)
Mitglied: SlainteMhath
26.11.2013 um 09:41 Uhr
Moin,

versuch mal die Formulare vor dem Minimieren auf Modal=true und Popup=true zu setzen.

lg,
Slainte
Bitte warten ..
Mitglied: thomas1972
26.11.2013 um 10:06 Uhr
Ich habe foglenden Code eingefügt,
danach bleibt Access hängen

01.
Private Sub Form_Load()
02.
    Set objFrmlogin = New Form_Login
03.
    With objFrmlogin
04.
    .Modal = True
05.
    .Visible = True
06.
    End With
07.

08.
MinimizeAccess
09.

10.
If IsEXERunning("cmd.exe") Then
11.
   Shell "taskkill /f /im cmd.exe"
12.
End If
13.

14.
rpasswort = ""
15.
varuser = ""
16.
varemail = ""
17.

18.
End Sub
das formular heisst login
Bitte warten ..
Mitglied: SlainteMhath
26.11.2013 um 10:12 Uhr
Dein Code macht auch nur bedingt Sinn..
Du erstellst beim Laden des Formulars eine neue Instanz... das kann nicht funktionieren.

Ersetze mal die Zeilen 2-6 durch
01.
me.modal=true
02.
me.popup=true
oder setze die Eigenschaften direkt in der Entwurfsansicht.
Bitte warten ..
Mitglied: thomas1972
26.11.2013 um 10:20 Uhr
Danke schön,

den wald vor lauter Baumen nicht gesehen.
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
Access 2016: Formular richtig umbenennen
gelöst Frage von honeybeeMicrosoft Office1 Kommentar

Hallo, wenn das Formular in Access in der Formularansicht angezeigt wird, ist auf der Registerkarte des Formulares ein anderer ...

Microsoft Office
Kreuztabelle Access + VBA Code
Frage von Dr.CornwallisMicrosoft Office7 Kommentare

Hallo zusammen, ich habe eine Kreuztabelle aus einer Query erzeugt, aus dieser entsteht wiederum ein Bericht, nun habe ich ...

Datenbanken
Syntaxfehler VBA Access 2010
gelöst Frage von Dr.CornwallisDatenbanken6 Kommentare

Liebe Gemeinde, ich habe (schon wieder) einen Fehler im Code und ich komm einfach nicht drauf warum es nicht ...

Microsoft Office

Access 2013 - Übernehmen von Access Formular aus Backupdatei

gelöst Frage von MuseumMLMicrosoft Office8 Kommentare

Ein Formulara ist aus einer aktuellen Datenbank verschwunden. Der Benutzer hat diese wohl aus Versehen gelöscht. Wie kann ich ...

Neue Wissensbeiträge
Humor (lol)
Preisvertipper
Information von Dilbert-MD vor 3 TagenHumor (lol)8 Kommentare

Moin! weil heute Freitag ist, zeige ich Euch den Preisvertipper der Woche: vergesst den Acer Predator 21x, der ist ...

Windows Update
Sicherheitsupdate für SQL Server 2014 SP3
Information von sabines vor 4 TagenWindows Update2 Kommentare

Für den SQL Server 2014 existiert ein Sicherheitsupdate. Laut KB Artikel wird es als CU3 angezeigt: Server 2014 SP3 ...

Backup

Veeam Agent für MS Windows - neue Version verfügbar (bedingt jedoch offenbar .NET Framework 4.6)

Information von VGem-e vor 5 TagenBackup1 Kommentar

Moin Kollegen, einer unserer Server zeigte grad an, dass für o.g. Software ein Update verfügbar ist. Ob ein evtl. ...

Python

Sie meinen es ja nur gut - Microsoft hilft python-Entwicklern auf unnachahmliche Weise

Information von DerWoWusste vor 6 TagenPython2 Kommentare

Stellt Euch vor, Ihr nutzt python unter Windows 10 und skriptet damit regelmäßig Dinge. Nach dem Update auf Windows ...

Heiß diskutierte Inhalte
Router & Routing
FritzBox und SynologyNAS VPN
Frage von ndeedyRouter & Routing20 Kommentare

Moin moin. Irgendwie habe ich entweder ein bescheuertes Setup, oder mir bereits komplett die Birne mit Versuchen durchgebraten. Bin ...

Cloud-Dienste
MS Sharepoint generelle Frage zur Einrichtung
Frage von ralf86Cloud-Dienste15 Kommentare

Hallo, ich will den Sharepoint als FileServer nutzen. Hier sollen mehrere Freigabeordner mit unterschiedlichen Berechtigungen erstellt werden z.B. Geschäftsführung ...

Windows Server
Hyper-V- Manager
Frage von borjiaWindows Server10 Kommentare

Aufbau des Netzwerkes (siehe Bild) Ich würde gerne mit dem Hyper-V-Manager zwei drei zusätzliche Server installieren. Nur habe ich ...

Vmware
VMware Update 5.1 zu 6.7U4
gelöst Frage von patrickebertVmware8 Kommentare

Hallo alle zusammen, ich den nächsten Monaten steht für mich die Umstellung zwei neuer physikalischer Server an und ich ...