SelectedSheets.Delete

Le
LANIMAL
Bonjour (me revoilà !)
Quand on exécute le code ActiveWindow.SelectedSheets.Delete
L'alerte habituelle d'Excel aparaît :
" Les feuilles sélectionnées seront supprimées définitivement.
- Pour supprimer définitivement les feuilles sélectionnées, cliquez OK.
- Pour annuler la suppression, cliquez sur Annuler. "
Est-il possible d'inclure la réponse "OK" dans la macro,
pour éviter à chaque fois la réponse manuelle ? - Comment ?
Merci, Bonne fin d'année et à l'année prochaine.
Michel
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
isabelle
Le #5341371
bonjour et bonne année 2008 Michel,

Application.DisplayAlerts = False
ActiveWindow.SelectedSheets.Delete
Application.DisplayAlerts = True

isabelle

Bonjour (me revoilà !)
Quand on exécute le code ActiveWindow.SelectedSheets.Delete
L'alerte habituelle d'Excel aparaît :
" Les feuilles sélectionnées seront supprimées définitivement.
- Pour supprimer définitivement les feuilles sélectionnées, cliquez OK.
- Pour annuler la suppression, cliquez sur Annuler. "
Est-il possible d'inclure la réponse "OK" dans la macro,
pour éviter à chaque fois la réponse manuelle ? - Comment ?
Merci, Bonne fin d'année et à l'année prochaine.
Michel


Pounet95
Le #5341361
Bonjour,
Je ne sais pas si cela met par défaut OK, mais l'instruction suivante permet
de s'affranchir du message :
application.displayalertsúlse
<opération à effectuer>
application.displayalerts=true

Suis preneur sur le moyen de dire que c'est oui ou non qui est pris encompte
par défaut
Bon après-midi et préparez toutes et tous au mieux le passage à 2008
Pounet95

"LANIMAL" news:
Bonjour (me revoilà !)
Quand on exécute le code ActiveWindow.SelectedSheets.Delete
L'alerte habituelle d'Excel aparaît :
" Les feuilles sélectionnées seront supprimées définitivement.
- Pour supprimer définitivement les feuilles sélectionnées, cliquez OK.
- Pour annuler la suppression, cliquez sur Annuler. "
Est-il possible d'inclure la réponse "OK" dans la macro,
pour éviter à chaque fois la réponse manuelle ? - Comment ?
Merci, Bonne fin d'année et à l'année prochaine.
Michel


LANIMAL
Le #5341331
Merci Pounet, en attendant mieux je me régale avec ta réponse et celle
d'Isabelle.
Effectivement la question se posait.
Dans le cas suivant, la réponse par défaut est "OK", car l'opération
"Delete" s'effectue sans alerte.
Application.DisplayAlerts = False
ActiveWindow.SelectedSheets.Delete
Application.DisplayAlerts = True
Merci encore, et bien sûr B... A... à vous 2.

Bonjour,
Je ne sais pas si cela met par défaut OK, mais l'instruction suivante
permet de s'affranchir du message :
application.displayalertsúlse
<opération à effectuer>
application.displayalerts=true

Suis preneur sur le moyen de dire que c'est oui ou non qui est pris
encompte par défaut
Bon après-midi et préparez toutes et tous au mieux le passage à 2008
Pounet95

"LANIMAL" news:
Bonjour (me revoilà !)
Quand on exécute le code ActiveWindow.SelectedSheets.Delete
L'alerte habituelle d'Excel aparaît :
" Les feuilles sélectionnées seront supprimées définitivement.
- Pour supprimer définitivement les feuilles sélectionnées, cliquez OK.
- Pour annuler la suppression, cliquez sur Annuler. "
Est-il possible d'inclure la réponse "OK" dans la macro,
pour éviter à chaque fois la réponse manuelle ? - Comment ?
Merci, Bonne fin d'année et à l'année prochaine.
Michel





Publicité
Poster une réponse
Anonyme