Splitsen scherm in VBA code

[ernstcramer]

je kan met de Windowsknop in combinatie met pijltje recht of links je schermindeling wijzigen.
Is die actie te vangen in een VBA code? Ik heb namelijk een programma dat ik over een half scherm wel hebben, zodat ik bijvoorbeeld in het linker gedeelte mijn verkenner open kan hebben om zaken te zoeken of toe te voegen?

 

[HSV]

Neem de code eens met de recorder op Ernst.

 

[ernstcramer]

Best Harry

als je de recorder bedoelt in een applicatie (zoals Word of Excel) werkt dat niet omdat de commando's buiten de applicatie om gebeuren (denk ik)
En test met Word geeft een lege macro.

 

[VenA]

Probeer het eens met

Application.WindowState = xlNormal

 

[ernstcramer]

Ga ik eens doen, VenA.

Voor de zekerheid: is dit het commando voor "full screen"?

 

[VenA]

Als je het geprobeerd had. Wist je het antwoord.

 

[ernstcramer]

Touché...

 

[ernstcramer]

Ik heb het commando geplaatst in de Sub Open_Form.
Maar krijg een foutmelding dat xlNormal niet is gedefinieerd.

Ik werk met Acces 2003.

 

[VenA]

En deze info had je niet in de OP kunnen zetten? XlNormal lijkt mij voor Excel bestemd. Hoe het in Word geregeld is weet ik niet. Access2003 gebruik ik al zeer lang niet meer. Maar daar kan je van alles instellen bij het openen van de database en het openen van een formulier. Maar hoe ook alweer?

Misschien even wachten of de Access-specialist OctaFish de vraag leest. Of anders een verzoek bij de moderator doen om de vraag te plaatsen naar het Access gedeelte van dit forum.

 

[OctaFish]

Hij leest (al een tijdje) mee . Het had inderdaad een paar uur gescheeld als je volledig was geweest in je vraagstellling. Gelukkig hebben wij daar, als helpers, geen last van .
Je kunt een formulier in Access als popup weergeven; dan krijgt het de grootte die je zelf instelt. De plek op het scherm kun je dan ook nog wel enigszins instellen. Daarmee blijft Access dan nog wel op het scherm staan, en dat lost je probleem dus vermoedelijk niet echt op. Gelukkig kun je de interface van Access redelijk verbergen, zodat alleen je formulier op het scherm blijft staan. Dan kom je al meer in de buurt.

Om het Access venster (en elk ander venster) te verplaatsen, moet je met allerlei API calls gaan werken. In dit draadje staat een voorbeeldje van het manipuleren van Windows. Maar ik ben daar verder niet bedreven in.

 

[VenA]

Hij leest (al een tijdje) mee

dacht ik al vandaar het advies.

 

[snb]

Wat ik kan vinden:

Private Sub Knop16_Click()
    DoCmd.OpenForm "Kopie van formulier II", acNormal, , , , acWindowNormal
End Sub

Het lukt me wel het 'navigationpane' te verbergen, maar ik zie niet zo snel hoe dit in VBA moet.

Application.visible=false werkt in Acces niet, i.t.t. Word en Excel.

 

[ernstcramer]

Sorry, dat ik niet helderder was in mijn vraagstelling... :shocked:

Ik ga dat draadje eens opzoeken, en kijken hoe dat werkt.

@Snb: dat commando ken ik en gebruik ik ook, maar doet alleen wat met het window. Niet met de hele applicatie (tenminste, voor zover ik weet...)

 

[OctaFish]

Ik heb een voorbeeldje dat het Access venster verbergt en alleen het formulier laat zien. Het is wel ontwikkeld voor 2003, dus goeie kans dat hij in 2010 en verder raar doet, maar je kunt de code wellicht wel gebruiken. Ik heb 'm hier staan. Ik hoop dat je er bij kunt, anders moet ik 'm vanavond even op een nettere manier posten.

 

[ernstcramer]

ik kan bij het bestandje en heb het opgehaald. Ik werk nog met die oude Access versies, dus dat zal goedkomen. Ik zal vanavond als ik thuis ben het testen.

 

[OctaFish]

Prima! Bij mij deed-ie het de eerste 2 keer prima, en daarna zag ik niks meer. Ik werk met 2010. Ook converteren naar een accdb hielp niet (of van de regen in de drup). Ik zal er ook nog naar kijken dus.

 

[ernstcramer]

Het werkt prima. Je komt alleen op geen enkele manier "achter" het formulier, dus code kan ik verder niet zien...

 

[ernstcramer]

...Om het Access venster (en elk ander venster) te verplaatsen, moet je met allerlei API calls gaan werken. In dit draadje staat een voorbeeldje van het manipuleren van Windows...

Ik heb er naar gekeken... :shocked: ... maar als ik eerlijk ben gaat mij dat ver boven mijn pet...
Ik zoek nog wel ff verder, en anders gewoon met "de hand" instellen...