Discussion :

[atk_49]

Bonjour,

Ce matin, un utilisateur m'a judicieusement fait remarquer qu'excel ne reste pas au premier plan, contrairement à Open Office, je m'explique :

Sur une configuration à deux écrans, un fichier excel est ouvert sur l'un, et un autre programme sur l'autre. Le travail consiste à recopier des données du programme vers excel.

L'utilisateur doit systématiquement cliquer une première fois sur excel pour activer la fenêtre, puis ensuite sur la cellule pour écrire à l'intérieur. Il m'a démontré que sur OpenOffice il était possible de sélectionner une cellule sans avoir à activer la fenêtre auparavant.

Ma question est donc, comment forcer excel au premier plan afin qu'il soit toujours visible ?

Merci d'avance pour vos réponses et bonne journée.

[Quentin77170]

Salut à toi,

J'ai essayé les événements :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Workbook_Deactivate()
Me.Activate
End Sub
 
Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
Wn.Activate
End Sub

Mais ce n'est pas convainquant, cela fonctionne uniquement dans le cas où, dans la même instance d'Excel, tu passes d'un workbook à un autre...

J'ai alors cherché sur google et j'ai trouvé ça :http://www.extendoffice.com/document...ow-on-top.html qui semble bien fonctionner chez moi...

[Invité]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
#If Win64 Then
    Private Declare PtrSafe Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
#Else
    Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
#End If
Private Sub Workbook_Open()
 '-1 = toujours au premier plan, -2 = normal
 SetWindowPos Application.hwnd, -1, 0, 0, 0, 0, &H2 Or &H1
End Sub

[atk_49]

Merci à vous deux, vos deux solutions fonctionnent très bien !

L'intérêt de ma question est de pouvoir en un clic, sélectionner une cellule lorsque Excel n'est pas actif, je pensais que mettre Excel au premier plan résoudrait cela mais vous m'avez prouvé que non...
Donc je relance le sujet dans cette direction, si quelqu'un à une idée !


Pour information, le fichier Excel en question est un configurateur permettant à une équipe de vendeur d'avoir accès à des informations (sélectionnées via des listes), pour les coller dans un ERP de vente. Le fais de cliquer une fois de plus pour sélectionner Excel puis ensuite les menus du configurateur perturbe certains utilisateurs moins familiarisés au fonctionnement de l'informatique.

[patricktoulon]

bonjour

L'intérêt de ma question est de pouvoir en un clic, sélectionner une cellule lorsque Excel n'est pas actif, je pensais que mettre Excel au premier plan résoudrait cela mais vous m'avez prouvé que non...

alors ca c'est une question bien tordue ou alors je ne suis pas sur que tu te soit bien exprimé

comment veux tu cliquer sur une cellule si ca n'est pas exel que tu a sous les yeux

maintenant si ta demande est cliquer et etre sur excel en premier plan pour pouvoir cliquer sur une cellule il y a des solutions mais c'est tellement aléatoire que je me permet de te le déconseiller
car comme ceci excel serait maitre sur toute les fenetre et je suppose que le resultat du click sur cellule a un interet certain
donc j'ai tout dis
A bon entendeur

[atk_49]

Bonjour Patrick,

comment veux tu cliquer sur une cellule si ca n'est pas exel que tu a sous les yeux

Nous avons des PC avec multiécrans, donc Excel ouvert sur l'un et autre chose sur l'autre.

maintenant si ta demande est cliquer et etre sur excel en premier plan pour pouvoir cliquer sur une cellule il y a des solutions mais c'est tellement aléatoire que je me permet de te le déconseiller

A vrai dire, après avoir pu essayer Excel au premier plan et de m'apercevoir que cela ne résolvait pas ma demande, je n'avais plus beaucoup d'espoir que cela soit possible facilement.

Je rends les armes, merci pour vos conseils et bonne fin de journée !