Comment EFFACER une feuille entière à l’aide de VBA ?
Pour effacer une feuille entière à l’aide d’un code VBA en une seule fois, vous devez utiliser deux choses, la première est la méthode CLEAR, puis CELLS pour faire référence à toutes les cellules d’une feuille de calcul.
Effacer la feuille active
Disons que si vous voulez effacer tout le contenu de la feuille d’activation, le code serait comme ci-dessous.
Cells.Clear
Lorsque vous exécutez ce code, il effacera tout de toutes les cellules de la feuille active, comme je l’ai déjà mentionné, nous avons utilisé clear pour faire référence à la feuille de calcul entière et clear pour l’effacer.
Effacer une feuille spécifique
Il y a une chose que vous devez noter que pour effacer une feuille, cette feuille doit être activée. Alors disons que vous voulez effacer le « Sheet1 », le code serait comme:
Sheets("Sheet1").Activate
Cells.Clear
Dans ce code, la première active la « Feuille1 » et la deuxième ligne efface tout.
Autres choses à effacer
Vous pouvez également utiliser les méthodes ci-dessous pour effacer différentes choses.
Cells.ClearContents 'to clear contents
Cells.ClearComments 'to clear Comments
Cells.ClearFormats 'to clears formatting
Cells.ClearHyperlinks 'to clear hyperlinks
Cells.ClearNotes 'to clear notes
Cells.ClearOutline 'to clears outline
Effacer une feuille d’un classeur spécifique
Le code ci-dessous peut faire référence au classeur « Book1 » et effacer la feuille « Sheet1 ». Mais assurez-vous que le classeur est ouvert au moment de l’exécution de ce code .
Workbooks("Book1").Sheets("Sheet1").Activate
Cells.Clear
Ce code active d’abord la « Feuille1 » du livre et l’efface.
Effacer une feuille d’un classeur fermé
Et dans le code ci-dessous, nous avons fait référence à « Sheet1 » du classeur « sample-file », stocké dans un emplacement spécifique.
Sub vba_clear_sheet()
Dim wb As Workbook
Application.ScreenUpdating = False
Set wb = Workbooks.Open("C:\Users\Dell\Desktop\sample-file.xlsx")
wb.Sheets("Sheet1").Activate
Cells.Clear
wb.Close SaveChanges:=True
Application.ScreenUpdating = False
End Sub
Tutoriels associés
- Copier et déplacer une feuille dans Excel à l’aide de VBA
- COUNT Feuilles utilisant VBA dans Excel
- SUPPRIMER une FEUILLE en utilisant VBA dans Excel
- Masquer et afficher une feuille à l’aide de VBA dans Excel
- PROTÉGER et DÉPROTÉGER une feuille à l’aide de VBA dans Excel
- RENOMMER une feuille en utilisant VBA dans Excel