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

VBA : lancer une macro si une cellule d'un tableau est modifiée

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
J

Jurassix

XLDnaute Nouveau
Bonjour a tous,

J'aurai voulu savoir s'il est possible de lancer une macro dans le cas ou une cellule d'un tableau est modifiée.

J'ai un tableau ou des données sont saisies par des opératrices. A la fermeture du classeur, les données sont exportée vers un autre tableau qui compile l'ensemble des données.
Le tableau de saisie comporte une colonne, avec un "X" si la donnée a été exportée, si bien que si une nouvelle ligne du tableau est saisie, la macro n'exportera que celle ci.
Mais quid si une ligne existante est modifiée? Elle aura un "X", donc ne sera pas exportée/modifiée dans le tableau final.

Merci pour votre aide,

Jurassix.
 
Trier par date Trier par votes
Re : VBA : lancer une macro si une cellule d'un tableau est modifiée

Bon, j'ai pas repris le fichier, mais je me suis aidé de ce que vous avez dit avec l'évènement change. Je sais pas si je m'y prend bien mais bon.

Donc je lance une macro au départ qui me lance la fonction change :

Code: 
Private Sub Workbook_Open()
    Dim target As Range
    target = Range("A15:I38")
    Call Worksheet_Change(target)
End Sub

Le Range est la zone à laquelle je souhaites appliquer la fonction uniquement.

Et ma macro change qui, si le changement s'opère sur une ligne dans la colonne K est à 1, la passe à 0.

Code: 
Public Sub Worksheet_Change(ByVal target As Range)
    If Range("K" & target.Row).Value = 1 Then
        Range("K" & target.Row).Value = 0
    End If
End Sub

Bon, déjà, ca bloque sur le target = Range("A15:I38") 🙄

Suis pas sur de bien m'y prendre pour le coups.
 
Vote positif 0 Vote négatif
Re : VBA : lancer une macro si une cellule d'un tableau est modifiée

Merci pour votre aide. Est ce qu'il faut bien que je fasse appel à la première sub workbook_open pour lancer Worksheet_Change?

Voilà ce que j'ai :

Code: 
Private Sub Workbook_Open()
    Dim Target As Range
    Call Worksheet_Change(Target)
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect([A15:I38], Target) Is Nothing Then
    
        If Range("K" & Target.Row).Value = 1 Then
            Range("K" & Target.Row).Value = 0
        End If

    End If
End Sub

A l'ouverture, j'ai ce message : Erreur d'execution 5, Argument ou appel de procedure incorrect.

J'ai cette ligne
Code: 
If Not Intersect([A15:I38], Target) Is Nothing Then
de surlignée

Est ce que celà vient du "target" qui n'est pas défini lors de l'appel de la fonction?
 
Vote positif 0 Vote négatif
Re : VBA : lancer une macro si une cellule d'un tableau est modifiée

Bonjour à tous,

Non, tu n'as pas besoin de déclarer Target dans Workbook_Open
Supprime carrément Workbook_Open et adapte Worksheet_change comme ça :

Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect([A15:I38], Target) Is Nothing Then
    
        If Range("K" & Target.Row).Value = 1 Then
application.Enableevents = false
            Range("K" & Target.Row).Value = 0
application.enableevents = true
        End If

    End If
End Sub
 
Vote positif 0 Vote négatif
Re : VBA : lancer une macro si une cellule d'un tableau est modifiée

Fantastique, ça marche!

Pouvez vous m'expliquer le "application.Enableevents = false"?

Merci,

@Jean-Marcel : je pense savoir pourquoi votre solution ne marchait pas... alors qu'elle marche. J'avais collé votre réponse dans "ThisWorkbook", et non dans la feuille.
 
Vote positif 0 Vote négatif
Re : VBA : lancer une macro si une cellule d'un tableau est modifiée

