Exécution d'une macro au moment de saisie dans la colonne A

Slt tout le monde ;

Si vous permettez, Je serais besoin d'une méthode récurrente(automatique), ou bien un code VBA pour exécuter une macro à chaque fois je scanne une chaîne de caractères à la colonne A via la douchette.

Merci d'avance.

Bonjour,

Qu'elle douchette ? connectée ou ?

cela veut dire quoi ? :

Citation:

---

je scanne une chaîne de caractères à la colonne

---

Merci pour votre retour;

une douchette : un lecteur de code barre.
Objectif : après une scanne du code barre avec la douchette, j'aurais besoin d'exécuter une macro qui contient l'heure et date de saisie + date objective + calcul d'échéance (ceci doit être actualisé chaque 5 min indépendamment).
Echéance = date et heure actuelles - date et heure de saisie
Et après, l'idée c'est d'avoir des couleurs pour chaque ligne :
Vert : OK soldé
Jaune : Le produit va être expiré prochainement
Rouge : produit hors service


Pièce jointe 181193

Bonjour,
Je pense que bbil ne demandait la définition de douchette mais quelle douchette (la xxx de chez HP), quand, comment!

En d'autres terme comment l'action de la douchette est déclenché (autrement qu'en appuyant sur son bouton)

Quand j'écris sur mon clavier ça génère un événement que je peux intercepté pour activer une Macro;

La douchette c'est pareil!

Ok;

1/ Oubliez la douchette, je voudrais lorsque je saisie à l'aide d'un clavier une chaine de caractère, une fois je clique sur ENTRER ma macro doit être exécuter.
2/ ET Comment peut-on dupliquer la commande d'une cellule sur toute la colonne ?

Merci pour votre contribution.

Bonjour,

Citation:

---

1/ Oubliez la douchette, je voudrais lorsque je saisie à l'aide d'un clavier une chaine de caractère, une fois je clique sur ENTRER ma macro doit être exécuter

---

Dans sa réponse, Robert, l'évoque

Citation:

---

Quand j'écris sur mon clavier ça génère un événement que je peux intercepté pour activer une Macro;

---

Voir donc la procédure événementielle Worksheet_SelectionChange
A lire Les évènements dans la feuille de calcul Excel

Citation:

---

2/ ET Comment peut-on dupliquer la commande d'une cellule sur toute la colonne ?

---

Qu'entends-tu par là ?

Bonjour à tous,

Voici une début de code qui devrait fortement t'aider à faire ce qu'il te faut:


Evenement Worksheet_change ou Worksheet_SelectionChange (vois ce que tu préfères)

Code:

---

1 2 3 4 5 6 7

Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A1:A5000")) Is Nothing And Target <> "" Then DATE_SAISIE = Date HEURE_SAISIE = Time ThisWorkbook.Worksheets("NomFeuille").Cells(Target.Row, Target.Column).Offset(0, 1).Value = DATE_SAISIE & " " & HEURE_SAISIE End If End Sub

---

Citation:

---

calcul d'échéance (ceci doit être actualisé chaque 5 min indépendamment).

---

voir du coté de

Code:

---

application.ontime

---

je pense qu'avec ceci tu as tout pour faire ce que tu veux faire