Code works, but won't start when I attach it to a button

[Calinora]

I hope you can help me yet again.

I have a code that works, however when I attach it to a button it doesn't run.

I hope you can help me fix it.

Sub CopyFormatting()


    Dim lRow As Long


     lRow = ActiveSheet.Cells.Find("*", LookIn:=xlValues, Searchorder:=xlByRows, Searchdirection:=xlPrevious).Row + 1
    
    Range("B19:Z19").Copy
    ActiveSheet.Cells(lRow, 2).PasteSpecial xlPasteAll


    Application.CutCopyMode = xlCopy


End Sub

 

[Trevor G]

Are macros enabled on the workbook?

 

[Fluff]

A few questions
1) Where is the code located?
2) What sheet is the button located on?
3) What sheet are you trying to copy from?
4) What sheet are you trying to paste on?

 

[Calinora]

I've got it to work again, thanks to your questions.
Macros are enabled yes.

It was in a module, but somehow it got overruled by a different module i had. After I deleted that it worked perfectly.
Lets call it sheet 2 where the button was located.
Copying from sheet 2
Pasting to sheet 2

Thanks!

 

[Fluff]

Glad you got it working & thanks for the feedback