OVH Cloud OVH Cloud

fonction aujourdhui figée sans macro !!

8 réponses
Avatar
MMspy
bonjour à vous tous,

Voilà arès avoir consulté les archives, vous proposez toujours de figer la
date avec une macro mais est t'il possible avec une simple fonction de faire
apparaitre la date d'aujourdhui qui restera inchangée les jours prochains ?*
en fait à chaque fois que j'écris "ok" dans A1 j'aimerais que dans B2 la
date du jour s'affiche et qu'elle reste inchangée à la prochaine ouverture
pour ainsi avoir un historique !! c'est pour un classeur d'emprunt

Merci beaucoup de me guider dans la démarche surtout si la macro est
indispensable...
--
Mickael

8 réponses

Avatar
Philippe.R
Bonjour,
tu peux sans macro, mais aussi sans fonction saisir "Ctrl+;" en b2 et valider

sinon, avec un tout petit peu de VBA, à coller dans le module de la feuille considérée (pour ce faire,
clic droit sur l'onglet de la feuille, visualiser le code et coller dans la fenêtre qui vient de
s'ouvrir)

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("a1")) Is Nothing Then Exit Sub
If [a1] = "ok" Then [b2] = Date
End Sub

--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre facilement le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"MMspy" a écrit dans le message de
news:
bonjour à vous tous,

Voilà arès avoir consulté les archives, vous proposez toujours de figer la
date avec une macro mais est t'il possible avec une simple fonction de faire
apparaitre la date d'aujourdhui qui restera inchangée les jours prochains ?*
en fait à chaque fois que j'écris "ok" dans A1 j'aimerais que dans B2 la
date du jour s'affiche et qu'elle reste inchangée à la prochaine ouverture
pour ainsi avoir un historique !! c'est pour un classeur d'emprunt

Merci beaucoup de me guider dans la démarche surtout si la macro est
indispensable...
--
Mickael


Avatar
Michel.P
Bonjour Philippe
toujours sur le pont à ce que je vois!!!
bon dimanche ;-)

Bonjour,
tu peux sans macro, mais aussi sans fonction saisir
"Ctrl+;" en b2 et valider

sinon, avec un tout petit peu de VBA, à coller dans le
module de la feuille considérée (pour ce faire, clic
droit sur l'onglet de la feuille, visualiser le code et
coller dans la fenêtre qui vient de s'ouvrir)

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("a1")) Is Nothing Then Exit
Sub If [a1] = "ok" Then [b2] = Date
End Sub

--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre facilement le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"MMspy" a écrit dans
le message de
news:
bonjour à vous tous,

Voilà arès avoir consulté les archives, vous proposez
toujours de figer la date avec une macro mais est t'il
possible avec une simple fonction de faire apparaitre
la date d'aujourdhui qui restera inchangée les jours
prochains ?* en fait à chaque fois que j'écris "ok"
dans A1 j'aimerais que dans B2 la date du jour
s'affiche et qu'elle reste inchangée à la prochaine
ouverture pour ainsi avoir un historique !! c'est
pour un classeur d'emprunt

Merci beaucoup de me guider dans la démarche surtout
si la macro est indispensable...
--
Mickael



--
merci d'éclairer ma lanterne.
(un jour, serai Calife à la Place du Calife...)


Avatar
Philippe.R
Bonjour Michel,
J'ai perdu ton message au moment même où il s'affichait.
Peux tu me le poster en copie ?
J'ai trop peur de passer à côté d'un compliment ou d'un merci !
;o)))))))))))))))
--
Amicales Salutations
Retirer A_S_ pour répondre.

"Philippe.R" a écrit dans le message de
news:
Bonjour,
tu peux sans macro, mais aussi sans fonction saisir "Ctrl+;" en b2 et valider

sinon, avec un tout petit peu de VBA, à coller dans le module de la feuille considérée (pour ce faire,
clic droit sur l'onglet de la feuille, visualiser le code et coller dans la fenêtre qui vient de
s'ouvrir)

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("a1")) Is Nothing Then Exit Sub
If [a1] = "ok" Then [b2] = Date
End Sub

--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre facilement le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"MMspy" a écrit dans le message de
news:
bonjour à vous tous,

