!!! Feuille active !!!

  • Initiateur de la discussion Initiateur de la discussion fabrice
  • 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 !

F

fabrice

Guest
Bonjour tout le monde

Je suis actuellement tres embeté avec une feuille d'excel. En effet, dans celle-ci, si je rentre un nombre dans la cellule A1, tous mes calculs s'éxécutent. Or il m'arrive souvent d'oublier de supprimer le nombre de la cellule A1. J'ai trouver un truc pour mettre le nombre en A quand la feuille est active mais pas pour le supprimer si la feuille n'est plus active. Comment faire???

Merci de votre aide

FAB
 

Pièces jointes

Bonjour Mr Fab !

Alors toujours en train de trifouiller VBA ... C'est un plaisir de te répondre à cette question simple où je n'ai même pas besoin du fichier ! Du coup tu peux même gérer quand tu es dans la feuille et quand tu n'y es pas !!

Essaie par ThisWorkbook... Tu devrais y arriver !

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If ActiveSheet.Name <> "Feuil1" Then
Sheets("Feuil1").Range("A1") = ""
Else
Sheets("Feuil1").Range("A1") = 10
End If
End Sub

Bon Après Midi
@+Thierry
 
Arf

Bonjour Popeye, oui bien sûr l'évènement Worksheet_Deactivate est efficace et convient parfaitement aussi dans ce contexte.

Par contre moi j''ai été trop vite car dans ce contexte, il faut évidemment l'évènement :

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If ActiveSheet.Name <> "Feuil1" Then
Sheets("Feuil1").Range("A1") = ""
Else
Sheets("Feuil1").Range("A1") = 10
End If
End Sub

et pas Workbook_SheetChange...

Bon Aprèm
@+Thierry
 
Salut Fab

Tu parles de mon post de 23-04-03 14:23 ?
ou de mon post de 23-04-03 13:52 ?

Le second est celui que tu dois utiliser, c'est moi qui ait fair une C.. dans le premier post !! (Chuuuut !) lol

@+Thierry
 
Salut grand chef.

Je ne sais plus le quel g copié. il me semble que c'était le 2nd mais comme je n'en suis pas sur... (dans le doute, abstients toi!!!). J'ai utilisé en attendant la sol de Popeye.

Merci encore
FAb
 
tiens en passant thierry
j'ai télécharger ton application web sous vb pour le forum
pas moyen de voir le code
il me met que c impossible
j'ai oublié un truc ou bien c parce que je suis sous excel 97???
 
Salut Popeye

Oui c'est Excel 97, mes projets ont en général une signatre électronique, et c'est ça qui bloque.

Si tu veux, je t'envoie en bal les fichiers que tu veux non-signé....

Fais moi juste la liste !

Bonne Nuit ou Journée
@+Thierry
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Retour