Pb methode clear

Essaies ceci

Worksheets("Feuil1").Range("A1:G15").Clear

Bonjour Bigestman,

Chez moi ça fonctionne. Es-tu sûr que tes cellules (ou l'une d'elles) ne sont pas verrouillées ?

A+

José

Oups lea, collision...

Je précise que chez moi ça marche en copiant directement la syntaxe de Bigestman.

A+

José

Merci de ta reponse....

Ca tourne aussi chez moi mais avec la version 2000 donc je peux pas tester avec la version 97.

Tu as tester avec 97?

Les cellules sont verouilles effectivement.....je viens de m'en appercevoir.
Par contre avec 2000 ca ne pose pas de prob meme si c'est verouillé.

Si c'est ca....merci pour l'info....je tiens tout le monde au courant des demain....ou je pourrais tester

@ plus

Re Bigestman,

Oui j'ai testé avec 97. Par ailleurs quand je disais "verrouillées", je voulais dire cellules verrouillées ET feuille protégée.

1) Si ta feuille n'est pas protégée, ça doit marcher sur toutes les versions, que tes cellules soient verrouillées ou pas.
2) Si ta feuille est protégée et que tu arrives à faire un Clear sous 2000 (ou une autre version) c'est que vraiment tu as un "Bigest problem man" Lol !

Tiens moi au courant.

José

Bonsoir,

Je reprends le fil de la discussion
Je viens de tester avec Excel97, version que j'avais encore sur un ancien poste, ... et ça marche sans problème (évidemment la feuille n'étant pas protégée)
Léa

Bonjour tout le monde

Malheuresement pour moi ca ne parche toujours pas feuille non protege et cellule non verouille !!!!

A l'aide !!!!

le numero de l'ereur est 1004

MESSAGE:

La methode clear de la classe range a echoué

Je suis toujours dans l'inconnu....

Merci.....

Bonjour à tous

Essaie ClearContents au lieu de Clear . Je l'utilise couramment sans problème .

Bonne journée

Salut Bigestman,

Poste ton fichier. Zippé, moins de 50 ko, sans données personnelles.

A+

José

GAGNER !!!!!!

Bon ben j'ai enfin reussi a effacer les données...mais je pense que vous aller un peu halluciner comme moi d'ailleur.

De toute facon le problème ne viens pas du code....mais de office....l'installation a du etre foireuse ou je ne sais quoi d'autre.

Bref

Pour resoudre mon problème j'ai fait une macro que j'ai appelé "efface"

Sub efface()
' efface Macro
' Macro enregistrée le 21/01/2005 par MERY

Range("A1:G15").Select
Selection.ClearContents
End Sub

Pour infos j'avais deja utiliser le ClearContents sans resultat non plus.

et dans ma procedure sur click de bouton maintenant j'appele ma macro

Private Sub CommandButton1_Click()
call efface
End Sub

et la ca marche.....Rien de bien complique n'est ce pas?

par contre si je fais copier coller du code de la macro dans ma procedure evenementielle:

Private Sub CommandButton1_Click()
Range("A1:G15").Select
Selection.ClearContents
End Sub

ca ne marche plus....(sous 97)

Je precise que le bouton est sur la meme feuille ou j'efface les données...

Aller savoir pourquoi......la...j'en sais fichtre rien!
Mais bon j'ai au moins une solution.....avant de formater et de reinstaller toute les machines....

Merci a tout ceux qui se sont pencher sur mon problème

@ plus