exécuter une procédure une seule fois

bonjour,
je suis débutant en vba et je suis en train d'écrire une procédure en vba.
Elle fonctionne comme je le souhaite à un détail près.
Voici ma procédure:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Range("choix").Value = "calculé" Then If Range("K39") = "" Then Range("essai") = "" Else Range("essai").Value = Range("K39").Value End If Copie Else Range("groupe").Clear End If End Sub

---

Mon problème est que cette procédure s'effectue à chaque sélection de cellule et comme la procédure copie est assez longue, j'aimerais que la procédure copie ne s'effectue qu'une seule et unique fois.
J'espère avoir été clair.
merci d'avance pour vos réponse

Hello,

Je ne sais pas si ça sera suffisant, mais tu mets le même code dans le Worksheet_Change, de cette façon, c'est uniquement lorsqu'il y a changement dans ta cellule "choix".

Bonne soirée !

Bonsoir

Tu pourrais utiliser une variable global dans un module

exemple

Code:

---

Global UneSeuleFois As Boolean

---

et dans ton code

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Private Sub Worksheet_SelectionChange(ByVal Target As Range)   If Not UneSeuleFois Then If Range("choix").Value = "calculé" Then If Range("K39") = "" Then Range("essai") = "" Else Range("essai").Value = Range("K39").Value End If Copie Else Range("groupe").Clear End If   UneSeuleFois = True End If End Sub

---

Merci pour vos propositions
Pour antoniom, le fait de passer dans Worksheet_Change fait planter excel (boucle infini) et je ne sais pas d'ou cela vient, même en simplifiant ma procédure par exemple en enlevant la procédure copie cela plante toujours.
Pour zyhack, je suis débutant comment cette nouvelle variable changera la façon dont fonctionne la procédure?

re

tout à l'heure j'ai tapé un peu vite ce n'est pas global mais Public

Code:

---

Public UneSeuleFois As Boolean

---

ce type de variable gardera sa valeur tant que le classeur sera ouvert a moins qu'elle ne soit modifié.

à l'ouverture du fichier cette variable sera à false par défaut.

cette ligne vérifie que la variable = false

Code:

---

If Not UneSeuleFois Then

---

une fois que ton code à été utilisé on la passe à true.

la fois suivante ton code ne sera pas exécute car la variable ne sera plus a false

merci zyhack
avec tes explications j'ai pu adapté l'utilisation de cette variable pour obtenir le résultat que je souhaitais.
Merci encore de vos réponse et de vos explications qui étaient simples et clairs