calculatrice windows dans un formulaire?

Bonjour!

juste une petite question:

est-il possible d'afficher la calculatrice windows dans un userform, mais que celle-ci fasse partie intégrante de l'userform?

(j'ai trouvé un code qui permet d'ouvrir le fichier CALC.exe, mais pas de code pour intégrer cette dernière dans le formulaire)

Merci d'avance pour l'info!

Je pense que le mieux serait de le créer toi même !

Ceci pourrait p e te convenir.
http://www.vbfrance.com/code.aspx?ID=31038

bah, en vérité, je n'en ai pas vraiment besoin, c'était juste une question que je me posais!

Mais merci pour le lien, je le met de côté, ça peut toujours servir!

Bonjour,

Utillise alors la calculatrice Calc.exe, que tu peux appeler avec la fonction Shell !

salut jmfmarques,

oui, ça j'avais trouvé le code sur le forum...

mais la question que je me posais, c'était de savoir si on pouvait l'intégrer la calculatrice dans un userform.

merci!

Salut !
Tu peux utiliser l'API SetParent.
Exemples :
[ Lien ]
[ Lien ]

---

Julien.

Dans le userform tu mets :
(j'ai mis calculator, mais le nom de la fenêtre de ta calculatrice peut être différent)

Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Dim a As Long

Private Sub UserForm_Activate()
Dim lhwnd As Long
lhwnd = FindWindow(vbNullString, Me.Caption)
a = FindWindow(vbNullString, "Calculator")
Call SetParent(a, lhwnd)
End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Call SetParent(a, 0)
End Sub

salut oommeeggaa3d,

j'ai essayé ton code mais il ne se passe rien....

j'ai du rater un truc quelque part!

salut

as-tu ouvert une calculatrice windows auparavant ?
si son nom est calculator, ca marchera tel quel, sinon modifie  a = FindWindow(vbNullString, "Calculator") pour avoir le nom correct.

bon courage

ah ok!

j'avais pas compris qu'il fallait ouvrir la calculatrice avant!

maintenant ça fonctionne!   merci!

je vais continuer avec mes bêtes questions:

est-ce que tu sais "figer" ta calculatrice à un endroit précis dans ton userform?