Vba, Problème avec la foncction find (1004)
Résolu/Fermé
Jesudenazarrete
Messages postés
2
Date d'inscription
jeudi 13 mars 2008
Statut
Membre
Dernière intervention
13 mars 2008
-
13 mars 2008 à 09:01
Jesudenazarrete Messages postés 2 Date d'inscription jeudi 13 mars 2008 Statut Membre Dernière intervention 13 mars 2008 - 13 mars 2008 à 14:17
Jesudenazarrete Messages postés 2 Date d'inscription jeudi 13 mars 2008 Statut Membre Dernière intervention 13 mars 2008 - 13 mars 2008 à 14:17
A voir également:
- Vba, Problème avec la foncction find (1004)
- Find grep ✓ - Forum Linux / Unix
- Erreur 1004 vba - Forum Programmation
- Incompatibilité de type vba ✓ - Forum Programmation
- Probleme de Range erreur 1004 !!! VB Excel ✓ - Forum VB / VBA
- [Excel] erreur 1004 : fichier non enregistré. ✓ - Forum Excel
1 réponse
Ivan-hoe
Messages postés
433
Date d'inscription
dimanche 17 février 2008
Statut
Membre
Dernière intervention
17 octobre 2008
309
13 mars 2008 à 13:57
13 mars 2008 à 13:57
Salut !
vtrouve = Range(Cells(1, 1), Cells(30, 35000)).Find(what:=Ccherch.Value).Address
Plusieurs erreurs dans cette ligne
vtrouve est défini comme Range, tu ne peux pas lui demander d'être aussi une adresse (type string)
vtrouve = Range(Cells(1, 1), Cells(30, 35000)).Find(what:=Ccherch.Value)
vtrouve est défini comme Range, c'est donc un objet, il faut commencer par l'instruction Set
Set vtrouve = Range(Cells(1, 1), Cells(30, 35000)).Find(what:=Ccherch.Value)
Cells(30, 35000) pose problème : il n'y a pas encore 35000 colonnes dans Excel. N'aurais-tu pas inversé ligne et colonne ?
Set vtrouve = Range(Cells(1, 1), Cells(35000, 30)).Find(what:=Ccherch.Value)
ça devrait marcher comme ça.
Sinon, ctrl + F te fait la même chose : tu tapes du texte et Excel te le trouve !!
I.
vtrouve = Range(Cells(1, 1), Cells(30, 35000)).Find(what:=Ccherch.Value).Address
Plusieurs erreurs dans cette ligne
vtrouve est défini comme Range, tu ne peux pas lui demander d'être aussi une adresse (type string)
vtrouve = Range(Cells(1, 1), Cells(30, 35000)).Find(what:=Ccherch.Value)
vtrouve est défini comme Range, c'est donc un objet, il faut commencer par l'instruction Set
Set vtrouve = Range(Cells(1, 1), Cells(30, 35000)).Find(what:=Ccherch.Value)
Cells(30, 35000) pose problème : il n'y a pas encore 35000 colonnes dans Excel. N'aurais-tu pas inversé ligne et colonne ?
Set vtrouve = Range(Cells(1, 1), Cells(35000, 30)).Find(what:=Ccherch.Value)
ça devrait marcher comme ça.
Sinon, ctrl + F te fait la même chose : tu tapes du texte et Excel te le trouve !!
I.
13 mars 2008 à 14:17