J'ai utilisé la macro de Denis Michon message (n°1954) du 05/01/2008 dans un
calendrier perpétuel.. Bravo ça marche du tonnerre. Ce que je n'arrive pas
à faire c'est trouver la date du jour quand la cellule est une formule. En
fait je voudrais trouver le contenu de la cellule. Est ce que vous pourriez
m'aider sur ce point là, je débute et je bute !
"jean-luc riviere" a écrit dans le message de news: % Bonjour,
J'ai utilisé la macro de Denis Michon message (n°1954) du 05/01/2008 dans un calendrier perpétuel.. Bravo ça marche du tonnerre. Ce que je n'arrive pas à faire c'est trouver la date du jour quand la cellule est une formule. En fait je voudrais trouver le contenu de la cellule. Est ce que vous pourriez m'aider sur ce point là, je débute et je bute !
merci d'avance pour votre aide
cd
Tout ce que tu veux savoir et même plus sur la méthode "Find" et "Date"
dans cet article que j'ai commis sur le Wikiki de Misange :
"jean-luc riviere" <jlr.riviere@wanadoo.fr> a écrit dans le message de news: %23YBInZs4IHA.1200@TK2MSFTNGP04.phx.gbl...
Bonjour,
J'ai utilisé la macro de Denis Michon message (n°1954) du 05/01/2008 dans un
calendrier perpétuel.. Bravo ça marche du tonnerre. Ce que je n'arrive pas
à faire c'est trouver la date du jour quand la cellule est une formule. En
fait je voudrais trouver le contenu de la cellule. Est ce que vous pourriez
m'aider sur ce point là, je débute et je bute !
"jean-luc riviere" a écrit dans le message de news: % Bonjour,
J'ai utilisé la macro de Denis Michon message (n°1954) du 05/01/2008 dans un calendrier perpétuel.. Bravo ça marche du tonnerre. Ce que je n'arrive pas à faire c'est trouver la date du jour quand la cellule est une formule. En fait je voudrais trouver le contenu de la cellule. Est ce que vous pourriez m'aider sur ce point là, je débute et je bute !
merci d'avance pour votre aide
cd
Misange
michdenis a écrit :
Tout ce que tu veux savoir et même plus sur la méthode "Find" et "Date" dans cet article que j'ai commis sur le Wikiki de Misange :
Tant que ce n'est pas sur mon bikini :-) Misange migrateuse XlWiki : Participez à un travail collaboratif sur excel ! http://xlwiki.free.fr/wiki http://www.excelabo.net
michdenis a écrit :
Tout ce que tu veux savoir et même plus sur la méthode "Find" et "Date"
dans cet article que j'ai commis sur le Wikiki de Misange :
Tant que ce n'est pas sur mon bikini :-)
Misange migrateuse
XlWiki : Participez à un travail collaboratif sur excel !
http://xlwiki.free.fr/wiki
http://www.excelabo.net
Tant que ce n'est pas sur mon bikini :-) Misange migrateuse XlWiki : Participez à un travail collaboratif sur excel ! http://xlwiki.free.fr/wiki http://www.excelabo.net
michdenis
| Tant que ce n'est pas sur mon bikini
Moi, je n'oserais jamais... mais qui sait de quoi mes doigts sont capables ?
;-)))
| Tant que ce n'est pas sur mon bikini
Moi, je n'oserais jamais... mais qui sait de quoi mes doigts sont capables ?
Find n'est pas incontournable pour trouver une date...
Dans une plage de dates (que les dates soient inscrites en dur ou calculées), tu peux mettre en évidence la date du jour avec une MEFC. Après sélection de la plage (par exemple A1:A31), la formule est
=ENT(A1)=ENT(AUJOURDHUI())
et avec le bouton 'Format...' tu choisis la présentation de la cellule qui correspondra à la date du jour.
Tu peux faire la même chose avec quelques lignes de code :
'================== Sub Essai()
Range("A1:A31").Select With Selection .FormatConditions.Delete .FormatConditions.Add Type:=xlExpression, Formula1:= _ "=ENT(A1)=ENT(AUJOURDHUI())" .FormatConditions(1).Interior.ColorIndex = 43 End With Range("A1").Select
End Sub '================== Si tu as seulement besoin de repérer la date et de la sélectionner :
'================== Sub Essai2() '(chercher la date du jour dans une plage) Dim Arr, pos
Arr = Range("A1:A31").Value2 'plage à adapter pos = Application.Match(CLng(Date), Arr, 0) If Not IsError(pos) Then Range("A" & pos).Select Else MsgBox "La date du jour n'a pas été trouvée" End If
End Sub '================= FS --- Frédéric Sigonneau http://frederic.sigonneau.free.fr
jean-luc riviere a écrit :
Bonjour,
J'ai utilisé la macro de Denis Michon message (n°1954) du 05/01/2008 dans un calendrier perpétuel.. Bravo ça marche du tonnerre. Ce que je n'arrive pas à faire c'est trouver la date du jour quand la cellule est une formule. En fait je voudrais trouver le contenu de la cellule. Est ce que vous pourriez m'aider sur ce point là, je débute et je bute !
merci d'avance pour votre aide
cd
Find n'est pas incontournable pour trouver une date...
Dans une plage de dates (que les dates soient inscrites en dur ou calculées), tu
peux mettre en évidence la date du jour avec une MEFC.
Après sélection de la plage (par exemple A1:A31), la formule est
=ENT(A1)=ENT(AUJOURDHUI())
et avec le bouton 'Format...' tu choisis la présentation de la cellule qui
correspondra à la date du jour.
Tu peux faire la même chose avec quelques lignes de code :
'================== Sub Essai()
Range("A1:A31").Select
With Selection
.FormatConditions.Delete
.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=ENT(A1)=ENT(AUJOURDHUI())"
.FormatConditions(1).Interior.ColorIndex = 43
End With
Range("A1").Select
End Sub
'==================
Si tu as seulement besoin de repérer la date et de la sélectionner :
'================== Sub Essai2()
'(chercher la date du jour dans une plage)
Dim Arr, pos
Arr = Range("A1:A31").Value2 'plage à adapter
pos = Application.Match(CLng(Date), Arr, 0)
If Not IsError(pos) Then
Range("A" & pos).Select
Else
MsgBox "La date du jour n'a pas été trouvée"
End If
End Sub
'=================
FS
---
Frédéric Sigonneau
http://frederic.sigonneau.free.fr
jean-luc riviere a écrit :
Bonjour,
J'ai utilisé la macro de Denis Michon message (n°1954) du 05/01/2008 dans un
calendrier perpétuel.. Bravo ça marche du tonnerre. Ce que je n'arrive pas
à faire c'est trouver la date du jour quand la cellule est une formule. En
fait je voudrais trouver le contenu de la cellule. Est ce que vous pourriez
m'aider sur ce point là, je débute et je bute !
Find n'est pas incontournable pour trouver une date...
Dans une plage de dates (que les dates soient inscrites en dur ou calculées), tu peux mettre en évidence la date du jour avec une MEFC. Après sélection de la plage (par exemple A1:A31), la formule est
=ENT(A1)=ENT(AUJOURDHUI())
et avec le bouton 'Format...' tu choisis la présentation de la cellule qui correspondra à la date du jour.
Tu peux faire la même chose avec quelques lignes de code :
'================== Sub Essai()
Range("A1:A31").Select With Selection .FormatConditions.Delete .FormatConditions.Add Type:=xlExpression, Formula1:= _ "=ENT(A1)=ENT(AUJOURDHUI())" .FormatConditions(1).Interior.ColorIndex = 43 End With Range("A1").Select
End Sub '================== Si tu as seulement besoin de repérer la date et de la sélectionner :
'================== Sub Essai2() '(chercher la date du jour dans une plage) Dim Arr, pos
Arr = Range("A1:A31").Value2 'plage à adapter pos = Application.Match(CLng(Date), Arr, 0) If Not IsError(pos) Then Range("A" & pos).Select Else MsgBox "La date du jour n'a pas été trouvée" End If
End Sub '================= FS --- Frédéric Sigonneau http://frederic.sigonneau.free.fr
jean-luc riviere a écrit :
Bonjour,
J'ai utilisé la macro de Denis Michon message (n°1954) du 05/01/2008 dans un calendrier perpétuel.. Bravo ça marche du tonnerre. Ce que je n'arrive pas à faire c'est trouver la date du jour quand la cellule est une formule. En fait je voudrais trouver le contenu de la cellule. Est ce que vous pourriez m'aider sur ce point là, je débute et je bute !