Refer to last used column and fill formula

Hi all,

I am using the below to fill formula in specific column:

Range("B2:B" & Cells(Rows.Count, "A").End(xlUp).Row).Formula = "=1"

How can i refer to last used column and fill formula?

Thanks a lot!