Toujours avec Access, sur l'ouverture de mon form, je voudrais redimensionner mon WebBrowser:
je code:
Me.ctlWEB.Width = Me.Width
Me.ctlWEB.Height = 8000
Pour la largeur, ça marche, pour la hauteur, il ne veut rien savoir, le contrôle fait toujours 7500 twips. Pour éviter des
erreurs dûes à une mauvaise formule de calcul, je teste avec des valeurs absolues, 8000, 7000, 6000, mais à l'affichage, le
contrôle fait toujours 7500 twips.
J'ai trouvé cette solution dans un fil daté de janvier 1997......sur un NG Microsoft......
Ca fait plaisir à voir, la réactivité de Microsoft, un problème qui date de plus de 7 ans et qui n'est toujours pas résolu... Comme je suis sur un de leur NGs, je ne qualifierai pas leur attitude :-((((((((((((((((
J-Pierre
"J-Pierre" a écrit dans le message de news:
Rebonjour,
Toujours avec Access, sur l'ouverture de mon form, je voudrais redimensionner mon WebBrowser: je code: Me.ctlWEB.Width = Me.Width Me.ctlWEB.Height = 8000
Pour la largeur, ça marche, pour la hauteur, il ne veut rien savoir, le contrôle fait toujours 7500 twips. Pour éviter des erreurs dûes à une mauvaise formule de calcul, je teste avec des valeurs absolues, 8000, 7000, 6000, mais à l'affichage, le contrôle fait toujours 7500 twips.
Qu'est-ce-que j'ai raté ?
Merci J-Pierre
Bonjour,
Finalement, j'ai trouvé la solution, toujours sur Google, il faut rendre le contrôle invisible avant de le redimensionner puis
visible à nouveau.
J'ai trouvé cette solution dans un fil daté de janvier 1997......sur un NG Microsoft......
Ca fait plaisir à voir, la réactivité de Microsoft, un problème qui date de plus de 7 ans et qui n'est toujours pas résolu...
Comme je suis sur un de leur NGs, je ne qualifierai pas leur attitude :-((((((((((((((((
J-Pierre
"J-Pierre" <pas.de.pub.jpberchtold@hotmail.com> a écrit dans le message de news: uyZyVaQbGHA.2368@TK2MSFTNGP03.phx.gbl...
Rebonjour,
Toujours avec Access, sur l'ouverture de mon form, je voudrais redimensionner mon WebBrowser:
je code:
Me.ctlWEB.Width = Me.Width
Me.ctlWEB.Height = 8000
Pour la largeur, ça marche, pour la hauteur, il ne veut rien savoir, le contrôle fait toujours 7500 twips. Pour éviter des
erreurs dûes à une mauvaise formule de calcul, je teste avec des valeurs absolues, 8000, 7000, 6000, mais à l'affichage, le
contrôle fait toujours 7500 twips.
J'ai trouvé cette solution dans un fil daté de janvier 1997......sur un NG Microsoft......
Ca fait plaisir à voir, la réactivité de Microsoft, un problème qui date de plus de 7 ans et qui n'est toujours pas résolu... Comme je suis sur un de leur NGs, je ne qualifierai pas leur attitude :-((((((((((((((((
J-Pierre
"J-Pierre" a écrit dans le message de news:
Rebonjour,
Toujours avec Access, sur l'ouverture de mon form, je voudrais redimensionner mon WebBrowser: je code: Me.ctlWEB.Width = Me.Width Me.ctlWEB.Height = 8000
Pour la largeur, ça marche, pour la hauteur, il ne veut rien savoir, le contrôle fait toujours 7500 twips. Pour éviter des erreurs dûes à une mauvaise formule de calcul, je teste avec des valeurs absolues, 8000, 7000, 6000, mais à l'affichage, le contrôle fait toujours 7500 twips.
Qu'est-ce-que j'ai raté ?
Merci J-Pierre
J-Pierre
Pas 7 ans mais 9, désolé pour la faute de frappe, c'est encore pire
Pas 7 ans mais 9, désolé pour la faute de frappe, c'est encore pire
Pas 7 ans mais 9, désolé pour la faute de frappe, c'est encore pire
3stone
Salut J-Pierre,
"J-Pierre" | Finalement, j'ai trouvé la solution, toujours sur Google, il faut rendre le contrôle invisible avant de le redimensionner puis | visible à nouveau. | | Me.ctlWEB.Visible = False | Me.ctlWEB.Width = Me.Width | Me.ctlWEB.Height = 8900 ' juste pour l'exemple.... | Me.ctlWEB.Visible = True
C'est fou cela... et tellement contre nature que cela ne vient pas tout seul :-(
| J'ai trouvé cette solution dans un fil daté de janvier 1997......sur un NG Microsoft...... | | Ca fait plaisir à voir, la réactivité de Microsoft, un problème qui date de plus de 7 ans et qui n'est toujours pas résolu... | Comme je suis sur un de leur NGs, je ne qualifierai pas leur attitude :-((((((((((((((((
Te tracasse... ils vont faire des affaires avec Office 2007 ;-)
The new qui fait encore plus (ici manquent les smiles)
"J-Pierre"
| Finalement, j'ai trouvé la solution, toujours sur Google, il faut rendre le contrôle invisible
avant de le redimensionner puis
| visible à nouveau.
|
| Me.ctlWEB.Visible = False
| Me.ctlWEB.Width = Me.Width
| Me.ctlWEB.Height = 8900 ' juste pour l'exemple....
| Me.ctlWEB.Visible = True
C'est fou cela... et tellement contre nature que cela ne vient pas tout seul :-(
| J'ai trouvé cette solution dans un fil daté de janvier 1997......sur un NG Microsoft......
|
| Ca fait plaisir à voir, la réactivité de Microsoft, un problème qui date de plus de 7 ans et qui
n'est toujours pas résolu...
| Comme je suis sur un de leur NGs, je ne qualifierai pas leur attitude :-((((((((((((((((
Te tracasse... ils vont faire des affaires avec Office 2007 ;-)
The new qui fait encore plus (ici manquent les smiles)
"J-Pierre" | Finalement, j'ai trouvé la solution, toujours sur Google, il faut rendre le contrôle invisible avant de le redimensionner puis | visible à nouveau. | | Me.ctlWEB.Visible = False | Me.ctlWEB.Width = Me.Width | Me.ctlWEB.Height = 8900 ' juste pour l'exemple.... | Me.ctlWEB.Visible = True
C'est fou cela... et tellement contre nature que cela ne vient pas tout seul :-(
| J'ai trouvé cette solution dans un fil daté de janvier 1997......sur un NG Microsoft...... | | Ca fait plaisir à voir, la réactivité de Microsoft, un problème qui date de plus de 7 ans et qui n'est toujours pas résolu... | Comme je suis sur un de leur NGs, je ne qualifierai pas leur attitude :-((((((((((((((((
Te tracasse... ils vont faire des affaires avec Office 2007 ;-)
The new qui fait encore plus (ici manquent les smiles)
Je n'ai jamais vraiment joué avec des forms dans Access, mais le code suivant devrait marcher n'importe où, je pense...
Private Sub Form_Load() WebBrowser1.Width = 20000 WebBrowser1.Height = 12000 WebBrowser1.Navigate "http://www.google.fr" End Sub
Il marche en VB "standard" en tout cas...
Philippe
J-Pierre a écrit :
Rebonjour,
Toujours avec Access, sur l'ouverture de mon form, je voudrais redimensionner mon WebBrowser: je code: Me.ctlWEB.Width = Me.Width Me.ctlWEB.Height = 8000
Pour la largeur, ça marche, pour la hauteur, il ne veut rien savoir, le contrôle fait toujours 7500 twips. Pour éviter des erreurs dûes à une mauvaise formule de calcul, je teste avec des valeurs absolues, 8000, 7000, 6000, mais à l'affichage, le contrôle fait toujours 7500 twips.
Qu'est-ce-que j'ai raté ?
Merci J-Pierre
Re,
Je n'ai jamais vraiment joué avec des forms dans Access, mais le code
suivant devrait marcher n'importe où, je pense...
Private Sub Form_Load()
WebBrowser1.Width = 20000
WebBrowser1.Height = 12000
WebBrowser1.Navigate "http://www.google.fr"
End Sub
Il marche en VB "standard" en tout cas...
Philippe
J-Pierre a écrit :
Rebonjour,
Toujours avec Access, sur l'ouverture de mon form, je voudrais redimensionner mon WebBrowser:
je code:
Me.ctlWEB.Width = Me.Width
Me.ctlWEB.Height = 8000
Pour la largeur, ça marche, pour la hauteur, il ne veut rien savoir, le contrôle fait toujours 7500 twips. Pour éviter des
erreurs dûes à une mauvaise formule de calcul, je teste avec des valeurs absolues, 8000, 7000, 6000, mais à l'affichage, le
contrôle fait toujours 7500 twips.
Je n'ai jamais vraiment joué avec des forms dans Access, mais le code suivant devrait marcher n'importe où, je pense...
Private Sub Form_Load() WebBrowser1.Width = 20000 WebBrowser1.Height = 12000 WebBrowser1.Navigate "http://www.google.fr" End Sub
Il marche en VB "standard" en tout cas...
Philippe
J-Pierre a écrit :
Rebonjour,
Toujours avec Access, sur l'ouverture de mon form, je voudrais redimensionner mon WebBrowser: je code: Me.ctlWEB.Width = Me.Width Me.ctlWEB.Height = 8000
Pour la largeur, ça marche, pour la hauteur, il ne veut rien savoir, le contrôle fait toujours 7500 twips. Pour éviter des erreurs dûes à une mauvaise formule de calcul, je teste avec des valeurs absolues, 8000, 7000, 6000, mais à l'affichage, le contrôle fait toujours 7500 twips.
Qu'est-ce-que j'ai raté ?
Merci J-Pierre
J-Pierre
Dois-je en déduire que nous, pauvre utilisateurs Access, sommes des sous-développeurs que Microsoft néglige :-))))))
Dis donc, il est vachement grand, ton écran ....... 42 pouces au moins......
J-Pierre
"Le pape" a écrit dans le message de news: 44560fde$0$3559$
Re,
Je n'ai jamais vraiment joué avec des forms dans Access, mais le code suivant devrait marcher n'importe où, je pense...
Private Sub Form_Load() WebBrowser1.Width = 20000 WebBrowser1.Height = 12000 WebBrowser1.Navigate "http://www.google.fr" End Sub
Il marche en VB "standard" en tout cas...
Philippe
Dois-je en déduire que nous, pauvre utilisateurs Access, sommes des sous-développeurs que Microsoft néglige :-))))))
Dis donc, il est vachement grand, ton écran ....... 42 pouces au moins......
J-Pierre
"Le pape" <nospam@nospamworld.net> a écrit dans le message de news: 44560fde$0$3559$626a54ce@news.free.fr...
Re,
Je n'ai jamais vraiment joué avec des forms dans Access, mais le code suivant devrait marcher n'importe où, je pense...
Private Sub Form_Load()
WebBrowser1.Width = 20000
WebBrowser1.Height = 12000
WebBrowser1.Navigate "http://www.google.fr"
End Sub
Dois-je en déduire que nous, pauvre utilisateurs Access, sommes des sous-développeurs que Microsoft néglige :-))))))
Dis donc, il est vachement grand, ton écran ....... 42 pouces au moins......
J-Pierre
"Le pape" a écrit dans le message de news: 44560fde$0$3559$
Re,
Je n'ai jamais vraiment joué avec des forms dans Access, mais le code suivant devrait marcher n'importe où, je pense...
Private Sub Form_Load() WebBrowser1.Width = 20000 WebBrowser1.Height = 12000 WebBrowser1.Navigate "http://www.google.fr" End Sub
Il marche en VB "standard" en tout cas...
Philippe
Pierre CFI [mvp]
c'est évident :o))
-- Pierre CFI MVP Microsoft Access
Site pour bien commencer Access http://www.mpfa.info
"3stone" a écrit dans le message de news:
Salut J-Pierre,
"J-Pierre" | Finalement, j'ai trouvé la solution, toujours sur Google, il faut rendre le contrôle invisible avant de le redimensionner puis | visible à nouveau. | | Me.ctlWEB.Visible = False | Me.ctlWEB.Width = Me.Width | Me.ctlWEB.Height = 8900 ' juste pour l'exemple.... | Me.ctlWEB.Visible = True
C'est fou cela... et tellement contre nature que cela ne vient pas tout seul :-(
| J'ai trouvé cette solution dans un fil daté de janvier 1997......sur un NG Microsoft...... | | Ca fait plaisir à voir, la réactivité de Microsoft, un problème qui date de plus de 7 ans et qui n'est toujours pas résolu... | Comme je suis sur un de leur NGs, je ne qualifierai pas leur attitude :-((((((((((((((((
Te tracasse... ils vont faire des affaires avec Office 2007 ;-)
The new qui fait encore plus (ici manquent les smiles)
Site pour bien commencer
Access http://www.mpfa.info
"3stone" <home@sweet_home.be> a écrit dans le message de news: usVszjRbGHA.4972@TK2MSFTNGP03.phx.gbl...
Salut J-Pierre,
"J-Pierre"
| Finalement, j'ai trouvé la solution, toujours sur Google, il faut rendre le contrôle invisible
avant de le redimensionner puis
| visible à nouveau.
|
| Me.ctlWEB.Visible = False
| Me.ctlWEB.Width = Me.Width
| Me.ctlWEB.Height = 8900 ' juste pour l'exemple....
| Me.ctlWEB.Visible = True
C'est fou cela... et tellement contre nature que cela ne vient pas tout seul :-(
| J'ai trouvé cette solution dans un fil daté de janvier 1997......sur un NG Microsoft......
|
| Ca fait plaisir à voir, la réactivité de Microsoft, un problème qui date de plus de 7 ans et qui
n'est toujours pas résolu...
| Comme je suis sur un de leur NGs, je ne qualifierai pas leur attitude :-((((((((((((((((
Te tracasse... ils vont faire des affaires avec Office 2007 ;-)
The new qui fait encore plus (ici manquent les smiles)
Site pour bien commencer Access http://www.mpfa.info
"3stone" a écrit dans le message de news:
Salut J-Pierre,
"J-Pierre" | Finalement, j'ai trouvé la solution, toujours sur Google, il faut rendre le contrôle invisible avant de le redimensionner puis | visible à nouveau. | | Me.ctlWEB.Visible = False | Me.ctlWEB.Width = Me.Width | Me.ctlWEB.Height = 8900 ' juste pour l'exemple.... | Me.ctlWEB.Visible = True
C'est fou cela... et tellement contre nature que cela ne vient pas tout seul :-(
| J'ai trouvé cette solution dans un fil daté de janvier 1997......sur un NG Microsoft...... | | Ca fait plaisir à voir, la réactivité de Microsoft, un problème qui date de plus de 7 ans et qui n'est toujours pas résolu... | Comme je suis sur un de leur NGs, je ne qualifierai pas leur attitude :-((((((((((((((((
Te tracasse... ils vont faire des affaires avec Office 2007 ;-)
The new qui fait encore plus (ici manquent les smiles)