I feel like this code is taking way too long to process (2-3 minutes). It's quite basic so was wondering if there were any ways I could improve it?
Sub Sample1()
Dim LastRow As Long, i As Long
Dim ws As Worksheet
Set ws = Sheets("Sheet1")
LastRow = ws.Range("A" & Rows.Count).End(xlUp).row...