1) lister les fenêtres Windows ouvertes
2) Activer au premier plan une fenêtre en l'appelant (en la sélectionnant
suivant son nom)
3) Fermer une fenêtre (en la sélectionnant suivant son nom)
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
Daniel
Bonjour. La macro suivante liste les fenêtres ouvertes, sélecte puis ferme "Classeur1".
Sub test() Dim w As Window, Ligne As Integer Ligne = 1 For Each w In Windows Cells(Ligne, 1) = w.Caption Ligne = Ligne + 1 Next w Windows("Classeur1").Activate Windows("Classeur1").Close True End Sub
Cordialement. Daniel "HD" a écrit dans le message de news: f6vvac$23hj$
Bonjour,
Je voudrais pouvoir :
1) lister les fenêtres Windows ouvertes 2) Activer au premier plan une fenêtre en l'appelant (en la sélectionnant suivant son nom) 3) Fermer une fenêtre (en la sélectionnant suivant son nom)
Vous en remerciant d'avance. -- @+ HD
Bonjour.
La macro suivante liste les fenêtres ouvertes, sélecte puis ferme
"Classeur1".
Sub test()
Dim w As Window, Ligne As Integer
Ligne = 1
For Each w In Windows
Cells(Ligne, 1) = w.Caption
Ligne = Ligne + 1
Next w
Windows("Classeur1").Activate
Windows("Classeur1").Close True
End Sub
Cordialement.
Daniel
"HD" <hd@anti.spam.fr> a écrit dans le message de news:
f6vvac$23hj$1@biggoron.nerim.net...
Bonjour,
Je voudrais pouvoir :
1) lister les fenêtres Windows ouvertes
2) Activer au premier plan une fenêtre en l'appelant (en la sélectionnant
suivant son nom)
3) Fermer une fenêtre (en la sélectionnant suivant son nom)
Bonjour. La macro suivante liste les fenêtres ouvertes, sélecte puis ferme "Classeur1".
Sub test() Dim w As Window, Ligne As Integer Ligne = 1 For Each w In Windows Cells(Ligne, 1) = w.Caption Ligne = Ligne + 1 Next w Windows("Classeur1").Activate Windows("Classeur1").Close True End Sub
Cordialement. Daniel "HD" a écrit dans le message de news: f6vvac$23hj$
Bonjour,
Je voudrais pouvoir :
1) lister les fenêtres Windows ouvertes 2) Activer au premier plan une fenêtre en l'appelant (en la sélectionnant suivant son nom) 3) Fermer une fenêtre (en la sélectionnant suivant son nom)
Vous en remerciant d'avance. -- @+ HD
HD
Merci Daniel... j'ai fini par trouver à force de recherche et bidouillage.
En fait je ne cherchais pas à activer un classeur Excel mais bien une fenêtre Windows... Il m'a donc fallut "manipuler" les Dll et la fonction EnumWindowsProc...
@+ HD
Merci Daniel... j'ai fini par trouver à force de recherche et bidouillage.
En fait je ne cherchais pas à activer un classeur Excel mais bien une
fenêtre Windows... Il m'a donc fallut "manipuler" les Dll et la fonction
EnumWindowsProc...
Merci Daniel... j'ai fini par trouver à force de recherche et bidouillage.
En fait je ne cherchais pas à activer un classeur Excel mais bien une fenêtre Windows... Il m'a donc fallut "manipuler" les Dll et la fonction EnumWindowsProc...