Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pounet95
Bonsoir, A mettre dans le code de la feuille
Private Sub Worksheet_Change(ByVal Target As Range) If Target = Range("B1") And [B1] <> "" Then [A1] = Format(Date, "ddd dd mmmm yyyy") End If End Sub
-- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/ "kettani_2" a écrit dans le message de news:
Bonjour, je voudrais mettre automatiquement sur la cellule $A$1 la date système quand la cellule $B$1 est renseignée. merci
Bonsoir,
A mettre dans le code de la feuille
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Range("B1") And [B1] <> "" Then
[A1] = Format(Date, "ddd dd mmmm yyyy")
End If
End Sub
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
"kettani_2" <kettani_2@discussions.microsoft.com> a écrit dans le message de
news: A96B7DE4-C59E-4E29-ABDD-0FF32E53FAEB@microsoft.com...
Bonjour,
je voudrais mettre automatiquement sur la cellule $A$1 la date système
quand
la cellule $B$1 est renseignée.
merci
