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

MACRO : erreur boucle

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

rodrigues89

Guest
Bonjour tout le monde,

j'ai un petit problème avec ma macro que je n'arrive pas à faire fonctionner. Je vous explique :

j'ai deux données, Téléphone et mail en face de chacune de ces données j'ai une colonne "état" dans laquelle je renseigne l'état de la donnée (corrigée ou rejetée).

Dans le meilleur des mondes, il suffirait que je mette un téléphone en "corrigée" pour que dans la colonne "état" du mail j'ai "corrigée" qui s'inscrive.

Pour cette étape j'y suis presque à part que ma macro bug (voir PJ)

Mais j'aimerais aussi que si dans un premier temps j'ai renseigné une cellules avec "corrigée" et que je change pour "rejetée" ou rien, alors l'état "corrigée" au niveau du mail s'efface.

Est ce que quelqu'un à une idée ? merci d'avance pour toutes les propositions

Rodrigues
 

Pièces jointes

Trier par date Trier par votes
Re : MACRO : erreur boucle

Bonjour Rodrigues89

Pourquoi vouloir utiliser du code VBA quand tu peux faire ça simplement par formule
Code: 
=si(B2="Corrigée";"Corrigée";"")

A+
 
Vote positif 0 Vote négatif
Re : MACRO : erreur boucle

Merci Bruno M45,

mais je suis obligé d'utiliser du code parce que ma liste déroulante doit rester active car il est possible que l'utilisateur corrige le mail mais pas le téléphone.

quelqu'un a une idée ?
 
Vote positif 0 Vote négatif
Re : MACRO : erreur boucle

Salut

avec ta version, ajoute 3 lignes (sens TEL --> MAIL) :
Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim l As Long
    Application.EnableEvents = False
    For l = Cells.SpecialCells(xlCellTypeLastCell).Row To 1 Step -1
        If Cells(l, 2).Value = "Corrigée" Then Cells(l, 4).Value = "Corrigée"
        If Cells(l, 2).Value = "Rejetée" Then Cells(l, 4).Value = ""
    Next l
    Application.EnableEvents = True
End Sub
 
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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

A
  • Question Question
Microsoft 365 Macro pour recherche de cellules entre 2 fichiers Excel
Réponses
7
Affichages
537
AtTheOne
D
  • Résolu(e)
Microsoft 365 Macro pour rafraîchir les liaisons
Réponses
11
Affichages
829
AtTheOne
G
  • Question Question
Microsoft 365 Macro VBA - Excel
Réponses
12
Affichages
800
Dranreb
P
  • Résolu(e)
XL 2013 Creations de macro
Réponses
3
Affichages
646
PR.
P
M
  • Question Question
Microsoft 365 Colonne de la feuille 1 envoyer en une ligne sur la feuille 2
Réponses
0
Affichages
551
marcmarc
M
  • Résolu(e)
XL 2019 Erreur dans ma macro
Réponses
9
Affichages
884
Nadou69
  • Question Question
XL 2016 Macro erreur exécution
Réponses
8
Affichages
876
crackerwood
R
  • Question Question
XL 2013 fichier de comptage par scannage
Réponses
4
Affichages
947
soan
S
V
  • Résolu(e)
XL 2016 Facturier : Retour à la ligne sur la facture
2
Réponses
19
Affichages
2 K
Vermithor
V
C
  • Résolu(e)
Microsoft 365 Amélioration de mon code VBA
Réponses
9
Affichages
839
Cherrylie
C
A
  • Question Question
Microsoft 365 boucle macro pour importer des données
2
Réponses
16
Affichages
2 K
Arnaud Legay
A
V
  • Résolu(e)
XL 2021 Complétion d'un tableau automatisée
Réponses
9
Affichages
1 K
VincentH.DR
V
D
  • Résolu(e)
XL 2013 Macro Copier/Coller
Réponses
2
Affichages
824
soan
S
C
  • Question Question
XL 2016 rdv outlook et amélioration userform
Réponses
4
Affichages
972
CYRIL CAMPAS
C
D
  • Question Question
XL 2016 Macro centralisation de données
Réponses
3
Affichages
1 K
delsart59
D
R
  • Question Question
XL 2016 Envoi mails outlook avec pdf et mails via macro
2
Réponses
21
Affichages
4 K
fanch55
D
  • Question Question
XL 2016 [RESOLU] plusieurs demandes VBA sur fichier de suivi de téléphones
Réponses
3
Affichages
1 K
dupuy.mathias
D
B
  • Question Question
XL 2019 Afficher une barre de progression lors de l'exécution d'une macro d'un autre userform
Réponses
2
Affichages
2 K
Bana XIII
B
H
  • Résolu(e)
XL 2019 Boucle For...Each non fonctionnel et autres soucis de traitement
2
Réponses
15
Affichages
2 K
Staple1600
D
  • Question Question
XL 2019 Besoin d'aide sur diverses macros
2 3
Réponses
31
Affichages
4 K
darknigthmare
D
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…