Je voudrais que dans la cellule B1 apparaisse la date a laquel a été saisi
la cellule A1.
J'ai essayer avec la fonction now() mais le problème de cette fonction est
quel est réactualiser a chaque calcul de la feuille (avec ou sans
modification de la cellule A1. Je n'ai donc plus la date a laquel la cellule
a été rempli mais la date du moment.
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
AV
Je voudrais que dans la cellule B1 apparaisse la date a laquel a été saisi la cellule A1.
dans le module de la feuille : Private Sub Worksheet_Change(ByVal zz As Range) If zz.Address <> "$A$1" Then Exit Sub [B1] = Date 'ou bien = now() End Sub
AV
Je voudrais que dans la cellule B1 apparaisse la date a laquel a été saisi
la cellule A1.
dans le module de la feuille :
Private Sub Worksheet_Change(ByVal zz As Range)
If zz.Address <> "$A$1" Then Exit Sub
[B1] = Date 'ou bien = now()
End Sub
Je voudrais que dans la cellule B1 apparaisse la date a laquel a été saisi la cellule A1.
dans le module de la feuille : Private Sub Worksheet_Change(ByVal zz As Range) If zz.Address <> "$A$1" Then Exit Sub [B1] = Date 'ou bien = now() End Sub
AV
Pounet95
Bonsoir, A adapter
Dans le module VBA de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range) If Target = Range("A1") Then Range("B1").Value = Format(Date, "dd/mm/yyyy hh:mm") End If End Sub
-- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/
"cinnil" a écrit dans le message de news: %
Bonjour,
Je voudrais que dans la cellule B1 apparaisse la date a laquel a été saisi la cellule A1.
J'ai essayer avec la fonction now() mais le problème de cette fonction est quel est réactualiser a chaque calcul de la feuille (avec ou sans modification de la cellule A1. Je n'ai donc plus la date a laquel la cellule a été rempli mais la date du moment.
Merci pour votre aide
Bonsoir,
A adapter
Dans le module VBA de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Range("A1") Then
Range("B1").Value = Format(Date, "dd/mm/yyyy hh:mm")
End If
End Sub
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
"cinnil" <nospamm-cinnil@free.fr> a écrit dans le message de news:
%23CQ4mSH3EHA.824@TK2MSFTNGP11.phx.gbl...
Bonjour,
Je voudrais que dans la cellule B1 apparaisse la date a laquel a été saisi
la cellule A1.
J'ai essayer avec la fonction now() mais le problème de cette fonction est
quel est réactualiser a chaque calcul de la feuille (avec ou sans
modification de la cellule A1. Je n'ai donc plus la date a laquel la
cellule
a été rempli mais la date du moment.
Private Sub Worksheet_Change(ByVal Target As Range) If Target = Range("A1") Then Range("B1").Value = Format(Date, "dd/mm/yyyy hh:mm") End If End Sub
-- Pounet95 on trouve tout ( ou presque ) http://www.excelabo.net/
"cinnil" a écrit dans le message de news: %
Bonjour,
Je voudrais que dans la cellule B1 apparaisse la date a laquel a été saisi la cellule A1.
J'ai essayer avec la fonction now() mais le problème de cette fonction est quel est réactualiser a chaque calcul de la feuille (avec ou sans modification de la cellule A1. Je n'ai donc plus la date a laquel la cellule a été rempli mais la date du moment.
