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

Pb Macro automatique

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion gds35
  • 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 !

S'inscrire

gds35

XLDnaute Impliqué
Mes AMIS du forum Bonjour , et bonne journée.

Je suis en train de construire une macro dans laquelle si une cellule contient une certaine valeur et qu'une autre contient une autre valeur <> de "" , activer une autre feuille dans le classeur . Impossible d'y arriver . Pouvez vous m'aider ??
Je joins un fichier. D'avance merci Cordialment GDS35
 

Pièces jointes

Trier par date Trier par votes
Re : Pb Macro automatique

gds35 à dit:
Merci a papou-net cela fonctionne ss pb
cordialement gds35
Cliquez pour agrandir...

De rien.

Tu peux aussi simplifier le code de cette façon :

Code: 
Private Sub WorkSheet_Change(ByVal Target As Range)
'
If Range("C" & Target.Row) = "" Or Range("F" & Target.Row) = "" Then Exit Sub
Select Case Range("C" & Target.Row).Value
  Case 45
    Sheets("PARTSOC").Select: MsgBox ("feuille PARTSOC DEBIT")
  Case 46
    Sheets("ECACEF").Select: MsgBox ("feuille ECACEF DEBIT")
  Case 47
    Sheets("LIVDEVDUR").Select: MsgBox ("feuille LIVDEVDUR DEBIT")
  Case 48
    Sheets("LIVDEVDUR").Select: MsgBox ("feuille FIDELIS DEBIT")
  Case 50
    Sheets("PENSION").Select: MsgBox ("feuille PENSION")
  Case 55
    Sheets("LIVDEVDUR").Select: MsgBox ("feuille PART CREDIT")
  Case 57
    Sheets("ECACEF").Select: MsgBox ("feuille ECACEF CREDIT")
  Case 58
    Sheets("LIVDEVDUR").Select: MsgBox ("feuille LIVDEVDUR CREDIT")
  Case 59
    Sheets("LIVDEVDUR").Select: MsgBox ("feuille FIDELIS CREDIT")
End Select
End Sub

C'est plus structuré et moins sujet à erreur d'écriture que des If...Then...Else empilés (et peut-être aussi plus rapide.

Cordialement.

PS : attention, il me semble que tu as des incohérences dans tes noms de feuilles ?
 
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

M
  • Résolu(e)
XL 2021 Récupérer la valeur d’une cellule dans un classeur fermé
Réponses
5
Affichages
167
patricktoulon
  • Résolu(e)
XL 2021 Extraction images depuis commentaire de cellule vers dossier.
11 12 13
Réponses
182
Affichages
3 K
patricktoulon
P
  • Question Question
XL 2021 Ajout/adaptation de code VBA sur feuille qui en contient déjà
Réponses
3
Affichages
197
Pierreavecunp
P
O
  • Question Question
Autres recopie de cellules selon la date
Réponses
3
Affichages
239
olivier Clech
O
E
  • Question Question
XL 2016 Liste déroulante "pré-chargée"
Réponses
10
Affichages
253
sylvanu
F
  • Question Question
Microsoft 365 Problème avec VBA ( Résolu)
Réponses
2
Affichages
413
firecarl
F
A
  • Question Question
XL 2019 VBA newbie
3 4 5
Réponses
72
Affichages
1 K
job75
J
  • Question Question
Microsoft 365 Mini macro en VBA
Réponses
1
Affichages
228
jderoque
J
T
  • Résolu(e)
Microsoft 365 pb effacement macro
Réponses
8
Affichages
585
Themax
T
C
  • Résolu(e)
XL 2021 Macro dans Macro
2
Réponses
26
Affichages
2 K
Constantin
C
C
  • Question Question
Microsoft 365 macro copie de feuilles (avec formules à adapter)
Réponses
9
Affichages
264
caseras
C
T
  • Résolu(e)
XL 2013 Harmoniser valeur de cellules selon 2 variables
Réponses
4
Affichages
244
Thomas75
T
H
  • Résolu(e)
Microsoft 365 Archivage automatique sous condition (Macro)
Réponses
2
Affichages
598
HugoLaChips
H
A
  • Question Question
Microsoft 365 Macro pour recherche de cellules entre 2 fichiers Excel
Réponses
7
Affichages
224
AtTheOne
J
  • Résolu(e)
Microsoft 365 lettre suivante
Réponses
5
Affichages
479
sylvanu
P
  • Question Question
XL pour MAC MAC OS - question sur macro VBA pour gestion fichier budget
Réponses
0
Affichages
107
pamino
P
J
  • Question Question
Microsoft 365 macro qui ouvre des fichiers excel de type "analyze in excel" généré par power bi et met à jour un filtre "mois" sur plusieurs tcd
Réponses
0
Affichages
343
JJ69
J
  • Résolu(e)
Microsoft 365 Remplir une cellule avec la valeur d'une autre sous condition
Réponses
2
Affichages
489
Droopyougo
  • Question Question
Microsoft 365 Curiosité : enregistrement impossible à cause de la liste des erreurs (#NUL!, #DIV/0!, #REF!, etc.)
Réponses
1
Affichages
456
Simply
EXCEL :: TCD :: SEGMENTS :: Identifier l'élément sélectionné dans le segment :: Modifier dynamiquement la valeur d'un segment :: VBA
Réponses
1
Affichages
324
oguruma
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…