VBA - Recherche/Valeur
Résolu/Fermé
A voir également:
- VBA - Recherche/Valeur
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Recherche adresse - Guide
- Recherche musique - Guide
- Recherche par image - Guide
- Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA
2 réponses
Leahkim
Messages postés
3081
Date d'inscription
jeudi 15 novembre 2007
Statut
Membre
Dernière intervention
2 mars 2014
279
7 août 2008 à 16:02
7 août 2008 à 16:02
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
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