code pour effacer cellules

[thefa]

Bonjour a tous !!!

Quel est le code qui me permette d'incrementer de 1(rajouter 1 a la valeur) une cellule et en méme temps d'effacer le contenu de certaines cellule ...tout cela a partir d'un bouton

Merci d'avance !!

 

[Robert]

Salut le forum, Salut Thefa,

je pense que cela devait marcher. Pour incrémenter :

cells(numéro de ligne,numéro de colonne).value=cells(numéro de ligne,numéro de colonne).value+1

pour effacer il faut d'abord que tu definnisses les cellules à effacer :

Range("cellule:cellule").Select (si tes cellules se touchent)
Selection.ClearContents (n'efface que le contenu) ou
Selection.Clear (efface tout)

Robert