Affichage Combobox

Bonjour à tous

La combobox CboTblBdd_Sectexploit est activex, elle es alimentée dans ses propriétés par:

ListFilRange LSect_Exploit

Ce code me permet de faire un filtre et de pouvoir le supprimer rapidement.

  'PROCEDURE FILTRE  SUR SECTEUR EXPLOITATION DEPUIS CHOIX EN "CboTblBdd_Sectexploit"  Ds FEUILLE "TABLEAU DE BORD"

Private Sub CboTblBdd_Sectexploit_Change()

    If Not CboTblBdd_Sectexploit Is Nothing Then

         Range("B8").AutoFilter Field:=1, Criteria1:=CboTblBdd_Sectexploit

    End If

End Sub

            'PROCEDURE SUPPRESION FILTRE  SUR SECTEUR EXPLOITATION Ds "FEUILLE TABLEAU DE BORD"

Private Sub Btn_TbdClFiltB8_Click()
          [B8].AutoFilter Field:=1
End Sub

Jusque la cela fonctionne parfaitement.

C'est maintenant que je bloque

J'ai placé ce code:

Private Sub Worksheet_Activate()

CboTblBdd_Sectexploit.Value = "Select Zone" 'Force affichage ds Combobox Secteur exploitation pour affichage "Select Zone" 'B8].AutoFilter Field:=1 'Désactive le filtre

Car pour ce code il m'empêche de faire autre chose.

Je n'ai pas de bug de VBA

Avez vous une idée Svp

Merci de votre aide

Bonne journée

Ledzep

Bonjour Ledzep,

à tester,

Private Sub Worksheet_Activate()
Application.EnableEvents = False
CboTblBdd_Sectexploit.Value = "Select Zone"
Application.EnableEvents = True
[B8].AutoFilter Field:=1
End Sub

Bonjour i20100

Merci pour ton aide, j'ai testé cela est parfait.

Petite question.

Application.EnableEvents = False

Application.EnableEvents = True

Désactive un événement

Active un événement

C'est pour cela que j'avais un soucis ?

Peux tu me préciser si j'ai fait la bonne analyse stp

Merci

Ledzep

Bonjour Ledzep,

c'est bien ça, tu as tout compris

Parfait au moins je progresse

Je continue mon projet,

J'ai d'autres soucis, mais je n'ai pas encore exploré d'autres solutions. (je préfère encore chercher)

Mais pour celui ci c'est résolu

Bonne journée à toi, et j’espère te retrouver bientôt pour ton aide sur le forum

Ledzep

Merci pour ce retour, au plaisir!

resolu2
Rechercher des sujets similaires à "affichage combobox"