Se connecter avec
S'enregistrer | Connectez-vous

vba excel problème d'éxecution de plusieurs macros

Dernière réponse : dans Programmation

Bonjour,

J'ai réalisé un ToggleButton pour cacher certaines colonnes, puis j'ai voulu faire une détection de changement de valeur.
Seulement lorsque les colonnes sont caché la détection ne fonctionne pas:
voici le code employé:
  1. Private Sub Ports_Click()
    

  2.  
  3. If Ports.Value Then
    

  4. Range("D:O, S:AD, AG:AR, AU:BF, BI:BT, BW:CH, CK:CV, CY:DJ, DN:DY").EntireColumn.Hidden = False
    

  5. Else
    

  6. Range("D:O, S:AD, AG:AR, AU:BF, BI:BT, BW:CH, CK:CV, CY:DJ, DN:DY").EntireColumn.Hidden = True
    

  7. End If
    

  8. End Sub
    

  9.  
  10.  
  11. Private Sub Worksheet_Change(ByVal Target As Range)
    

  12. If Target = Range("AF14") Then
    

  13. MsgBox Target.Address & "a changé"
    

  14. End If
    

  15. End Sub


Seriez vous s'il faut ajouter quelque chose au code afin qu'il fonctionne même avec des colonnes caché.

Merci d'avance

Autres pages sur : vba excel probleme execution plusieurs macros

Lassé par la pub ? Créez un compte
Expert Programmation

Comprends pas ton problème.

Voici de quoi te prouver que le problème n'est pas là :
  1. Private Sub Worksheet_Change(ByVal Target As Range)
    

  2.     If Target.Address = "$B$2" Then
    

  3.         MsgBox Target.Address & " a changé pour """ & Target.Value & """"
    

  4.     End If
    

  5. End Sub
    

  6.  
  7. Sub toto()
    

  8.     Range("B2").EntireColumn.Hidden = False
    

  9.     Range("B2").EntireRow.Hidden = False
    

  10.     Range("B2").Value = "pti"
    

  11.     Range("B2").EntireColumn.Hidden = True
    

  12.     Range("B2").Value = "ce"
    

  13.     Range("B2").EntireRow.Hidden = True
    

  14.     Range("B2").Value = "nts"
    

  15. End Sub


Tu m'excuseras d'avoir saucissonner ton pseudo :D 

Merci pour ta réponse, et navré pour la présentation du code.

J'ai ajouté le morceau concernant le bouton.

En gros lorsque j'utilise mon bouton pour cacher les colonnes, tous va bien.

Mais une fois les colonnes caché si je change la valeur dans l'adresse indiqué cela ne fonctionne plus.

en bref , colonne non caché, détection des changement de valeurs.

et si les colonne sont caché, la détection ne fonctionne pas.

A mon avis sa viens de la manière dont Excel recherche les colonnes, et lorsqu'elles sont cachés il est perdu :pt1cable: 

Lassé par la pub ? Créez un compte

Créer un nouveau sujet