VBA remplir cellules sous conditions
Actaris51
-
pou pouille Messages postés 207 Date d'inscription Statut Membre Dernière intervention -
pou pouille Messages postés 207 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Voilà, sous Excel, j'ai trois colonnes, B C et D, qui peuvent etre cochées suivant les lignes (on met un "X" dans la cellule)
par exemple, en B1 j'ai un "X" et rien en C1 et D1, en B2 et en C2 j'ai un X mais rien en D2.
Mais parfois, il n'y a rien de coché (exemple : B3, C3 et D3 sont vides)
J'aimerai que dans le cas ou les trois cellules de la ligne sont vides, alors les 3 cellules en question soient cochées.
Pouvez vous m'aider ?
Merci
Voilà, sous Excel, j'ai trois colonnes, B C et D, qui peuvent etre cochées suivant les lignes (on met un "X" dans la cellule)
par exemple, en B1 j'ai un "X" et rien en C1 et D1, en B2 et en C2 j'ai un X mais rien en D2.
Mais parfois, il n'y a rien de coché (exemple : B3, C3 et D3 sont vides)
J'aimerai que dans le cas ou les trois cellules de la ligne sont vides, alors les 3 cellules en question soient cochées.
Pouvez vous m'aider ?
Merci
A voir également:
- VBA remplir cellules sous conditions
- Organigramme a remplir word - Guide
- Formule excel pour additionner plusieurs cellules - Guide
- Verrouiller cellules excel - Guide
- Excel compter cellule couleur sans vba - Guide
- Colorer des cellules excel sous condition - Guide
1 réponse
bonjour, à quel moment déclenché cette action de remplir les 3 cases avec des X ??
sinon on peut remplir quelquechose comme cela avec un bouton:
sinon on peut remplir quelquechose comme cela avec un bouton:
Private Sub CommandButton1_Click()
For i = 1 To 12
If Range("B" & i).Value = "" And Range("C" & i).Value = "" And Range("D" & i).Value = "" Then
Range("B" & i & ":D" & i).Value = "x"
End If
Next i
End Sub