la commande FIND

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : la commande FIND

manounou

Bonjour tous le monde, j'ai un petit souci avec mon programme
(je ne sais plus quoi faire)
Objet_Courant = ActiveSheet.Range(Premiere_colonne_tab3, Derniere_colonne_tab3).Find(what:=2A, LookAt:=xlWhole).Activate

avec
Premiere_colonne_tab3="$D$47"
Derniere_colonne_tab3="$K$47"

a l'excecution , il me dit: un objet est requis

je vous en prie de l'aide.

Publicité

AlainTech

Pas trouvé? Cherche encore!

Essaye plutôt comme ceci:

Set rRange = Range(Premiere_colonne_tab3, Derniere_colonne_tab3)

Set Objet_Courant = rRange.Find("2A", LookAt:=xlWhole)
If Not Objet_Courant Is Nothing Then
Objet_Courant.Activate
Else
Msgbox ("Pas trouvé" )
End If

Message édité par AlainTech le 12-06-2005 à 15:12:08

---------------
Si on vous donne une info qui marche, DITES-LE!!!! ------ Si vous trouvez seul, AUSSI, votre solution peut servir à d'autres! ------ Je dois la majorité de mes connaissances à mes erreurs!

FORUM HardWare.fr

Programmation

VB/VBA/VBS

la commande FIND

Sujets relatifs
[VB.NET] Commande de mise à jour de l'heure de windows	problème en ligne de commande
===> La commande "browse" ? <===	Aide pour envoie d'une commande
commande DOS comment faire un sleep	Problème avec la commande set Path
[Makefile] Affecter le `stdout' d'une commande shell a une variable	Synthaxe de la commande include en VBS???
php en ligne de commande sous linux	La commande Find (unix)
Plus de sujets relatifs à : la commande FIND

Page générée en 0.026 secondes