Shift:=xlDown problem

[bleeding_me]

Hello my friends,

I need some help here please.

I have a macro in VBA that is supposed to select a row, copy's the format and uses "Shift:=xlDown" to shift the cells down.

But i got a problem, when the line with "Shift:=xlDown" is executed, a dialog box appears (see attached image), can anyone help me to get rid of the dialog box?

This was working (the dialog box wasn't appearing), and now i don't know why it stopped working.

The code i have is this

        Rows(p_portagem & ":" & p_portagem).Select
        Selection.Copy
        Selection.Insert Shift:=xlDown