Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

recherche marche pas dans cellules masqués?

fifi

XLDnaute Occasionnel
bonjour le forum

je viens de découvrir que ma macro de recherche ne trouve rien si les cellule sont masquée

Code:
    With Sheets("exploitation").Range("A1:IV3")
       Set c = .Find("TMY0", LookIn:=xlValues)
         int_graph = c.Column + 5
         If c.Column < 50 Then  msgbox ''ok"
    End With

il y a un solution pour que la recherche dans les cellules cachées?
 

Robert

XLDnaute Barbatruc
Repose en paix
Re : recherche marche pas dans cellules masqués?

Bonjour le fil bonjour le forum,

Il y a une petite correction au niveau des guillemets d'ouverture qui ont été fait par deux apostrophes... Mais une fois ce problème résolu. il est vrai que si TMYO se trouve dans une cellule masquée, la ligne :
Code:
int_graph = c.Column + 5
plante ! Et je n'ai malheureusement pas d'explications...
 

Hervé

XLDnaute Barbatruc
Re : recherche marche pas dans cellules masqués?

bonjour, salut robert (content de te revoir )

a essayer :

Set c = .Find("TMYO", LookIn:=xlFormulas)

souci connu avec les cellules masquées.


edit : pense à gerer l'echec de recherche :

If Not c Is Nothing Then
int_graph = c.Column + 5
If c.Column < 50 Then MsgBox "ok"
End If

a plus
 
Dernière édition:

Robert

XLDnaute Barbatruc
Repose en paix
Re : recherche marche pas dans cellules masqués?

Bonjour le fil, bonjour le forum,

Ha ha! Super content de te revoir Hervé. Toujours la grande forme et une classe internationale comme d'hab...
 

fifi

XLDnaute Occasionnel
Re : recherche marche pas dans cellules masqués?

Robert mon sauveur
j'étais justement en train de chercher à gérer l'erreur

j'étais pas parti sur un truc comme ca :
If isnothing(c) = False Then
mais bon ^^ ta solution est meilleurs.

merci
 

Discussions similaires

Réponses
2
Affichages
191
Réponses
12
Affichages
635
Réponses
12
Affichages
631
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…