Pb methode clear

[Bigestman]

Bonjour

Je souhaite utiliser l'instruction suivante :

thisworkbook.sheets(1).range("A1:G15").clear

Jusque'ici pas de problème, normallement ca doit effacer le contenu des cellule de la plage A1 G15 de la feuille numero 1.

Cette instruction fonctionne tres bien avec Excel 2000 mais lorsque je la teste avec Excel 97....la ca plante....
Visiblement la methode Clear de peux pas etre appliqué a la methode Range....
Chose bizard puisque c'est dans l'aide tel que.....

Si quelqu'un a une idée pour reglé le problème car la vraiment....je coince....

Existe t il une alternative a la methode Clear?

Merci de votre aide......

 

[lea]

Essaies ceci

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

 

[jmps]

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é

 

[jmps]

Oups lea, collision...

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

A+

José

 

[Bigestman]

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

 

[jmps]

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é

 

[lea]

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

 

[bigestman]

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.....

 

[bricolo]

Bonjour à tous

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

Bonne journée

 

[jmps]

Salut Bigestman,

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

A+

José

 

[Bigestman]

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