Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

trouver un début de date fonction Find

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

charlou74

XLDnaute Nouveau
Bonjour, j'aimerais trouver une date dans une colonne.
l'utilisateur rentre une date et ensuite trouve cette date et la selectionne.
voici mon code
Code:
'Récuperation des valeurs de début et de fin
    heure2 = Workbooks("MACRO_VISUALISATION.xls").Worksheets(1).Cells(5, 8).Value
    heure = Workbooks("MACRO_VISUALISATION.xls").Worksheets(1).Cells(5, 6).Value

puis je cherche la valeur
Code:
Worksheets(gaz).Activate
==>    Set rngDebut ActiveSheet.Columns(1).Cells.Find(heure,LookAt:=xlPart)
==>    Set rngFin = ActiveSheet.Columns(1).Cells.Find(heure2,LookAt:=xlPart)
    'si la valeur n'est pas trouvé on fait rien
        If rngDebut Is Nothing Then
        MsgBox " debut rien"
        End If
quand j'éxecuter le prog en mode pas à pas au niveau de la flèche heure et heure2 contienne bien la date "10/02/2010"par exemple.
j'utilise un xlpart car dans ma colonne de recherche la date est sous cette forme jj/mm/aaaa hh:mm.

et dans mon cas dans le rngDebut est toujours vide (nothing)

merci de votre aide.
 
Re : trouver un début de date fonction Find

Bonjour charlou,

regarde l'exemple ci-dessous, il faut peut être rechercher la propriété "text" de la cellule :

Code:
Dim x As Range
Set x = Range("A:A").Find(Range("B1").[COLOR="Red"][B]Text[/B][/COLOR], , xlValues, xlPart, , , False)

bonne journée
@+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
2
Affichages
252
Réponses
5
Affichages
545
  • Question Question
XL 2021 VBA excel
Réponses
4
Affichages
301
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…