RESOLU - Selectionner feuille sans .Select

[castor30]

Bonjour le forum,
Ma question est dans le texte, car je vois fréquemment qu'il faut éviter les .Select et .Activate
Comment faire alors ?
En vous remerciant.

 

[mapomme]

Bonjour castor30,

(...) Ma question est dans le texte, car je vois fréquemment qu'il faut éviter les .Select et .Activate
Comment faire alors ? (...)

Il faut les éviter quand c'est possible, soit dans la grande majorité des situations mais pas toutes. On peut les éviter en suffixant les références des range. ex : a= sheets("Toto").range("a1").

Si on a beaucoup à faire sur la feuille toto, on peut utiliser le With ... End With.

With sheets("toto")
   n = .cells(.rows.count,"a")
   .range("A:D" & n).sort .range("a1"), header:=xlyes
end with

En utilisant l'aide d'Excel VBA. Les instructions peuvent comporter des paramètres de destination.
Au lieu de :

Activesheet.range("A1:A10") .copy
  sheets("toto").select
   range("C1").select
  activesheet.paste

On peut écrire :

Activesheet.range("A1:A10") .copy Sheets("toto").range("C1")

 

[phlaurent55]

Re-Bonjour Castor, Mapomme

je vois fréquemment qu'il faut éviter les .Select et .Activate
Comment faire alors ?

C'est vrai que cette réflexion apparait souvent mais il faut la replacer dans son contexte

Pour les débutants, il est facile d'utiliser l'enregistreur de macros mais il est bon de faire ensuite un peu de "nettoyage" dans le code fourni
En effet, pendant l'enregistrement, tous les déplacements que tu fais sur la feuille se retrouvent dans le code sous la forme de "Select".
La macro va cependant fonctionner mais tu vas voir toutes les sélections de cellules à l'écran et c'est désagréable.

Voici un petit exemple sous forme d'image

à+
Philippe

 

[castor30]

Un grand merci à vous deux , je vais rectifier certains codes.
Bon Week-end

 

[Yurperqod]

Bonjour à tous

Dans l'exemple en image
Dans les codes de remplacement, c'est plutot: [B6]=123 et [C3].Interior.Color=RGB(0,0,0) qu'ont devrait voir, non ?