XL 2016 [RESOLU] Besoin d'aide sur une boucle.

Thhrsa

XLDnaute Nouveau
Bonjour à tous.

Je m'arrache les cheveux depuis un certain temps sur une boucle.
Je fais donc appel à votre savoir !!!

Mon problème:
En colonne "C" je veux détecter la présence de "OUI"
Si j'ai un "OUI", je lance des instructions
Si pas de "OUI", je lance d'autres instructions

Par contre ma boucle ne s’arrête pas à la fin de mon tableau.


Ci-joint ligne de codes:
Sub test()

If Range("C3").Select Then
Do Until ActiveCell >= "OUI"
ActiveCell.Offset(1, 0).Select
Loop
GoTo Suite
Else
End If

Suite:
Range("C2").Select

End Sub

Et fichier test

Merci d'avance.

Thh
 

Pièces jointes

  • Test.xlsx
    10.3 KB · Affichages: 6
Dernière édition:

JBARBE

XLDnaute Barbatruc
Bonjour à tous,
Peut-être ceci :
VB:
Option Explicit

Sub test()
Dim i As Long
For i = 3 To 65536
If Cells(i, 3) = "" Then Exit Sub
If Cells(i, 3) = "OUI" Then
  'instruction
else
'instruction
End If
Next i
End Sub

Bonne journée
Bonjour Job Champagne !
 

Discussions similaires

Réponses
2
Affichages
536
Réponses
25
Affichages
803

Statistiques des forums

Discussions
311 735
Messages
2 082 024
Membres
101 873
dernier inscrit
excellllll