VBA, lancer macro après action "coller"

Fermé

Walles Messages postés 15 Date d'inscription mercredi 13 juillet 2016 Statut Membre Dernière intervention 12 septembre 2019 - 18 août 2019 à 14:08
gyrus - 18 août 2019 à 18:40

Bonjour à tous,

Ce que je souhaite faire me parait plutôt simple mais je bloque dessus depuis un bon moment.

Je souhaiterai lancer une macro après avoir réalisé un "coller" dans mon onglet. J'ai réussi à obtenir un résultat proche de ce que je veux en lançant la macro lorsque la valeur d'une cellule changeait, voici mon code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B8")) Is Nothing Then
Sheets("Sheet1").Range("C3").Value = Format(Now, "MM/DD/YYYY HH:MM")
'Range("A1").Select
End If
End Sub

Merci d'avance.

A voir également:

VBA, lancer macro après action "coller"
Action - Guide
Télécharger film d'action gratuitement et rapidement - Télécharger - TV & Vidéo
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Action fans - Accueil - Guide arnaque
Cette action ne peut pas être réalisée car le fichier est ouvert dans system - Guide

1 réponse

Réponse 1 / 1

gyrus
18 août 2019 à 16:33

Bonjour,

C’est bien de nous indiquer le résultat proche de l’attendu mais ce serait encore mieux de nous indiquer le résultat attendu.
Ta procédure semble réaliser ce que tu souhaites : noter la date et heure du jour en C3 lorsque B8 est modifiée. Qu’est-ce qui ne te convient pas ?

Cordialement.

Walles Messages postés 15 Date d'inscription mercredi 13 juillet 2016 Statut Membre Dernière intervention 12 septembre 2019
18 août 2019 à 18:08

Le résultat attendu est le bon, c'est la manière de l'obtenir qui n'est pas bonne. Je voudrai que la date et l'heure soit noter si l'on réalise un "coller" dans la feuille, et non lorsque B8 est modifié.
Le problème actuellement c'est que si à l'avenir le tableau à coller à sa cellule B8 vide la macro ne se lancera pas.

En espérant avoir été plus clair.

gyrus
18 août 2019 à 18:40

Non, ce n’est pas réellement plus clair pour moi.
Tu peux détecter un changement de valeur dans une cellule de la feuille avec la procédure évènementielle Worksheet.Change.
Tu peux cibler ce changement (cellule B8 ou une autre plage par exemple).
Par contre, il n’existe pas de procédure évènementielle spécifique pour détecter un changement qui est dû à un « coller ».
Mais si le collage se fait avec une cellule vide, la macro se lancera quand même (tu peux faire le test).

Cordialement.

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Bonjour,
Nous avons un problème dans la programmation de notre VBA. Voici notre programme:

Sub Bloucle1Bull()
Dim a, k As Integer

k = 2
Do While Worksheets("formulaire").Cells(2, 2) Worksheets("formulaire").Cells(k, 4)
k = k + 1
Loop

a = 2
Do While Worksheets("formulaire").Cells(k + 1, 4) Worksheets("BDD Call").Cells(a, 1) Or (Worksheets("BDD Call").Cells(a, 4) = (Worksheets("Bullspread").Cells(2, 3) + 100)) Or Worksheets("BDD Call").Cells(a, 7) Worksheets("bullspread").Cells(2, 7)
a = a + 1
Loop

''''''''''''on recopie la ligne du premier call trouvé pour le jour 2 ...

Action requise sur compte Google

Bonjour,

J'ai depuis quelques jours maintenant une notification "action requise sur compte Google" impossible à retirer. J'ai été déconnecté de mes deux comptes sur mon téléphone et je ne peux plus me reconnecter, quand je rentre mon MDP lorsque je veux utiliser une appli Google il me met "vérification des informations" et se coupe jsute après sans m'avoir connecté. C'est assez handicapant de ne plus pouvoir accéder à ses comptes Google sur Androïd voyez vous