Contenu récent par LoubnaHhch

Je vous remercie de votre aide :) J'aimerais juste savoir pourquoi Sub Zonecombinée1_QuandChangement() et non pas Sub Zonecombinée2_QuandChangement() ? Parce que là j'ai recopié dans mon fichier original et ça marche toujours pas, je ne sais plus quoi faire, c'ets la mm chose que je vous ai déjà...

Ci-joint le fichier :)

Merci, meilleurs vœux à vous aussi :) J'ai copié collé le code dans Module et ça marche pas, pourtant ça marche dans votre fichier. Je ne comprend rien :(

Merci beaucoup pour votre aide. J'ai repris la mm chose que vous, mais le code ne marche pas avec mon fichier, je ne sais pas s'il y a quelque chose qui m'échape

Je vous remercie de votre aide Je vous ci-joint un fichier excel avec ce que j'aimerais réaliser. Vous trouverez l'onglet : "Main" Quand la valeur de la cellule B1 de cet onglet est égale à 23, l'onglet "Masque" doit disparaitre.

Bonjour tout le monde, j'ai une macro qui doit me masquer un onglet en regardant la valeur d'une cellule qui change de valeur avec une formule. Voilà mon code : ----------------------------------------------- Private Sub Worksheet_Change(ByVal Target As Range) Dim KeyCells As Range If Not...

Dans mon code : La première boucle était du coup pour vérifier si j'avais une valeur dans la cellule R1 et je change la valeur d'une cellule de la plage F1 à Q1, il faut affecter zéro à la cellule R1; La deuxième boucle, si j'avais des valeurs dans les cellules de la plage F1 à Q1, et je...

Merci @mapomme , j'ai essayé du coup d'insérer Application.EnableEvents dans mon code mais la seconde boucle de mon code ne fonctionne plus maintenant :( ---------------------------------------------- Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False...

Bonjour tout le monde, j'ai un petit code qui m'affiche (pas tout le temps) l'erreur 28 : Espace de pile insuffisant. Voilà mon code : -------------------------- Début Code --------------- Private Sub Worksheet_Change(ByVal Target As Range) For i = 3 To 357 If Not...