VBA scan prochaine cellule vide double colonne

[chifounou]

Bonjour,

Depuis une cellule active, pour sélectionner la prochaine cellule vide d'une seule colonne E, j'utilise

Range("E" & target.Row).End(xlDown).Offset(1, 0).Select

Jusque là tout va bien. Maintenant j'aimerais corser la chose en rajoutant une colonne F

La macro devrait scanner les 2 colonnes E et F (depuis une rangée différente >1) d'abord de gauche à droite puis de haut en bas ligne par ligne jusqu'à me trouver et me sélectionner la première cellule vide rencontrée.

A ce titre j'ai créé une feuille avec des scénarios, cellule active de départ en vert, cellule à sélectionner en rouge

Trop néophyte pour parvenir à ma fin, pouvez-vous m'aider à écrire le code ? Merci beaucoup

 

[job75]

Re : VBA scan prochaine cellule vide double colonne

Bonsoir chifounou,

ActiveCell.Resize(Rows.Count - ActiveCell.Row + 1, 2).Find("", , xlValues, , xlByRows).Select

A+

 

[job75]

Re : VBA scan prochaine cellule vide double colonne

Re,

Cela dit je comprends que vous voulez imposer des conditions à la cellule active.

1) Cellule active obligatoirement en colonne E :

With ActiveCell
  If .Row > 1 And .Column = 5 Then _
    Range("E" & .Row & ":F" & Rows.Count).Find("", , xlValues, , xlByRows).Select
End With

2) Cellule active en colonnes E ou F :

With ActiveCell
  If .Row > 1 And (.Column = 5 Or .Column = 6) Then _
    Range("E" & .Row & ":F" & Rows.Count).Find("", .Cells, xlValues, , xlByRows).Select
End With

A+

 

[chifounou]

Re : VBA scan prochaine cellule vide double colonne

Merci beaucoup Job75
La première formule m'a déjà convenu et j'ai pu l'adapter à divers usages.

Les formules suivantes devraient me servir pour un challenge un cran juste au-dessus.

 

[chifounou]

Re : VBA scan prochaine cellule vide double colonne

Je m'apprête à créer un sujet séparé pour une requête similaire plus complexe, merci encore.