1 2 3 4 5 6 7 8 9 10 11
| if maFeuille.getCellRangeByName("J6").string = "N" and maFeuille.getCellRangeByName("J7").string = "N" Then
maFeuille.getCellRangeByName("J8").CellBackColor = RGB(125,125,125)
maFeuille.getCellRangeByName("J9").CellBackColor = RGB(125,125,125)
maFeuille.getCellRangeByName("C8").CharColor = RGB(125,125,125)
maFeuille.getCellRangeByName("C9").CharColor = RGB(125,125,125)
else
maFeuille.getCellRangeByName("J8").CellBackColor = RGB(255,255,255)
maFeuille.getCellRangeByName("J9").CellBackColor = RGB(255,255,255)
maFeuille.getCellRangeByName("C8").CharColor = RGB(0,0,0)
maFeuille.getCellRangeByName("C9").CharColor = RGB(0,0,0)
end if |
Partager