Discussion :

[MarcelG]

Bonjour la Forum,

Pour le contrôle de mes procédures, j'utilise souvent la méthode

Code :

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

Debug.Print lavariable

Question :

Comment coder pour la fenêtre Exécution
1 - son ouverture si elle n'est pas ouverte
2 - son effacement
3 - sa fermeture

J'ai cherché en utilisant

ce lien

sans succès

Merci par avance, et bonne journée à tous.

[Theze]

Bonjour,

Regarde avec ceci mais SendKeys n'est pas top :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
Sub FenetreExecution()
 
    With Application.VBE.ActiveWindow.Collection("Exécution")'depuis le VBE
 
        .Visible = True 'affiche
 
        .SetFocus 'donne le focus
 
        SendKeys "^(A)" 'sélectionne tout le texte présent dans la fenêtre (quand ça veut marcher :o(( )
 
        SendKeys "{DELETE}" 'le supprime
 
        .Close 'ferme la fenêtre
 
    End With
 
End Sub

Hervé.

[MarcelG]

Bonsoir Theze,

(Heureux de te retrouver.)

OK pour tout le code sauf pour le SendKeys qui ne fonctionne pas.

Sur le web, (à moins que j'aie mal cherché), je n'ai pas trouvé l'API Windows correspondant.

Merci à toi.