XL 2019 Mettre sous brillance cellule sous condition

farid

XLDnaute Occasionnel
Bonjour a vous,
j'ai une VBA qui me permet d'aller à la cellule active vide de la colonne B.Est ce possible lorsque la cellule vide active de la colonne B est selectionné que la cellule a coté (colonne A passe en couleur).
par avance , merci
 

Pièces jointes

  • test200.xlsm
    18.5 KB · Affichages: 3
Solution
Bonjour,
Modifie la macro comme ceci
VB:
Private Sub CommandButton3_Click()
Range("A4:A" & Range("A" & Rows.Count).End(xlUp)).Interior.Color = xlNone
Cells(Rows.Count, 2).End(xlUp)(2).Select
  If ActiveCell.Value = "" Then
    ActiveCell.Offset(, -1).Interior.Color = RGB(255, 0, 0)
  End If
End Sub

M12

XLDnaute Accro
Bonjour,
Modifie la macro comme ceci
VB:
Private Sub CommandButton3_Click()
Range("A4:A" & Range("A" & Rows.Count).End(xlUp)).Interior.Color = xlNone
Cells(Rows.Count, 2).End(xlUp)(2).Select
  If ActiveCell.Value = "" Then
    ActiveCell.Offset(, -1).Interior.Color = RGB(255, 0, 0)
  End If
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
312 505
Messages
2 089 066
Membres
104 015
dernier inscrit
kkgk