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

Balayage alternatif de cellules dans plage

  • Initiateur de la discussion Initiateur de la discussion loto
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

loto

XLDnaute Occasionnel
Bonsoir,

Je souhaite balayer chacune des cellules d'un range A4:Axxx pour générer une action à l'issue de chaque examen. Il est indispensable de s'arrêter à l'issue de cette action car, en fonction du résultat, je fais l'examen suivant.
Là où je suis en train de m'énerver, c'est que je ne sais pas l'écrire correctement, je ne parviens par à m'arrêter.

Un exemple trivial pour comprendre

En A En B

4 garcon Az
5 garcon
6 fille
7 fille
...

Je veux balayer chaque cellule de A4 à Ax (les cellules non vides uniquement)
Pour A4, je regarde si A4=garcon et si A4=garcon et que B4 est vide, alors j'écris "B", s'il n'est pas vide, je passe
Puis je passe à A5 :Idem , si garcon et vide en B5, alors "gg", sinon je passe

C'est l'examen du vide qui est essentiel : il faut donc que la précédente action ait été accomplie

Savez-vous jouer mieux que moi avec les références?

Merci
 
Re : Balayage alternatif de cellules dans plage

Salut,

Cela ressemble bcp à ce que j'avais écrit (sauf next X) et cela m'écrivait le "B" x fois à la fin car justement, je ne prenais pas la peine de m'arrêter à chaque ligne pour examiner le résultat.

Je n'ai pas mon fichier sous la main mais je vais tester.

Merci
 
Re : Balayage alternatif de cellules dans plage

J'ai testé ton code qui hélàs ne rend pas de résultat attendu
Je poste un fichier pour que vous compreniez : qd vous activerez USF, au lieu de m'écrire un truc en A4 puis de passer en A5, j'aurai la même info en A4/5 alors que ce sont des évènements différents.
Cela marche bien si une seule valeur en A et hors controle, bug dès qu'il y en a +
 

Pièces jointes

Re : Balayage alternatif de cellules dans plage

Et si au lieu de charcher dans l'USF tous les cas, je ne cherchais que dans le 1ER (détection par ailleurs)

Comment dire Cherche dans la 1er cellule qui est > 10?
 
Re : Balayage alternatif de cellules dans plage

Bonjour à tous
Pas sûr d'avoir bien compris...
Ceci peut-être :
Code:
[COLOR="DarkSlateGray"][B]Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Dim cel As Range
  For Each cel In Range("A1:A35")
    If Not IsEmpty(cel) And cel.Offset(, 1) = "" Then
      If cel.Value > 10 Then
        cel.Offset(, 1).Value = Me.ComboBox2 & "-" & DateTime.Now
        Exit For
      End If
    End If
  Next cel
End Sub[/B][/COLOR]
ROGER2327
#4314


Mardi 10 Haha 138 (Saint Panmuphle, huissier, SQ)
24 Vendémiaire An CCXIX
2010-W41-5T09:43:08Z
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…