Bouton d'effacement

[azazel42]

Bonsoir à tous!

Voila, j'aurais voulu intégrer un bouton pour effacer le contenu de ma feuille de calcul. Le problème, c'est que rien ne se passe....

Voila mon code:

Option Explicit

Private Sub CHKB_RAZ_TABLEAU_Click()
'
' Efface les données de la feuille
' Macro enregistrée le 21/01/2010 par
'
Range("E4,B7:C34,F7:F34,B37:C48,F37:F48,B57:C84,F57:F84,E54,B87:C98,F87:F98 ").Select " "
Selection.ClearContents
Range("E4").Select

End Sub

Private Sub Tableau_de_notes_Click()

End Sub


Private Sub CommandButton1_Click()

End Sub

Si quelqu'un peut me dire ce qui ne va pas.

 

[Excel-lent]

Re : Bouton d'effacement

Bonsoir Azazel42, le fil,


Il y a juste quelques espaces en trop et les guillemets en fin de ligne à supprimer et tout roule!

Version corrigé :

Private Sub CHKB_RAZ_TABLEAU_Click()
    Range("E4,B7:C34,F7:F34,B37:C48,F37:F48,B57:C84,F57:F84,E54,B87:C98,F87:F98").Select
    Selection.ClearContents
    Range("E4").Select

End Sub

Version corrigé et raccourci :

Private Sub CHKB_RAZ_TABLEAU_Click()

    Range("E4,B7:C34,F7:F34,B37:C48,F37:F48,B57:C84,F57:F84,E54,B87:C98,F87:F98").ClearContents

End Sub

Bonne fin de soirée

Edition : c'est bon au niveau de l'onglet? Sinon rajoute devant Sheets("nom de ton onglet").

 

[bambi]

Re : Bouton d'effacement

Petite question pour excel-lent et pour ma culture vba
La version corrigée raccourci est-elle plus rapide à l'éxécution que la version corrigée ?
Ou a -t-elle juste un intérêt de simplification du code ?
merci de ta réponse 😉

 

[Magickf]

Re : Bouton d'effacement

Un peu en retard mais bon...... Et peu être un trop simple mais ça marche. Il reste juste à créer un racourci bouton....

Sub EffacerTout()

'
Cells.Select
Selection.Clear
Range("A1").Select
End Sub

 

[Excel-lent]

Re : Bouton d'effacement

Bonsoir Bambi,

En effet, la version raccourci, en plus d'être plus facile à lire (car plus courte), est plus rapide.

Dans la macro d'origine, on sélectionne les cellules ...
Puis on dit quoi faire avec la sélection.

Alors que dans la version raccourci, on ne sélectionne pas les cellules, d'où un temps d'exécution plus rapide.

Bonne fin de soirée