Looks to me like you may have missed the red part of this line
Code:
.Range(Cells(EndRow + 1, StrtCol), Cells(EndRow + 1, EndCol + 1)).Interior.Color = _
.Cells(EndRow - 1, StrtCol).DisplayFormat.Interior.Color
The right color is being applied but only to the starting cell of the range.
It would be far easier to be sure if you would post the sheet with the code rather than a picture of the sheet and no code. (This isn't MrE. Excel files can be posted here.)
On second thought that's not right. The new row being added is not always immediately below "the table".
I'll have to adjust for that.... I'll be back shortly.