Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

[VBA] petit soucis avec liste déroulante et Worksheet_Change

Créer une discussion

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 !

S'inscrire
H

housemiouzic

XLDnaute Nouveau
Bonjour tout le monde,

j'ai une petite question à propos de mon travail sur Excel, je m'explique :
- j'ai 2 listes déroulantes issues du contrôle de formulaire que j'initialise avec deux de mes colonne (ex : D1😀15 pour liste1 et E1:E15 pour liste2) et je mets B1 en cellule liée pour liste1 et B2 pour la liste2, j'aimerais qu' en fonction de la valeur de cette cellule liée, un action se réalise pour l'exemple on va prendre une MsgBox

voici mon code :
Code: 
Private Sub Worksheet_Change(ByVal Target As Range)

  Select Case Target.Address(0, 0)
  Case "B1"
    MsgBox ("test B1")
  Case "B2"
    MsgBox ("test B2")
  End Select

End Sub

Le problème est que si je modifie manuellement B1 ou B2 j'ai bien mes msgBox mais quand je joue avec mes listes déroulantes, les valeurs changent bien mais je n'ai pas mes msgbox !

Est ce que quelqu'un a une idée?

merci d'avance.
 

Pièces jointes

Dernière édition:
Trier par date Trier par votes
Re : [VBA] petit soucis avec liste déroulante et Worksheet_Change

Bonjour et Bienvenue,

Peut-être avec un extrait de ton fichier ???

Voir Lien supprimé 3-c pour information 🙂

Bonne journée
 
Vote positif 0 Vote négatif
Re : [VBA] petit soucis avec liste déroulante et Worksheet_Change

Re,

Pas sur d'avoir compris... et loin de là😱

essaye ce fichier

si pas conforme

1 Désolé je n'ai pas compris
2 reformule pour que je puisse (nous puissions) comprendre

Bonne journée
 

Pièces jointes

Vote positif 0 Vote négatif
Re : [VBA] petit soucis avec liste déroulante et Worksheet_Change

Salut

Supprmier l'évenement "Change"

Dans un Module Standard :
Code: 
Sub Un()
  MsgBox "test B1"
End Sub
Sub Deux()
  MsgBox "test B2"
End Sub

Sur la feuille, clic bouton droit sur chaque liste, sélectionner "Affecter une macro ..." et choisir celle correspondante.
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

B
  • Résolu(e)
Microsoft 365 Besoin d'aide pour faire fonctionner 2 codes VBA ensemble
Réponses
2
Affichages
388
BenExcel
B
M
  • Question Question
XL 2016 Impression d'un rapport PDF depuis une URL avec VBA
Réponses
3
Affichages
946
mrcooll
M
  • Question Question
XL 2021 Exportation feuille msgbox yes no avec module Thisworkbook
2
Réponses
21
Affichages
2 K
Nicolas JACQUIN
I
  • Résolu(e)
Microsoft 365 VBA EXCEL Utilisation d'une variable avec données dans un tableau
Réponses
4
Affichages
954
mapomme
B
  • Résolu(e)
Microsoft 365 VBA - Masquer/Afficher des lignes selon liste déroulante
Réponses
2
Affichages
4 K
babooche
B
  • Résolu(e)
XL 2016 VBA - Récupérer chemin du dossier "Téléchargements"
Réponses
5
Affichages
4 K
Deadpool_CC
P
  • Question Question
Autres ActiveCell.Offset
Réponses
4
Affichages
1 K
Papychou56
P
S
  • Question Question
Microsoft 365 Liste dérourante excel à recréer avec une valeur affectée par défaut
Réponses
1
Affichages
951
Dudu2
B
  • Question Question
Microsoft 365 Charger nombre variable de tableaux Query avec VBA
Réponses
6
Affichages
2 K
bluesky12000
B
  • Résolu(e)
XL 2016 Optimisation MACROS
2 3
Réponses
38
Affichages
5 K
Michest94
L
  • Question Question
XL 2013 index pour report de données via liste déroulante
2
Réponses
21
Affichages
3 K
Dugenou
M
  • Question Question
XL 2016 Code VBA pour copier/coller formats, liste et formules
Réponses
5
Affichages
2 K
Robert
  • Question Question
Microsoft 365 Valeur d'une liste dans la requête ADODB
2
Réponses
27
Affichages
2 K
VBA_dev_Anne_Marie
C
  • Question Question
Autres calcul distance avec google map et vba excel 2007
Réponses
4
Affichages
4 K
sylvanu
  • Question Question
XL 2010 Combiner deux codes dans Worksheet_Change
Réponses
3
Affichages
828
thunder23
B
  • Question Question
filtrer avec plusieurs critères en VBA
4 5 6
Réponses
82
Affichages
12 K
blancolie
B
L
  • Question Question
XL 2019 VBA - Renommer des fichiers avec Name (ancienne et nouvelles valeurs dans une table)
Réponses
5
Affichages
2 K
Dranreb
F
  • Question Question
XL 2013 VBA - Coder une liste déroulante avec sélection multiple et conditions
Réponses
1
Affichages
1 K
CHALET53
C
K
  • Question Question
XL 2016 Comment fusionner 2 Private Sub Worksheet_Change(ByVal Target As Range) ?
Réponses
3
Affichages
2 K
Kmi
K
K
  • Question Question
XL 2019 VBA - Récupération de données de plusieurs fichiers avec chemins différents
Réponses
1
Affichages
1 K
Jacky67
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…