Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 VBA effacer une plage de cellule

S

Sarah_f

XLDnaute Nouveau
Bonjour,

Je souhaiterai créer une VBA afin d'effacer le contenu des cellules "A10:T1048576"
Auriez vous un code VBA ?

Merci d'avance
 
Solution
Bonjour à tous,
Juste pour ajouter mon grain de sel :

ThisWorkbook.Worksheets("NomDeTaFeuille").Range("A10:T1048576").ClearContents

  • Il n'est pas requis de sélectionner les cellules avant de les effacer
  • Le ThisWorkbook permet de s'assurer que l'on travaille dans le bon classeur
  • Le Worksheets("NomDeTaFeuille") permet de s'assurer que l'on efface les cellules de la bonne feuille
Bonne journée !
Trier par date Trier par votes

blord

XLDnaute Impliqué
Bonjour à tous,
Juste pour ajouter mon grain de sel :

ThisWorkbook.Worksheets("NomDeTaFeuille").Range("A10:T1048576").ClearContents

  • Il n'est pas requis de sélectionner les cellules avant de les effacer
  • Le ThisWorkbook permet de s'assurer que l'on travaille dans le bon classeur
  • Le Worksheets("NomDeTaFeuille") permet de s'assurer que l'on efface les cellules de la bonne feuille
Bonne journée !
 
Vote positif 0 Vote négatif
Solution

Etoto

XLDnaute Barbatruc
Oui c'est vrai, ma macro supprimera les cellules de la feuille active, après va savoir si s'est un défaut ou un avantage pour @Sarah_f
 
Vote positif 0 Vote négatif

Eric C

XLDnaute Barbatruc
Bonjour le forum
Bonjour Sarah_f, bonjour Etoto, bonjour blord

Je rejoins blord dans son raisonnement ainsi que les grands de ce forum qui martèlent qu'il faut éviter au maximum les "select" afin d'optimiser le code et la rapidité...

Bonne journée à toutes & à tous
@+ Eric c
 
Vote positif 0 Vote négatif

Etoto

XLDnaute Barbatruc
Hello Eric
Eric C à dit:
il faut éviter au maximum les "select" afin d'optimiser le code et la rapidité...
Cliquez pour agrandir...
C'est sûr !! Je savais qu'il y'a des codes plus "performant" que celui-ci mais n'étant pas pro, je préfère proposé un code dont je suis certain qu'il fonctionne, mais si vous avez des codes meilleurs au miens, je ne demande que ça, en plus ça va me former.
 
Vote positif 0 Vote négatif

Eric C

XLDnaute Barbatruc
Re le fil

Je suis moi aussi, loin d'être un pro. Je me suis "amusé" avec VBA il y a bien longtemps pour me simplifier les tâches. Ton code peut être simplifié par :
VB: 
Range("Tes cellules").ClearContents

Bonne journée
 
Vote positif 0 Vote négatif

Etoto

XLDnaute Barbatruc
Oui c'est vrai, j'avais hésité a le prendre mais va savoir pourquoi, j'ai voulu suivre l'enregistreur de macros.
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

Q
  • Question
XL 2019 vba pour effacer résultat cellules de plusieurs fichiers a partir d'un fichier distant
Réponses
6
Affichages
192
Phil69970
A
  • Résolu(e)
XL 2019 Effacer une plage spécifique en VBA
Réponses
3
Affichages
343
Amilo
A
L
  • Résolu(e)
Microsoft 365 compter si une plage de cellules contient, 1 valeur toute les 3 lignes
Réponses
6
Affichages
224
laplayast
L
E
  • Question
Microsoft 365 effacer formule en fonction de ce qui a été saisi dans une autre cellule
Réponses
6
Affichages
373
Phil69970
D
  • Résolu(e)
Microsoft 365 Filtre avancé VBA multi-critères
Réponses
14
Affichages
431
DELHOMME
D
  • Résolu(e)
Microsoft 365 Problème sur bouton valider
Réponses
8
Affichages
381
Lolote83
L
F
  • Résolu(e)
Microsoft 365 Effacer le contenu si cellule suivante identique
Réponses
8
Affichages
422
fanch55
B
  • Question
XL 2016 Ramener une plage de données en fonction d'une cellule
Réponses
11
Affichages
364
JHA
J
A
  • Question
XL 2016 SpinButton et Plage Nommée
Réponses
11
Affichages
283
AlphaOne
A
B
  • Question
XL 2016 VBA - Ajout de consignes dans le corps d'un mail
Réponses
3
Affichages
198
kiki29
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…