Afficher le résultat d'une macro

marco_bachar Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
marco_bachar Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour ,
SVP ,j'ai une macro qui affiche la date et heure dans la cellule "C14" ,et j'aimerais qu'il s'affiche dans une cellule sélectionnée dans la colonne C dés que je clic sur le button de macro voici le code : 

     Sub bachir()
Dim datejour
datejour = Now()
    aujourdhui = DateValue(datejour)
 Range("C14").Value = datejour
End Sub



Merci

EDIT : Ajout des balises de code (la coloration syntaxique).
Explications disponibles ici : ICI

Merci d'y penser dans tes prochains messages.
A voir également:

1 réponse

Réponse 1 / 1
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Bonjour,

Plus simplement, sans bouton, avec un simple clic droit sur la ou les cellules sélectionnées de la colonne C : 
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
  If Target.Columns.Count = 1 And Target.Column = 3 Then
    Target.Value = Now: Cancel = True
  End If
End Sub

Code à placer dans le module de la feuille concernée : copier le code, clic droit sur l'onglet, visualiser le code ..., coller)

0
marco_bachar Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
Merci patrice ,
l'astuce est plus simple j'ai essayé avec ce code et ça marche
ActiveCell.Value = datejour au lieu de Range("C14").Value = datejour
car je veux calculer la cadence de la journée par heure
merci une deuxième fois
0

Discussions similaires

Durée d'une diapositive animée
bibibibi99 -
bibibibi99 -

2 réponses
Trouver application résultat loterie Azerb Bulgarie Autriche
PoussinRassurant87 -
georges97 -

3 réponses