Problème recherche valeur sur excel
Résolu
Ghissa
Messages postés
46
Date d'inscription
Statut
Membre
Dernière intervention
-
Ghissa Messages postés 46 Date d'inscription Statut Membre Dernière intervention -
Ghissa Messages postés 46 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
j'ai fait une petite macro qui permet de rechercher une valeur dans la feuille de calcul Excel ! Mais elle ne marche pas. mais quand je le fais manuellement (Edition -> rechercher) ça marche.
j'ai même enregistré la macro, mais quand je l'exécute sur VB elle ne marche pas !
Voilà la Macro :
Worksheets("PLANNING").Activate
Columns("B:B").Select
Selection.Find(What:="15/01/2008", After:=ActiveCell, LookIn:=xlFormulas _
, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate
(Excel 2000)
Quelqu'un a t-il des suggestions ?
merci d'avance !
j'ai fait une petite macro qui permet de rechercher une valeur dans la feuille de calcul Excel ! Mais elle ne marche pas. mais quand je le fais manuellement (Edition -> rechercher) ça marche.
j'ai même enregistré la macro, mais quand je l'exécute sur VB elle ne marche pas !
Voilà la Macro :
Worksheets("PLANNING").Activate
Columns("B:B").Select
Selection.Find(What:="15/01/2008", After:=ActiveCell, LookIn:=xlFormulas _
, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate
(Excel 2000)
Quelqu'un a t-il des suggestions ?
merci d'avance !
A voir également:
- Problème recherche valeur sur excel
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Comment trier par ordre alphabétique sur excel - Guide
- Comment calculer la moyenne sur excel - Guide
2 réponses
Bonjour,
Pourquoi cela fonctionne avec Edition / rechercher et pas avec ta macro? Problème de format : date...
Essaye ceci :
Dim var As Date
var = "15/01/2008"
Worksheets("PLANNING").Activate
Columns("B:B").Select
Selection.Find(What:=var, After:=ActiveCell, LookIn:=xlFormulas _
, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate
Pourquoi cela fonctionne avec Edition / rechercher et pas avec ta macro? Problème de format : date...
Essaye ceci :
Dim var As Date
var = "15/01/2008"
Worksheets("PLANNING").Activate
Columns("B:B").Select
Selection.Find(What:=var, After:=ActiveCell, LookIn:=xlFormulas _
, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate