Supprimer toutes les lignes endessous d'une
drumer57
Messages postés
77
Date d'inscription
Statut
Membre
Dernière intervention
-
PlacageGranby Messages postés 393 Date d'inscription Statut Membre Dernière intervention -
PlacageGranby Messages postés 393 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai un petit soucis. j'ai créé une feuille où j'aimerais supprimer tout les composants d'un tableau une fois l'impression terminé, sauf les intitulés. Je ne sais pas trop comment faire pour dire que à partir d'une certaine ligne , ca supprime tout en dessous.
J'ai un petit soucis. j'ai créé une feuille où j'aimerais supprimer tout les composants d'un tableau une fois l'impression terminé, sauf les intitulés. Je ne sais pas trop comment faire pour dire que à partir d'une certaine ligne , ca supprime tout en dessous.
A voir également:
- Supprimer toutes les lignes endessous d'une
- Supprimer rond bleu whatsapp - Guide
- Supprimer une page word - Guide
- Comment supprimer une application préinstallée sur android - Guide
- Supprimer pub youtube - Accueil - Streaming
- Fichier impossible à supprimer - Guide
2 réponses
Bonjour
Voila une suggestion.
Intégrer l'impression au code au lieu de passer par les menu.
Demander si l'impression est réussi (car si on annule l'impression le code delete les lignes quand même).
Voila une suggestion.
Intégrer l'impression au code au lieu de passer par les menu.
Demander si l'impression est réussi (car si on annule l'impression le code delete les lignes quand même).
Sub Impression()
Application.Dialogs(xlDialogPrint).Show
If MsgBox("Est-ce que l'impression s'est bien déroulé ?", vbYesNo, "Demande de confirmation") = vbYes Then
Rows("2:3").Delete
End If
End Sub
