Posts by vietnt.fov

Hi,

You need to edit formatting rule:

-cell value bettwen today()+30 and today()+45-->green color

-cell value less than today()+30-->red color

Hope it helps

Hi Sleeplol,

You're welcome. Glad to hear your feedback. I just would like to help everyone who are having problem on Excel VBA.The experiments that I have is from some Excel forum on the Internet and I am still improving my excel skills when helping you.

Regards.

Hi,

I am free now so I want to help you make some marcos as your request

Please see my attached file and run trial

Hope it helps

You can using "Using a formala to determine which cells to format" in "New formatting rule" tab.

First you create rule follow this method with formula "=AND($J$13<$G$13,$J$13>$H$13)" for the cell J13, and format the font to red color as you want then you can use format painter to apply for the other cells. Hope it can help

Dim col, row, i As Integer
col = 1
row = 1
For i = 1 To 50
 Range("A" & row & ":P" & row + 41).Select
 Selection.Cut
 Range(Split(Cells(1, col).Address, "$")(1) & 1).Select
 ActiveSheet.Paste
 col = col + 16
 row = row + 42
 
Next i

Let's try this code. I attached the excel file, you just click run and see the result : )