VBA Excel With et find
Résolu
pijaku
Messages postés
13513
Date d'inscription
Statut
Modérateur
Dernière intervention
-
pilas31 Messages postés 1878 Statut Contributeur -
pilas31 Messages postés 1878 Statut Contributeur -
Bonjour,
Je sèche. Je doit chercher dans la colonne 1 de mon classeur2 une valeur située dans mon classeur1. j'aimerais ne pas sélectionner la colonne dans laquelle je fais ma recherche, ni activer le classeur2.
Je me suis donc lancé dans ce code :
Dim test as string
test = [A1]
With Workbooks(2)
Set val = .Columns("A:A").Find(What:=test, LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext)
End With
Cependant le message d'erreur suivant s'affiche : "erreur d'exécution 438, propriété ou méthode non gérée pas cet objet" et la ligne Set val.... s'affiche jaune dans le débogage.
Je ne sais pas comment faire.
Merci de m'indiquer comment faire une recherche dans un 2ème classeur sans l'activer ni sélectionner la colonne.
Je sèche. Je doit chercher dans la colonne 1 de mon classeur2 une valeur située dans mon classeur1. j'aimerais ne pas sélectionner la colonne dans laquelle je fais ma recherche, ni activer le classeur2.
Je me suis donc lancé dans ce code :
Dim test as string
test = [A1]
With Workbooks(2)
Set val = .Columns("A:A").Find(What:=test, LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext)
End With
Cependant le message d'erreur suivant s'affiche : "erreur d'exécution 438, propriété ou méthode non gérée pas cet objet" et la ligne Set val.... s'affiche jaune dans le débogage.
Je ne sais pas comment faire.
Merci de m'indiquer comment faire une recherche dans un 2ème classeur sans l'activer ni sélectionner la colonne.
A voir également:
- VBA Excel With et find
- Word et excel gratuit - Guide
- Liste déroulante excel - Guide
- Si et ou excel - Guide
- Déplacer colonne excel - Guide
- Excel compter cellule couleur sans vba - Guide
3 réponses
Salut Pijaku
Je pense qu'il te manque la feuille de ton classeur 2 dans la syntaxe du type :
Set Val = .Worksheets(1).Columns("A:A").Find(......
A+
Je pense qu'il te manque la feuille de ton classeur 2 dans la syntaxe du type :
Set Val = .Worksheets(1).Columns("A:A").Find(......
A+