[XL-2000] deselection simultanée d'onglets multiples [Résolu]

[yoyo3d]

Bonjour, pour automatiser le nettoyage sur plusieurs onlget (sheets), j'ai fait une selection multiple:

Code :

Sheets(Array("01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12")).Select

ensuite je fait le nettoyage des feuille, j'enregistre et je ferme mon classeur, et cela fonctionne parfaitement.

Mais...toutes mes feuilles restent selectionnées...(je voudrais revenir sur ma 1ere feuille)

avec un

Code :

Sheets("01").Range("A13").select

par exemple, sauf que cela ne me deselectione pas les autres feuille...

une idée SVP merci

[Ormonth]

Bonjour,

Code :

1
2
3
4
With Sheets("01")
  .select
  .Range("A13").select
end with

Cordialement,

Ps : si question résolue, pensez à la taguer résolue, et selon que technique = OK ou pas => cliquez sur les pouces

Didier

[yoyo3d]

Bon effectivement ça marche, il y à cette solution et je n'y avais pas pensé, je suis resté bloqué sur le fait de trouver une methode liée à l'objet worksheets...

genre:

Code :

sheets("01").selected ou activate =false

...

en tout cas, encore merci...

P.S: j'ai cliqué sur le pouce +1, mais je ne vois pas de résultat sur ton méssage...