Bonjour à tous,
Je suis étudiant, actuellement en stage à la Société Générale, et j'aurais une question concernant le lancement d'une macro à partir de la modification d'une cellule sur excel 2007 (je tiens à préciser que je connais encore assez mal le language VBA...)
Voila mon problème :
J'ai un document excel dans lequel se trouve une base de données ainsi qu'un rapport sur une autre page du même doc.
Dans ce rapport doivent figurer un tas d'informations sur des applications, toutes recensées dans ma base de données. En haut à gauche de ce rapport, j'ai réussi à faire une macro qui permet, lorsqu'on écrit le nom d'une application recensées dans la base de données et qu'on clique sur un bouton, toutes données la concernant s'affiche aux bons endroit du rapport.
Mais, mon patron, qui en veut toujours plus, me demande de pouvoir modifier des info directement sur le rapport et que ces infos modifiées se modifient également sur la base de données. Et c'est la que je bloque... J'espère que ces explications vous éclairerons pour trouver une solution adéquate à mon pb.
Merci d'avance du temps que vous prendrez pour me répondre 🙂
Cordialement
NoadKoKo
 
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

P
  • Résolu(e)
XL 2021 Comment détecter la modification MANUELLE d'une cellule dans une feuille ?
Réponses
3
Affichages
93
PRy
P
R
  • Question Question
XL pour MAC Accès aux zones d'un tableau
Réponses
10
Affichages
373
TooFatBoy
M
  • Résolu(e)
Microsoft 365 $ Macro pour copier un exemple et$.....
Réponses
9
Affichages
155
sousou
  • Question Question
XL 2021 Encadrement de cellule sur tableau dynamique
2
Réponses
21
Affichages
929
Phil69970
Y
  • Question Question
XL 2019 Masquer automatiquement des lignes selon la valeur d'une cellule ?
Réponses
2
Affichages
319
Yogean
Y
A
  • Résolu(e)
XL 2021 Ajustement automatique d'une référence cellule dans une macro ?
Réponses
2
Affichages
291
Alamyr
A
  • Question Question
XL 2010 changement de la couleur d'un onglet (jaune), si une des cellules d'un tableau n'est plus vide sinon l'onglet garde sa couleur d'origine
2
Réponses
23
Affichages
777
sebbbbb
Q
  • Résolu(e)
XL 2021 Ne pas imprimer une feuille si cellule de reference est égale a 0
Réponses
8
Affichages
94
job75
T
  • Question Question
XL 2019 tableau , cellule protégé et ligne vide
Réponses
2
Affichages
193
sylvanu
M
  • Résolu(e)
XL 2021 Copier/Coller des valeurs d’une feuille à une autre à partir d’une cellule
Réponses
11
Affichages
468
MANU64360
M
P
  • Résolu(e)
XL 2019 Tri sur une ligne dans un tableau.
Réponses
4
Affichages
271
Paulle
P
  • Question Question
XL 2019 Macro bloque en court de travail
Réponses
4
Affichages
257
fanch55
E
  • Question Question
XL 2016 Liste déroulante "pré-chargée"
Réponses
10
Affichages
355
sylvanu
P
  • Question Question
XL 2016 Macro VBA remplissage tableau de synthèse % déchet ligne de production
Réponses
4
Affichages
313
vgendron
O
  • Question Question
Autres recopie de cellules selon la date
Réponses
3
Affichages
288
olivier Clech
O
A
  • Résolu(e)
Microsoft 365 Insérer un résultat dans une cellule d'un tableau
Réponses
5
Affichages
272
Alain 79
A
  • Question Question
Microsoft 365 Commande VBA pour supprimer plusieurs lignes d'un tableau structuré
Réponses
7
Affichages
316
mapomme
  • Question Question
XL 2021 Ouvrir une application et vérifier si elle est déjà ouverte
Réponses
4
Affichages
235
Jojo973
P
  • Question Question
XL 2019 Macro VBA appliquer un filtre lors d'une importation de données
Réponses
1
Affichages
398
fanch55
D
  • Question Question
XL 2019 Suppression doublons combinés entre deux cellules associées et présentation sous forme de tableau
Réponses
13
Affichages
725
alexga78
A
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…