Discussion :

[juju05]

Bonjour,

Je souhaite supprimer les valeurs contenues dans une feuille nommée "TRT".

La macro est lancée depuis une feuille nommée 'PO'.

J'ai codé:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Worksheets("TRT").Activate
 
   Cells.ClearContents

L'activation de la macro. vide la feuille nommée 'PO'.

Je ne comprends pas pourquoi.

[Philippe Tulliez]

Bonjour,

L'activation de la macro. vide la feuille nommée 'PO'.
Je ne comprends pas pourquoi.

J'avoue ne pas comprendre non plus mais il est inutile de passer par la méthode Activate et de plus pour éviter un message d'erreur si le classeur actif ne contient pas de feuille nommée [TRT], il est préférable de préciser l'objet parent de la feuille comme par exemple.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Thisworkbook.Worksheets("TRT").Cells.ClearContents

[Nako_lito]

Et avec juste

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Thisworkbook.Worksheets("TRT").Cells.Clear

[Marc-L]

Bonjour, Bonjour !

L'activation de la macro. vide la feuille nommée 'PO'. Je ne comprends pas pourquoi.

Le VBA ne se trompant jamais, c'est donc une erreur de conception (voir correction du post précédent)
et je comprends très bien pourquoi surtout si le code n'est pas situé dans un module standard
mais dans le module de la feuille PO ! …

[Nako_lito]

Si tu utilise juste Cells(x,y) il va faire référence à la feuille d'ou est lancé la macro.
Donc si le code est dans la feuille PO, tu auras beau activer la feuille TRT, le code s'exécute quand même depuis PO donc vide ses cellules.

Deux options : soit tu mets le code dans la feuille TRT et tu laisse tel quel et dans ce cas, ça supprimera effectivement bien les cellules de TRT, soit tu fais une référence à la feuille TRT plus absolue (voir mon post précédent).

Faire un .Activate sur une feuille ne fait que la rendre active, donc modifiera le comportement pour tout ce qui est code du genre "activesheet", "activewindow", "selection" ... etc ... etc ...

Tu as peu être confondu avec du code trouvé sur le net ou ils mettaient

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
worksheet("toto").activate
with activewindow
.cells.clear
end with

Dans ce cas là, effectivement, ca supprimera bien les cellules de ta feuille active.
La différence entre ce code et le tiens --> le "." qui précède Cells, et il fait toute la différence.