J'ai un classeur qui utilise un userform pour l'affichage d'un fichier
d'aide .PDF
J'utilise le contrôle "WebBrowser" pour afficher ce fichier. J'ai déterminé
une taille par défaut de 640 x 480 pour le userform lui-même. Cependant je
voudrais donner à l'usager la chance de modifier la taille de la fenêtre
comme on peut normalement le faire en utilisant le coin inférieur droit.
Je ne vois pas de propriété au userform qui permette de changer sa taille.
Alors j'ai cherché parmi les contrôles disponibles mais je n'arrive pas à
trouver celui qui fera le travail.
J'espère que l'un de vous saura m'indiquer le chemin à suivre.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour Pierre,
Voici un fichier exemple de Michel Perron sur le sujet :
http://cjoint.com/?mvbohHhe5m
Salutations!
"Pierre Archambault" a écrit dans le message de news: 8L_pf.68039$ Bonjour à tous,
J'ai un classeur qui utilise un userform pour l'affichage d'un fichier d'aide .PDF
J'utilise le contrôle "WebBrowser" pour afficher ce fichier. J'ai déterminé une taille par défaut de 640 x 480 pour le userform lui-même. Cependant je voudrais donner à l'usager la chance de modifier la taille de la fenêtre comme on peut normalement le faire en utilisant le coin inférieur droit.
Je ne vois pas de propriété au userform qui permette de changer sa taille. Alors j'ai cherché parmi les contrôles disponibles mais je n'arrive pas à trouver celui qui fera le travail.
J'espère que l'un de vous saura m'indiquer le chemin à suivre.
Merci d'avance
Pierre
Bonjour Pierre,
Voici un fichier exemple de Michel Perron sur le sujet :
http://cjoint.com/?mvbohHhe5m
Salutations!
"Pierre Archambault" <pierre.archambault@videotron.ca> a écrit dans le message de news:
8L_pf.68039$ww2.847048@wagner.videotron.net...
Bonjour à tous,
J'ai un classeur qui utilise un userform pour l'affichage d'un fichier
d'aide .PDF
J'utilise le contrôle "WebBrowser" pour afficher ce fichier. J'ai déterminé
une taille par défaut de 640 x 480 pour le userform lui-même. Cependant je
voudrais donner à l'usager la chance de modifier la taille de la fenêtre
comme on peut normalement le faire en utilisant le coin inférieur droit.
Je ne vois pas de propriété au userform qui permette de changer sa taille.
Alors j'ai cherché parmi les contrôles disponibles mais je n'arrive pas à
trouver celui qui fera le travail.
J'espère que l'un de vous saura m'indiquer le chemin à suivre.
Voici un fichier exemple de Michel Perron sur le sujet :
http://cjoint.com/?mvbohHhe5m
Salutations!
"Pierre Archambault" a écrit dans le message de news: 8L_pf.68039$ Bonjour à tous,
J'ai un classeur qui utilise un userform pour l'affichage d'un fichier d'aide .PDF
J'utilise le contrôle "WebBrowser" pour afficher ce fichier. J'ai déterminé une taille par défaut de 640 x 480 pour le userform lui-même. Cependant je voudrais donner à l'usager la chance de modifier la taille de la fenêtre comme on peut normalement le faire en utilisant le coin inférieur droit.
Je ne vois pas de propriété au userform qui permette de changer sa taille. Alors j'ai cherché parmi les contrôles disponibles mais je n'arrive pas à trouver celui qui fera le travail.
J'espère que l'un de vous saura m'indiquer le chemin à suivre.
Merci d'avance
Pierre
Michel Pierron
Bonjour Pierre; Au + court:
Private Declare Function FindWindow Lib "user32" _ Alias "FindWindowA" (ByVal lpClassName As String _ , ByVal lpWindowName As String) As Long Private Declare Function SetWindowLong Lib "user32" _ Alias "SetWindowLongA" (ByVal hWnd As Long _ , ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Sub UserForm_Initialize() hwnd = FindWindow(vbNullString, Me.Caption) SetWindowLong hwnd, -16, &H84CC0080 End Sub
MP
"Pierre Archambault" a écrit dans le message de news: 8L_pf.68039$
Bonjour à tous,
J'ai un classeur qui utilise un userform pour l'affichage d'un fichier d'aide .PDF
J'utilise le contrôle "WebBrowser" pour afficher ce fichier. J'ai déterminé
une taille par défaut de 640 x 480 pour le userform lui-même. Cependant je voudrais donner à l'usager la chance de modifier la taille de la fenêtre comme on peut normalement le faire en utilisant le coin inférieur droit.
Je ne vois pas de propriété au userform qui permette de changer sa taille. Alors j'ai cherché parmi les contrôles disponibles mais je n'arrive pas à trouver celui qui fera le travail.
J'espère que l'un de vous saura m'indiquer le chemin à suivre.
Merci d'avance
Pierre
Bonjour Pierre;
Au + court:
Private Declare Function FindWindow Lib "user32" _
Alias "FindWindowA" (ByVal lpClassName As String _
, ByVal lpWindowName As String) As Long
Private Declare Function SetWindowLong Lib "user32" _
Alias "SetWindowLongA" (ByVal hWnd As Long _
, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Sub UserForm_Initialize()
hwnd = FindWindow(vbNullString, Me.Caption)
SetWindowLong hwnd, -16, &H84CC0080
End Sub
MP
"Pierre Archambault" <pierre.archambault@videotron.ca> a écrit dans le
message de news: 8L_pf.68039$ww2.847048@wagner.videotron.net...
Bonjour à tous,
J'ai un classeur qui utilise un userform pour l'affichage d'un fichier
d'aide .PDF
J'utilise le contrôle "WebBrowser" pour afficher ce fichier. J'ai
déterminé
une taille par défaut de 640 x 480 pour le userform lui-même. Cependant je
voudrais donner à l'usager la chance de modifier la taille de la fenêtre
comme on peut normalement le faire en utilisant le coin inférieur droit.
Je ne vois pas de propriété au userform qui permette de changer sa taille.
Alors j'ai cherché parmi les contrôles disponibles mais je n'arrive pas à
trouver celui qui fera le travail.
J'espère que l'un de vous saura m'indiquer le chemin à suivre.
Private Declare Function FindWindow Lib "user32" _ Alias "FindWindowA" (ByVal lpClassName As String _ , ByVal lpWindowName As String) As Long Private Declare Function SetWindowLong Lib "user32" _ Alias "SetWindowLongA" (ByVal hWnd As Long _ , ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Sub UserForm_Initialize() hwnd = FindWindow(vbNullString, Me.Caption) SetWindowLong hwnd, -16, &H84CC0080 End Sub
MP
"Pierre Archambault" a écrit dans le message de news: 8L_pf.68039$
Bonjour à tous,
J'ai un classeur qui utilise un userform pour l'affichage d'un fichier d'aide .PDF
J'utilise le contrôle "WebBrowser" pour afficher ce fichier. J'ai déterminé
une taille par défaut de 640 x 480 pour le userform lui-même. Cependant je voudrais donner à l'usager la chance de modifier la taille de la fenêtre comme on peut normalement le faire en utilisant le coin inférieur droit.
Je ne vois pas de propriété au userform qui permette de changer sa taille. Alors j'ai cherché parmi les contrôles disponibles mais je n'arrive pas à trouver celui qui fera le travail.
J'espère que l'un de vous saura m'indiquer le chemin à suivre.
Merci d'avance
Pierre
Pierre Archambault
Merci infiniement Michel
Pierre
"Michel Pierron" a écrit dans le message de news:%
Bonjour Pierre; Au + court:
Private Declare Function FindWindow Lib "user32" _ Alias "FindWindowA" (ByVal lpClassName As String _ , ByVal lpWindowName As String) As Long Private Declare Function SetWindowLong Lib "user32" _ Alias "SetWindowLongA" (ByVal hWnd As Long _ , ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Sub UserForm_Initialize() hwnd = FindWindow(vbNullString, Me.Caption) SetWindowLong hwnd, -16, &H84CC0080 End Sub
MP
"Pierre Archambault" a écrit dans le message de news: 8L_pf.68039$
Bonjour à tous,
J'ai un classeur qui utilise un userform pour l'affichage d'un fichier d'aide .PDF
J'utilise le contrôle "WebBrowser" pour afficher ce fichier. J'ai déterminé
une taille par défaut de 640 x 480 pour le userform lui-même. Cependant je
voudrais donner à l'usager la chance de modifier la taille de la fenêtre comme on peut normalement le faire en utilisant le coin inférieur droit.
Je ne vois pas de propriété au userform qui permette de changer sa taille.
Alors j'ai cherché parmi les contrôles disponibles mais je n'arrive pas à
trouver celui qui fera le travail.
J'espère que l'un de vous saura m'indiquer le chemin à suivre.
Merci d'avance
Pierre
Merci infiniement Michel
Pierre
"Michel Pierron" <michel.pierron@free.fr> a écrit dans le message de
news:%23xruEQhBGHA.3156@TK2MSFTNGP12.phx.gbl...
Bonjour Pierre;
Au + court:
Private Declare Function FindWindow Lib "user32" _
Alias "FindWindowA" (ByVal lpClassName As String _
, ByVal lpWindowName As String) As Long
Private Declare Function SetWindowLong Lib "user32" _
Alias "SetWindowLongA" (ByVal hWnd As Long _
, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Sub UserForm_Initialize()
hwnd = FindWindow(vbNullString, Me.Caption)
SetWindowLong hwnd, -16, &H84CC0080
End Sub
MP
"Pierre Archambault" <pierre.archambault@videotron.ca> a écrit dans le
message de news: 8L_pf.68039$ww2.847048@wagner.videotron.net...
Bonjour à tous,
J'ai un classeur qui utilise un userform pour l'affichage d'un fichier
d'aide .PDF
J'utilise le contrôle "WebBrowser" pour afficher ce fichier. J'ai
déterminé
une taille par défaut de 640 x 480 pour le userform lui-même. Cependant
je
voudrais donner à l'usager la chance de modifier la taille de la fenêtre
comme on peut normalement le faire en utilisant le coin inférieur droit.
Je ne vois pas de propriété au userform qui permette de changer sa
taille.
Alors j'ai cherché parmi les contrôles disponibles mais je n'arrive pas
à
trouver celui qui fera le travail.
J'espère que l'un de vous saura m'indiquer le chemin à suivre.
"Michel Pierron" a écrit dans le message de news:%
Bonjour Pierre; Au + court:
Private Declare Function FindWindow Lib "user32" _ Alias "FindWindowA" (ByVal lpClassName As String _ , ByVal lpWindowName As String) As Long Private Declare Function SetWindowLong Lib "user32" _ Alias "SetWindowLongA" (ByVal hWnd As Long _ , ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Sub UserForm_Initialize() hwnd = FindWindow(vbNullString, Me.Caption) SetWindowLong hwnd, -16, &H84CC0080 End Sub
MP
"Pierre Archambault" a écrit dans le message de news: 8L_pf.68039$
Bonjour à tous,
J'ai un classeur qui utilise un userform pour l'affichage d'un fichier d'aide .PDF
J'utilise le contrôle "WebBrowser" pour afficher ce fichier. J'ai déterminé
une taille par défaut de 640 x 480 pour le userform lui-même. Cependant je
voudrais donner à l'usager la chance de modifier la taille de la fenêtre comme on peut normalement le faire en utilisant le coin inférieur droit.
Je ne vois pas de propriété au userform qui permette de changer sa taille.
Alors j'ai cherché parmi les contrôles disponibles mais je n'arrive pas à
trouver celui qui fera le travail.
J'espère que l'un de vous saura m'indiquer le chemin à suivre.