VBA: compileerfout

[Warme bakkertje]

Sub Macro2()
  With ActiveWorkbook.Sheets("Blad1")
    .Rows("20:34").Insert
    .[f23].Resize(, 2) = .[f8].Resize(, 2).Formula
    .Copy ActiveWorkbook.Sheets(1)
  End With
End Sub

In jouw afbeelding

.[M5].Resize(, 2) = .[M235].Resize(, 2).Formula

 

[sickofitall]

Ik heb heel mijn macro aangepast door With Worksheets("....") en End With in te voegen. En nu werkt hij wel, opnieuw

Ik kan alleen maar besluiten dat het niets met mijn codering te maken had dat mijn macro niet wou verderwerken maar waarschijnlijk doordat er hier op mn werk nog geregeld macro's lopen (vanop een server), ook voor nieuwe bestanden, en dit zal gezorgd hebben voor de compileerfout.

Anyhow, problem solved.