Problème avec la méthode Find

Problème avec la méthode Find - VB/VBA/VBS - Programmation

Marsh Posté le 12-07-2004 à 13:55:16    

Bonjour,  
Je voudrais rechercher une chaine de caractère dans une feuille Excel et écrire une donnée dans la case en dessous; j'utilise donc :  
Code:  

Code :
  1. Sheets(name).Cells.Find(element, LookIn:=xlValues, LookAt:=xlWhole).Offset(1, 0).Value = msg_acc_value


Malheureusement ca ne marche pas j'ai une erreur de ce type :  

Code :
  1. Erreur d'exécution '91':
  2. Variable objet ou variable de bloc With non définie


Je pense que ca vient du fait que le nom de la feuille que j'appelle est une variable et nom un nom en dur genre Sheets("toto" ), mais je n'en suis pas sûr  
Merci pour votre aide.

Reply

Marsh Posté le 12-07-2004 à 13:55:16   

Reply

Marsh Posté le 12-07-2004 à 14:49:21    

name est un mot réservé. Sans doute un problème potentiel.
 
J'ai utilisé la syntaxe suivante (et ça marche):

Code :
  1. Dim strResult As String
  2. Dim objSh As Worksheet
  3. Dim objRange As Range
  4.     Set objSh = ThisWorkbook.ActiveSheet
  5.     Set objRange = objSh.Cells.Find(strResult)
  6.    
  7.     Debug.Print objRange.Address


Reply

Marsh Posté le 12-07-2004 à 15:19:40    

Mais après l'affectation d'une valeur à l'objet Range ne semble pas marcher ...

Reply

Marsh Posté le 13-07-2004 à 07:42:33    

mirascheat a écrit :

Mais après l'affectation d'une valeur à l'objet Range ne semble pas marcher ...

Je ne comprends pas ce que tu veux dire....

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed