Heure automatique

Bonsoir à tous,

Pouvez-vous m'aider sur une formule qui écrirais l'heure automatiquement dans la cellule à côté.

exp:

A1 B1 si dans la cellule A1 il n'y a rien alors B2 pas d'heure

M 05:00 si dans la cellule A1 il y a une ou plusieurs lettres alors B2 affiche l'heure du moment.

je crois quand VBA il y a la fonction OnTime, mais je la maitrise pas bien.

Merci de votre aide

Amicalement

DOLIPRANE

Bonsoir

A tester

A mettre dans le code de la feuille

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = "$A$1" Then
    If Target = "" Then Range("B2").ClearContents Else Range("B2") = Time
  End If
End Sub

Bonsoir Banzai,

Je te remercie de te pencher sur mon problème.

je te joint mon fichier que je mets en place, c'est une main courante électronique, afin de faciliter le travail de mes chefs de poste ils sont débordés de cahiers, de feuilles différentes, c'est pour ça que je voudrais mettre tous sur une même feuille.

Tu verras dans la feuille Prise de service, je voudrais que lorsque le chef de poste va écrire dans les cellules de la colonne B4 à B18 les lettres correspondantes au poste de l'agent, ça écrive l'heure dans la cellule D4 à D18.

Merci de ton aide

44classeur2.xlsm (38.36 Ko)

Bonsoir

Regardes si cela te sied

re Banzai,

MERCI BEAUCOUP,

Super.

Je pense recourir à vos lumières, car je me lance dans du compliqué je pense lol.

Amicalement

DOLIPRANE

Rechercher des sujets similaires à "heure automatique"