ou est l'erreur , vba

Sofhy

XLDnaute Occasionnel

• 23 Juillet 2010

• #2

Re : ou est l'erreur , vba

Bonjour,

Pas assez confirmée en Vba pour corriger ton code, mais tu peux utiliser ceci pour effacer tout le contenu de la feuille 1.

Code:

Sub effect()
    Sheets("Feuil1").Cells.Select
    Selection.Clear
End Sub

A++
Sofhy

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 23 Juillet 2010

• #3

Re : ou est l'erreur , vba

Salut,

Ah ben non ... c pas ça du tout ...

Erreur dans le code pour commencer

Code:

Sheets("feuil1").Range("A[COLOR=red][B]1[/B][/COLOR]" & Rows.Count).End(xlUp)

Ensuite

Code:

Sheets("feuil1").Range("A" & Rows.Count).End(xlUp)

Permet de déterminer la dernière cellule remplie de la colonne "A"
Mais il faut ajouter .Row à la fin pour récupérer le numéro de ligne

Pour effacer tout les cellules de la feuilles

Code:

Sheets("Feuil1").Cells.ClearContents

A+

Edit : oups y'a du monde sur le fil ... bonjour à tous
IL SERAIT SYMPA D'EXPLIQUER LE POURQUOI EGALEMENT !

 

Dernière modification par un modérateur: 23 Juillet 2010

Vote positif 0 Vote négatif

V

VBA_première_fois

XLDnaute Junior

• 23 Juillet 2010

• #4

Re : ou est l'erreur , vba

salut
o fait moi je ne souhaite pas effacer toutes les cellules de ma feuille ,
d'ailleur je voulais garder les lignes , 1,2,3,4 et 5 intacte ( car elles contiennent des données fixes)
du coup si je corrige mon code ça donne

HTML:

Sheets("feuil1").Range("A" & Rows.Count).End(xlUp).Row

mais comment faire pour garder lignes 1,2,3,4 et 5 ? (selectionner puis supprimer tout sans les toucher)
a+

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 23 Juillet 2010

• #5

Re : ou est l'erreur , vba

Re,

Masterdisco, si je puis me permettre petite une petite rectification

Code:

Sheets(1).Range("6:" & [B][COLOR=blue]Rows.Count[/COLOR][/B]).ClearContents

Rows.Count Suffit

Merci pour les explications

A+

 

Vote positif 0 Vote négatif

V

VBA_première_fois

XLDnaute Junior

• 23 Juillet 2010

• #6

Re : ou est l'erreur , vba

masterdisco merci pour les explications , ça m a permis d'ouvrir les yeux sur des erreurs dans tout mon code

BrunoM45

a+

 

Vote positif 0 Vote négatif