Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.
  • Initiateur de la discussion Initiateur de la discussion Boby71C
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Boby71C

XLDnaute Impliqué
Bonjour à tous
J'ai une case à cocher dans un UserForm.
Avec le code que j'ai renseigné, lorsque je coche la case, je n'arrive pas à rester sur ma feuille ('Ouverture') ça m'nméne sur la feuille de résultats.
Voici mon code:

Private Sub FC_Standard_Click()
Sheets('Galaxis').Select
Range('F36:G49').Select
With Selection.Interior
.ColorIndex = 48
End With
Range('E20').Activate

End Sub

Pourriez-vous me venir en aide. Je ne peux pas joindre mon fichier qui est trés volumineux.

Merci pour votre aide.
@+
 
Salut,


J'ai pas testé mais ça pourrait se simplifier comme ça :

Private Sub FC_Standard_Click()
[Galaxis!F36:G49].Interior.ColorIndex = 48
[Ouverture!E20].Activate
End Sub

AV [aaa]
 
bonjour Bobby,Av

oublie les select

Private Sub FC_Standard_Click()

With Sheets('Galaxis')
.Range('F36:G49').Interior.ColorIndex = 48
End With

With Sheets('Ouverture')
.Range('E20').Activate
End With

End Sub
à bientôt
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Microsoft 365 Probléme VBA
Réponses
8
Affichages
595
Réponses
7
Affichages
375
Réponses
6
Affichages
644
Réponses
4
Affichages
589
  • Question Question
Microsoft 365 Export données
Réponses
4
Affichages
906
Réponses
2
Affichages
772
Réponses
3
Affichages
883
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…