Hi,

I am getting error in macro.

To prevent possible loss of data, Microsoft Excel cannot shift nonblank
cells off the worksheet.


Below is code

Sheet1.Range(Cells(1, 8), Cells(NbListClients + 1, 12)) = ListClients
' shriyansh
Sheet1.Rows("1:3999").Insert Shift:=xlDown

i need help on this.