Noté les heures : minutes de chaque automatiquement
Utilisateur anonyme
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonjour,
J'ai une petite question sur Excel vous vous en doutez. :)
j'ai créée un rapport d'appel
lorsque je rentre le numéros de client dans la colonne B je voudrais qu'automatiquement dans la Colonne A il y soit inscris l'heure a la quelle je l'ai appelé
est-ce possible ?
Merci a tous et bonne Journée
J'ai une petite question sur Excel vous vous en doutez. :)
j'ai créée un rapport d'appel
lorsque je rentre le numéros de client dans la colonne B je voudrais qu'automatiquement dans la Colonne A il y soit inscris l'heure a la quelle je l'ai appelé
est-ce possible ?
Merci a tous et bonne Journée
7 réponses
-
Bonjour
Simple et rapide, dans la cellule correspondante de la colonne A
maintenez la touche CRTL enfoncée et appuyez sur la touche : (2points)
Cdlt -
Bonsoir,
Clic en même temps sur Ctrl et sur point virgule (Ctrl;) espace et Ctrl et double point (Ctrl:) ce qui te donnera 20/01/2016 16:55
ou il faut écrire une macro si tu connais
-
Re,
je suis obligé de sortir, dans la soirée je t'écris un code pour l'automatiser si personne n'est passé par là
-
-
Re,
Si ton fichier n'est pas confidentiel oui je veux bien comme cela le code sera adapté à ton tableau.
pour joindre ton fichier utilise ce lien
https://www.cjoint.com/ -
-
Re,
passe par https://www.cjoint.com/ s'il te plait
clic sur le lien/sur parcourir pour sélectionner le fichier/sur créer le lien, colle le lien généré dans une réponse- https://www.cjoint.com/c/FADruSeO1lG
Merci Mike esperon que je puisse l adapter a google Sheets
c est une fichier que je partage
-
-
Re,
plusieurs possibilités, soit tu colles ce code dans les propriétés de chaque feuille concernée (clic droit sur l'onglet de ta feuille/Visualiser le code) et coller ce codeOption Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 2 Then Exit Sub
Application.EnableEvents = False
Cells(Target.Row, 1) = Now()
Application.EnableEvents = True
End Sub
soit tu colles ce code une seule fois dans la Thisworkbook
(clic droit sur l'onglet d'une feuille/Visualiser le code/clic droit sur Thisworkbook que tu trouveras sur la gauche Projet-VBA project) et Code
Option Explicit
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If ActiveSheet.Name = "graphique" Or ActiveSheet.Name = "MEILEUR JOUR" Then Exit Sub
If Target.Column <> 2 Then Exit Sub
Application.EnableEvents = False
Cells(Target.Row, 1) = Now()
Application.EnableEvents = True
End Sub
explication de ce dernier codeIf ActiveSheet.Name = "graphique" Or ActiveSheet.Name = "MEILEUR JOUR" Then Exit Sub
si tu travailles sur la feuille "graphique" ou sur la feuille "MEILEUR JOUR" on sort de la procédureIf Target.Column <> 2 Then Exit Sub
si tu travailles sur une colonne différente de la colonne 2 on sort également de la procédureCells(Target.Row, 1) = Now()
si les conditions sont réunies on reste sur la même ligne colonne 1 ou A et on colle NOW() en clair maintenant () soit la date et l'heure
dans tes plages colonne A des feuilles concernées tu peux saisir ce format personnalisé pour afficher la date, l'heure avec les secondesjj/mm/aaaa hh:mm:ss
il est également possible de limiter l'action à une plage restrinte colonne B exemple si tu as sur la première ligne une entête de colonne, dans ce cas fait signe
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir. -
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
-
Re,
si je comprends bien tes tableaux, c'est colonne A des onglets Lundi, Mardi etc ... que tu veux la date et l'heure si les données colonne B changent, c'est bien cela !
-
Re,
a défaut de réponse, récupère ton fichier voir, un fichier contenant des macros doit être enregistré en XLSM ou ancienne extension XLS
https://www.cjoint.com/c/FADtlKg0Hfj