Insert Column in loop for another sheet

[RoseChompooh]

Hi Guys,

I want to insert the column (in loop) for another sheet.
The example below is the code for inserting column in the current sheet only.
However, does anyone know how can I insert the column in Sheet 2 from the code below please ?

Example:

Sub VBAColumn4()

Dim Column As Integer
Columns(2).Select
For Column = 0 To 12
ActiveCell.EntireColumn.Insert
ActiveCell.Offset(0, 4).Select

Next

End Sub

Thank you. ^^

 

[RoseChompooh]

Please help

 

[Peter_SSs]

I want to auto format the the cell of each person for each month base on criteria

Has the layout changed? Here it seems there are no merged cells & just one column per project, unlike the previous image. Can you clarify?

Also, if you provide any further sample data, can you please do it in a format that can be copied for testing? My signature block below has help on that.