Voilà arès avoir consulté les archives, vous proposez toujours de figer la
date avec une macro mais est t'il possible avec une simple fonction de faire
apparaitre la date d'aujourdhui qui restera inchangée les jours prochains ?*
en fait à chaque fois que j'écris "ok" dans A1 j'aimerais que dans B2 la
date du jour s'affiche et qu'elle reste inchangée à la prochaine ouverture
pour ainsi avoir un historique !! c'est pour un classeur d'emprunt

Merci beaucoup de me guider dans la démarche surtout si la macro est
indispensable...
--
Mickael






Avatar
Michel.P
Bonjour Philippe
toujours sur le pont à ce que je vois!!!
bon dimanche ;-)

--
merci d'éclairer ma lanterne.
(un jour, serai Calife à la Place du Calife...)
Avatar
Michel.P
pas trop déçu???? pas de compliment aujourd'hui,
enfin pour l'instant....de ma part tout du
moins..mais je pense que
les "poseurs" de questions ne se priverons pas de
te remercier comme il se doit bien évidemment.
(c'est pas lassant d'être bon??? :D )
Moi et excel en ce moment c'est plutôt "petite
vitesse et grande lenteur", j'ai repris le boulot
et j'ai des travaux à faire à la maison, alors...
mais mon appli tourne bien et au boulot, sont
contents..z'alors...
Pour l'heure, je me contente de lire "The Forum",
marquer les fils qui m'intéresse et surtout lire
vos joutes écrites qui me font passer d'agréables
moments... mdr
bon, allez, je te laisse, on passe za table...(ça
m'a ouvert l'appétit d'écrire et de suivre les
JO..)
@ bientôt, pour de nouvelles aventures..

--
merci d'éclairer ma lanterne.
(un jour, serai Calife à la Place du Calife...)
Avatar
Philippe.R
Merci Michel d'avoir répetiter le message.
Manifestement sur pont toi aussi.
--
Amicales Salutations

"Michel.P" a écrit dans le message de
news:
Bonjour Philippe
toujours sur le pont à ce que je vois!!!
bon dimanche ;-)

--
merci d'éclairer ma lanterne.
(un jour, serai Calife à la Place du Calife...)



Avatar
Philippe.R
;o)))
Bon courage et bonne fin de semaine pour toi aussi.
--
Amicales Salutations

"Michel.P" a écrit dans le message de
news:
pas trop déçu???? pas de compliment aujourd'hui,
enfin pour l'instant....de ma part tout du
moins..mais je pense que
les "poseurs" de questions ne se priverons pas de
te remercier comme il se doit bien évidemment.
(c'est pas lassant d'être bon??? :D )
Moi et excel en ce moment c'est plutôt "petite
vitesse et grande lenteur", j'ai repris le boulot
et j'ai des travaux à faire à la maison, alors...
mais mon appli tourne bien et au boulot, sont
contents..z'alors...
Pour l'heure, je me contente de lire "The Forum",
marquer les fils qui m'intéresse et surtout lire
vos joutes écrites qui me font passer d'agréables
moments... mdr
bon, allez, je te laisse, on passe za table...(ça
m'a ouvert l'appétit d'écrire et de suivre les
JO..)
@ bientôt, pour de nouvelles aventures..

--
merci d'éclairer ma lanterne.
(un jour, serai Calife à la Place du Calife...)



Avatar
Michel.P
j'essaye de me maintenir à niveau... et puis ce
forum où l'on ne trouve que des Forts Hommes (pas
mal celle là) et Execllent (re) , tant pour
s'instruire que se divertir..alors, au diable
'les varices' (fais fort jourdhui) mdr et ne
nous privons pas de tels moments de bonheur..
Hé oui, sur le pont moi aussi, pas du 15 août
cette année, tombe un WE...
bon, vai boire mon ptit café et puis caller cette
foutue porte avant de la sceller...


Philippe.R a tenté de faire fumer son clavier
pour :
Merci Michel d'avoir répetiter le message.
Manifestement sur pont toi aussi.


--
merci d'éclairer ma lanterne.
(un jour, serai Calife à la Place du Calife...)