Arrêt d'une opération
CHABRIER
Messages postés
4
Date d'inscription
Statut
Membre
Dernière intervention
-
f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention -
f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Mon niveau est faux débutant
je fais tourner une macro Excel VBA qui dans l'ensemble fonctionne plutôt bien
mais je rencontre un problème de temps en temps
"je fais une recherche pour trouver une valeur suivi d'une opération simple. Si la valeur recherché est "VRAI" tout ce déroule bien mais si la valeur recherché est "FAUX" alors la macro s'arrête en débogage"
quelqu'un aurait-il une piste à me suggérer pour que la macro ne s'arrête pas à FAUX et continue son travail
merci d'avance
Mon niveau est faux débutant
je fais tourner une macro Excel VBA qui dans l'ensemble fonctionne plutôt bien
mais je rencontre un problème de temps en temps
"je fais une recherche pour trouver une valeur suivi d'une opération simple. Si la valeur recherché est "VRAI" tout ce déroule bien mais si la valeur recherché est "FAUX" alors la macro s'arrête en débogage"
quelqu'un aurait-il une piste à me suggérer pour que la macro ne s'arrête pas à FAUX et continue son travail
merci d'avance
A voir également:
- Arrêt d'une opération
- Arrêt maladie - Guide
- Forcer l'arrêt d'une application pc - Guide
- L'opération demandée nécessite une élévation ✓ - Forum LibreOffice / OpenOffice
- La Sécurité sociale durcit les règles - Ces médecins ne pourront plus délivrer d'arrêt maladie - Guide
- Bouton marche arret i o - Forum Word
3 réponses
Bonjour,
Si la valeur recherché est "VRAI"
Faut montrer votre code pour savoir comment vous faites cette recherche
Si la valeur recherché est "VRAI"
Faut montrer votre code pour savoir comment vous faites cette recherche
j'enchaine cette séquence pour une dizaine de valeur
Cells.Find(What:="00610", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Range(ActiveCell, ActiveCell.Offset(0, "-8")).Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 65535
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Range("A1").Select
Cells.Find(What:="03004", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Range(ActiveCell, ActiveCell.Offset(0, "-8")).Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 65535
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Range("A1").Select
Cells.Find(What:="00610", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Range(ActiveCell, ActiveCell.Offset(0, "-8")).Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 65535
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Range("A1").Select
Cells.Find(What:="03004", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Range(ActiveCell, ActiveCell.Offset(0, "-8")).Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 65535
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Range("A1").Select