Remplissage d'une cellule en fonction d'une valeur d'une autre

cambouis

XLDnaute Nouveau
Bonjour,

dans un planning, je souhaiterais que les cellules des week-end se remplissent par O si la valeur d'une autre cellule est 0, en passant par une macro( et pas par la formule SI dans chaque cellule)

Merci de votre aide
 

Pièces jointes

  • Classeur1.xlsx
    16.2 KB · Affichages: 61
  • Classeur1.xlsx
    16.2 KB · Affichages: 60
  • Classeur1.xlsx
    16.2 KB · Affichages: 66

phlaurent55

Nous a quittés en 2020
Repose en paix
Re : Remplissage d'une cellule en fonction d'une valeur d'une autre

Bonjour Cambuis,

avec ce code:
Code:
Sub mettrezero()
Dim cellule As Range
For Each cellule In Range("I6:AM20")
If Cells(2, cellule.Column) = 0 Then cellule = "O"
Next cellule
End Sub

à+
Philippe
 

Pièces jointes

  • 111.xlsm
    23.5 KB · Affichages: 58
  • 111.xlsm
    23.5 KB · Affichages: 55
  • 111.xlsm
    23.5 KB · Affichages: 53
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 219
Messages
2 086 372
Membres
103 198
dernier inscrit
CACCIATORE