Kun formular vinduet skal poppe op ved start

Det kan du skjule ved at lukke baggrunden med F11 Jeg kan lave en makro til dig, med det

Du kan også ved åbning skrive, i formularen:
DoCmd.RunCommand acCmdWindowHide
:)

Når du så lukker formularen trykker du så bare på F11, så har du vinduet igen.
:o)

Du kan også "ved lukning" skrive, i formularen:

DoCmd.RunCommand acCmdWindowUnhide

Du kan også lukke dine menulinjer, en for en, Med ordren:
DoCmd.ShowToolbar "Menulinje", acToolbarNo
God fornøjelse, der er 28 faste menulinjer.
Så er der kun din egen formular oppe.
Vh Henrik

Du kan også vise menulinjer igen, en for en, Med ordren:
DoCmd.ShowToolbar "Menulinje", acToolbarYes
;o)

Man kan også under start slå vinduet fra en gang for alle. Bare fjern flue benet i "Vis databasevinduet"

Har du testet alle dine ideer?... Jeg kan nemlig ikke helt få dem til at virke...
Jeg har slået det hele fra i start, men der er stadig noget... Det kan godt være det er mig, der nørder mig med et eller andet, da jeg ikke er mega super bruger af access.

Ja. Det er tested, Som jeg skrev kan jeg lave en demo til dig med det, bare skrin versionsnr og e-mail adresse.

Jeg kan også fjerne øverste og nederste linje med start, så du får hele brugerfladen.

vil gerne se version, hvis jeg må :O)

kennethlarsen@stofanet.dk

vh
dsjk

hov, det var demoen jeg gerne ville se. v. 2000

>>dsjk
version var din access type, Ex. Access 97 eller Access Xp

Hele brugerfladen skriver du?
Jeg vil have at min formular skal åbnes således at hvis jeg åbner den nu vil jeg stadig kunne se dette Eksperten browservindue, der hvor min formular ikke er.
Men jeg vil rigtig gerne se en demo til access 2002. Du kan sende den til huskdetnuhuskdetnu@hotmail.com

Global Const SW_HIDE = 0
Global Const SW_SHOWNORMAL = 1
Global Const SW_SHOWMINIMIZED = 2
Global Const SW_SHOWMAXIMIZED = 3


Private Declare Function apiShowWindow Lib "user32" _
    Alias "ShowWindow" (ByVal hwnd As Long, _
          ByVal nCmdShow As Long) As Long

Function fSetAccessWindow(nCmdShow As Long)
'Usage Examples
'Maximize window:
'      ?fSetAccessWindow(SW_SHOWMAXIMIZED)
'Minimize window:
'      ?fSetAccessWindow(SW_SHOWMINIMIZED)
'Hide window:
'      ?fSetAccessWindow(SW_HIDE)
'Normal window:
'      ?fSetAccessWindow(SW_SHOWNORMAL)
'
Dim loX  As Long
Dim loForm As Form
    On Error Resume Next
    Set loForm = Screen.ActiveForm
    If Err <> 0 Then 'no Activeform
      If nCmdShow = SW_HIDE Then
        MsgBox "Cannot hide Access unless " _
                    & "a form is on screen"
      Else
        loX = apiShowWindow(hWndAccessApp, nCmdShow)
        Err.Clear
      End If
    Else
        If nCmdShow = SW_SHOWMINIMIZED And loForm.Modal = True Then
            MsgBox "Cannot minimize Access with " _
                    & (loForm.Caption + " ") _
                    & "form on screen"
        ElseIf nCmdShow = SW_HIDE And loForm.PopUp <> True Then
            MsgBox "Cannot hide Access with " _
                    & (loForm.Caption + " ") _
                    & "form on screen"
        Else
            loX = apiShowWindow(hWndAccessApp, nCmdShow)
        End If
    End If
    fSetAccessWindow = (loX <> 0)
End Function

taken from http://www.mvps.org/access/api/api0019.htm

Er sendt i access XP

>>terry
Var det ikke en lang smørre til en ny begynder, Se 17.17.35
;oD

if yours works then he wont need it :o)

henrik kan du send migen eksemple hvor du bruger DoCmd.RunCommand acCmdWindowHide. Jeg er MEGET sikker på at det IKKE virker!

>>terry
Læg så lige din E-mail adresse.
:)

Beklager terry, du har stavet forkert, ordren er:
DoCmd.RunCommand acCmdWindowUnhide
Og du får den når du sender din E-mail adresse.
Venlig hilsen
Henrik13

eksperten@santhell.dk
ZIP den tak :o)

Er sendt, zipped i access XP.
:)

kan du ikke bare maksimere den formular du har oppe? docmd.maximize ved åbning af formen???

http://home1.stofanet.dk/santhel/Download/HideAccessWindow.zip

Just open the dB!

>>terry
Hvad er det, den låste maskinen, så pawer knappen måtte bruges.
:)

Jeg siger tak til alle... også ferdinand. I kan dele pointene.

henrik>Det ved jeg ikke, det virker 100% here :o)
Prøv og debug for at se hvad problemet er