Date par défaut

D 14 mars 2012 H 12:16 A Patrice MOREL

Le but est mettre la date du jour automatiquement dans une cellule voulue.

Le choix du code qui suit est que lorsque l’on clique sur une ligne la date se mette dans la cellule de la colonne E de cette même ligne à la condition que cette cellule soit vide.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

'Met la date du jour automatiquement si la cellule E (5)
'de la même ligne sélectionnée (1) est vide
If ActiveCell.EntireRow.Cells(1, 5) = "" Then
  ActiveCell.EntireRow.Cells(1, 5).Value = Now()
Else
  Exit Sub
End If

End Sub

Il est à remarquer que cette action est placée sur la feuille et non sur un module !

Dans la même rubrique

12 mai 2021 – Un lien entre les cellules

12 novembre 2019 – Formatages divers

4 janvier 2018 – Incrémentation de lignes avec un classeur lié.

3 août 2017 – Nom de fichier dans une cellule

14 décembre 2011 – Divers petits trucs

Rechercher

Traducteur

Date par défaut

Dans la même rubrique

Rechercher

Traducteur

Les plus lus

5 articles au hasard

Les plus populaires