rechercher une valeur dans une colonne

Question

Bonsoir, dans un tableau EXCEL je veux rechercher une valeur bien precise dans colonne A et selectionner puis copier la ligne concernée . J'utilise dejà une procédure semblable dans un autre module de cette application et elle fonctionne.
Mais pour cette deuxième procédure rien à faire, j'ai toujours le message d'erreur:  erreur 91, variable objet ou variable de bloc with non definie.

mon code:
Dim columns As Range
Dim ligne As Range
Dim cherche As Long


Application.ScreenUpdating = False

Worksheets("numerotation").Select
cherche = Range("r1").Value
If cherche.Value = "" Then
MsgBox "La ligne sélectionnée est vide", vbOK
Sheets("Accueil").Select.Range("c1").Select
End If

columns("a:a").Select
Selection.Find(what:=Place, after:=ActiveCell, LookIn:=xlValues, lookat:=xlWhole, searchorder:=xlByRows, searchdirection:=xlNext, MatchCase:=False).actvate
If Place.Value = Range("r1") Then
ActiveCell.EntireRow.Copy
Sheets("feuil1").Range("a2").Select
ActiveSheet.Paste
Si quelqu'un peut me conseiller............

ucfoutu · Answer

Bonjour,
déjà : on ne travaille pas à coup de "Select" , "activate" et examen de "selection", mais directement sur les objets Excel.
Tu cherches sans quoi et quoi ? ===>>>>
tu cherches dans la colonne A et tu y cherche une valeur (apparemment celle de ta cellule R1).
Ouvre ron aide VBA sur le mot Find (Range.Find) et lis ===>> tu y as ta réponse !

jordane45 · Answer

Bonsoir,

Je pense déceler une erreur ici :

cherche = Range("r1").Value 
If cherche.Value = "" Then 
 
 Retire le .Value  après le mot cherche.


@ Ucfoutu : Tu as lus en travers je pense, L'utilisateur utilise Déjà le FIND.... :-(


NB: lorsque l'on a un message d'erreur, il est bon d'identifier à quelle ligne il se produit (via le mode pas à pas par exemple ) et éventuellement de l'indiquer dans sa question... [ mais là, je pense que tu aurais pu trouver tout seul le souci ]

Cordialement,
Jordane

Rechercher une valeur dans une colonne

2 réponses

Votre réponse

Discussions similaires