VBA - Recherche/Valeur [Résolu/Fermé]

Signaler
-
 PleaseCallMe -
Bonjour,
Voici mon code :

Dim rge3 As Range
Set rge3 = Range("B7:B29").Find(Mardi)
Dim Value_2 As Integer
Dim Var2 As Integer
Value_2 = rge3.Row
Var2 = Cells(Value_2, 4).Value

J'aimerais que si il ne trouve pas la date "Mardi" ma Sub continue de s'éxécuter !
Quelqu'un peut me donner un coup de main?

2 réponses

Messages postés
3078
Date d'inscription
jeudi 15 novembre 2007
Statut
Membre
Dernière intervention
2 mars 2014
259
ba, il faut rajouter une condition


Dim rge3 As Range

If Mardi<>0 Then Set rge3 = Range("B7:B29").Find(Mardi)
else goto SUITE

SUITE:
Dim Value_2 As Integer
Dim Var2 As Integer
Value_2 = rge3.Row
Var2 = Cells(Value_2, 4).Value
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 65492 internautes nous ont dit merci ce mois-ci

Merci ^^