Probleme Sheets.activate

[gainde936]

Bonjour,

Je suis nouveau sur ce forum et j'ai un petit problème avec Excel.

Je veut manipuler une feuille à partir d'une autre sans faire de Sheets.Activate ni de Sheets.Select.

Je ne veut pas qu'une autre feuille s'active à chaque fois qu'un utilisateur appui sur un bouton d'un formulaire sachant qu'il y a beaucoup de boutons à choisir..

Voici une partie de mon code:

Private Sub OptionButton1_Click()
'put cell 'G7' =1
Range("G7").Select
ActiveCell.FormulaR1C1 = "1"

Sheets("KBI").Activate
Sheets("KBI").Range("17:102").Select
Selection.EntireRow.Hidden = False
End Sub

 

[tototiti2008]

Re : Probleme Sheets.activate

Bonjour gainde936,

à tester :

ActiveSheet.Range("G7").Value = 1
Sheets("KBI").Range("17:102").EntireRow.Hidden = False

 

[gainde936]

Re : Probleme Sheets.activate

Merci beaucoup !!!

ça marche .

 

[tototiti2008]

Re : Probleme Sheets.activate

Re,

de rien. Beaucoup d'actions ne nécessitent pas d'Activate ou de Select. Le mieux est d'essayer sans et de l'ajouter seulement si c'est indispensable.