Problem inserting rows (and cutting)
On Jan 8, 7:22*pm, jodleren wrote:
Hello
I got a macro to fix, which has worked.
The original code was:
* * Columns("M:M").Select
* * Selection.Cut
* * Range("L1").Select ' was L1
* * Selection.Insert Shift:=xlToRight
I tried this also:
* * Range("L1").Select
* * DoEvents
* * Range("L1").Insert
and both gives the error:
Runtime error 1004
Insert method of Range class failed.
What can cause this?
WBR
Sonnich
Adding this does not help
For aa = 1 To ActiveWorkbook.Worksheets.Count
ActiveWorkbook.Worksheets(aa).Unprotect
Next
|