Taille affichage formulaire
Bonsoir,
Soit un formulaire indépendant pour ajout et modification des enregistrements dont les propriétés sont :
fenêtre contextuelle = oui ' nécessaire puisque par la suite la base s'ouvrira sur un formulaire, et la bdd sera cachée et réduite
fenêtre modale = oui ' nécessaire .... pour moi
Affichage par défaut = formulaires continus ' plus pratique pour ce que je veux qu'un défilement avec boutons de déplacement
affichage en mode formulaire
Largeur = 10,5 cm
centrage auto=oui
taille ajustée = non ' j'ai mis non car sinon je me retrouve avec un seul enregistrement à la fois et ce n'ai pas ce que je veux, bien que là pour le coup mon problème de taille est réglé
afficher sélecteur et boutons de déplacements = non ' car je souhaite voir tous mes enregistrements les uns sous les autres dans la limite de mon formulaire d'ou l’ascenseur
et barre de défilement = verticale
bon le soucis c'est qu'à l'ouverture de ce formulaire la largeur est beaucoup plus grande que celle définie en mode création .
ne pourrais-je pas remédier à ce problème par code VBA ?
merci par avance
edit : autant pour moi. J'ai trouvé un peu tard le code à l'ouverture :
Code:
1
2
3
4
5
6
7
| Dim intwindowW as integer
dim intTotalFormW as integer
intTotalFormW=Me.Width
intwindowW=Me.InsideWidth
if intwindowW <> intTotalFormW then
Me.InsideWidth=intTotalFormW
end if |
